changeset 309:14845ce8254b

tweak trans_impl create constractor
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Wed, 05 Feb 2020 16:50:00 +0900
parents 50fd5d414066
children ba8687746ff6
files src/gearsTools/trans_impl.pl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/gearsTools/trans_impl.pl	Wed Feb 05 15:52:52 2020 +0900
+++ b/src/gearsTools/trans_impl.pl	Wed Feb 05 16:50:00 2020 +0900
@@ -101,7 +101,7 @@
 
   for my $code (@{$impl_ir->{codes}}) {
       my $code_gear = $code->{name};
-      print $out "    ${instance_impl}->$code_gear = C_$code_gear$impl_ir->{name};\n"
+      print $out "    ${instance_impl}->$code_gear = C_$code_gear;\n"
   }
 
   for my $code (@{$inter_ir->{codes}}) {