Mercurial > hg > GearsTemplate
comparison src/parallel_execution/generate_stub.pl @ 324:d9887056ae5b
Update Todo and Add comment to perl script
author | one |
---|---|
date | Fri, 14 Apr 2017 19:52:26 +0900 |
parents | ec0a5b4fba05 |
children | 3529c7e93c4f |
comparison
equal
deleted
inserted
replaced
323:131a04a70dd8 | 324:d9887056ae5b |
---|---|
246 } | 246 } |
247 $dataGearName{$codeGearName} .= ");"; | 247 $dataGearName{$codeGearName} .= ");"; |
248 # generate CodeGear header with new arguments | 248 # generate CodeGear header with new arguments |
249 print $fd "__code $codeGearName($newArgs)$tail\n"; | 249 print $fd "__code $codeGearName($newArgs)$tail\n"; |
250 if ($outputVar{$codeGearName} ne "") { | 250 if ($outputVar{$codeGearName} ne "") { |
251 # output data var can be use before write | |
252 # it should be initialze by gearef | |
251 print $fd $outputVar{$codeGearName}; | 253 print $fd $outputVar{$codeGearName}; |
252 } | 254 } |
253 next; | 255 next; |
254 } elsif (/^(.*)goto (\w+)\((.*)\);/) { | 256 } elsif (/^(.*)goto (\w+)\((.*)\);/) { |
255 # handling goto statement | 257 # handling goto statement |