changeset 226:68c03e7057d9

get arg
author mir3636
date Tue, 17 Jan 2017 18:11:39 +0900
parents f3e29df16d42
children 991f3d1ce072
files src/parallel_execution/generate_stub.pl
diffstat 1 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/parallel_execution/generate_stub.pl	Sat Jan 14 19:52:02 2017 +0900
+++ b/src/parallel_execution/generate_stub.pl	Tue Jan 17 18:11:39 2017 +0900
@@ -30,6 +30,13 @@
                 $name = $1;
                 $dataGear{$name} = $_;
             }
+            if (/^\_\_code (\w+)/) {
+                $codeGearName = $1;
+                print STDOUT $1 . "\n";
+                while (/struct (\w+)/g) {
+                    print STDOUT "\t" . $1 . "\n";
+                }
+            }
             next;
         }
         $dataGear{$name} .= $_;