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