changeset 197:de7c0bbfc91f

merge
author ikkun
date Fri, 16 Dec 2016 23:41:27 +0900
parents 119c035e0e36 (current diff) bd96dffaa76a (diff)
children 4051c012dec3
files
diffstat 1 files changed, 15 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/parallel_execution/generate_stub.pl	Fri Dec 16 23:27:14 2016 +0900
+++ b/src/parallel_execution/generate_stub.pl	Fri Dec 16 23:41:27 2016 +0900
@@ -33,6 +33,12 @@
             next;
         }
         $dataGear{$name} .= $_;
+	if (/(\w+);$/ and !/^} (\w+)/) {
+	    $var{$name} .= $1 . "\n";
+	    $tmp = $`;
+	    $tmp =~ s/^\s*//;
+	    $type{$name} .= $tmp . "\n";
+	}
         if (/^}/) {
             $inTypedef = 0;
         }
@@ -45,6 +51,15 @@
         print $fd $dataGear{$name},"\n";
     }
     print $fd "\n";
+
+    open my $fd,">","d/stub.h" or die("can't open d/stub.h $!");
+    for my $name ( sort keys %dataGear ) {
+        print $fd $var{$name},"\n";
+    }
+    for my $name ( sort keys %dataGear ) {
+        print $fd $type{$name},"\n";
+    }
+    print $fd "\n";
 }
 
 # end