changeset 300:edc8e6c71dc6

remove debug code at gen_stub.pl
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Wed, 29 Jan 2020 22:53:44 +0900
parents e825c247ab24
children 7ec574dfe64f
files src/gearsTools/generate_stub.pl
diffstat 1 files changed, 0 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/gearsTools/generate_stub.pl	Wed Jan 29 22:17:40 2020 +0900
+++ b/src/gearsTools/generate_stub.pl	Wed Jan 29 22:53:44 2020 +0900
@@ -17,7 +17,6 @@
 
 our($opt_o,$opt_d,$opt_h);
 getopts('o:d:h');
-        use Data::Dumper;
 
 my $dir = ".";
 if ($opt_d) {
@@ -258,7 +257,6 @@
         $dataGearName{$codeGearName} .= "\t$typeName* $varName = ($typeName*)GearImpl(cbc_context, $interface, $varName);\n";
     } else {
         # interface var
-        print Dumper \%var;
         for my $ivar (keys %{$var{$interface}}) {
             #  input data gear field
             if ($varName eq $ivar) {