Mercurial > hg > Members > Moririn

diff src/parallel_execution/generate_stub.pl @ 269:5170539348ec

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
rename TaskManagerImpl.cbc
author mir3636
date Sun, 29 Jan 2017 22:15:32 +0900
parents 378ce6f74f4b
children d14eb393023d
line wrap: on
line diff
--- a/src/parallel_execution/generate_stub.pl	Sun Jan 29 21:30:58 2017 +0900
+++ b/src/parallel_execution/generate_stub.pl	Sun Jan 29 22:15:32 2017 +0900
@@ -53,12 +53,12 @@
                 $dataGear{$name} = $_;
                 $var{$name} = {};
                 $code{$name} = {};
-            } elsif (/^(\w+)\* create(\w+)\(/) {
+            } elsif (/^(\w+)(\*)+ create(\w+)\(/) {
                 if (defined $interface) {
                    die "duplicate interface $interface\n"; 
                 }
                 $interface = $1;
-                $implementation = $2;
+                $implementation = $3;
                 if ( -f "$interface.cbc") {
                     &getDataGear("$interface.cbc");
                 }