comparison src/gearsTools/static_gen_header.pl @ 353:c958c355f805

...
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Tue, 09 Jun 2020 14:24:09 +0900
parents 0e72eb96b6b1
children 650fac123133
comparison
equal deleted inserted replaced
352:582f538160d8 353:c958c355f805
71 return "typedef struct $impl_name <Type, Isa> impl $interface_name {\n"; 71 return "typedef struct $impl_name <Type, Isa> impl $interface_name {\n";
72 } 72 }
73 73
74 sub emit_last { 74 sub emit_last {
75 my $type = shift; 75 my $type = shift;
76 my $msg = <<"EOF"; 76 my $msg = " __code next(....);\n";
77 __code next(....); 77 $msg .= "} $type;\n";
78 EOF
79 $msg .= "} $type;\n"
80 return $msg; 78 return $msg;
81 } 79 }