Mercurial > hg > GearsTemplate
diff src/parallel_execution/generate_context.pl @ 259:195518ab62fc
fix type gathering pattern match in generate_stub.pl
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sat, 28 Jan 2017 12:37:22 +0900 |
parents | cd3486e4ba70 |
children | 9d671e63df74 |
line wrap: on
line diff
--- a/src/parallel_execution/generate_context.pl Fri Jan 27 21:20:07 2017 +0900 +++ b/src/parallel_execution/generate_context.pl Sat Jan 28 12:37:22 2017 +0900 @@ -64,6 +64,7 @@ my %codeGear; my %dataGear; +# gather module Information for code table initialization for (@ARGV) { next if (/context.c/); &getStubInfo($_); @@ -71,7 +72,8 @@ my (%mCodeGear) = (%codeGear); -while (<*.c>) { +# anyway we gather all Gears Information +while (<*.c test/*.c>) { next if (/context.c/); &getStubInfo($_); } @@ -154,6 +156,7 @@ open my $fd,">","$ddir/enumData.h" or die("can't open $ddir/enumData.h $!"); print $fd "enum DataType {\n"; + print $fd " D_Code,\n"; for my $data ( sort keys %dataGear ) { print $fd " D_${data},\n"; }