--- a/src/gearsTools/trans_impl.pl	Tue Feb 04 13:28:20 2020 +0900
+++ b/src/gearsTools/trans_impl.pl	Tue Feb 04 13:40:45 2020 +0900
@@ -13,11 +13,10 @@
 getopts("wo:" => \%opt);
 
 my $impl_file = shift or die 'require impl file';
-my $impl_ir         = Gears::Util->parse_with_rewrite(File::Spec->rel2abs($impl_file));
-my $interface_file  = Gears::Util->find_header($impl_ir->{isa},"$FindBin::Bin/..");
+my $impl_ir         = Gears::Util->parse_with_separate_code_data_gears(File::Spec->rel2abs($impl_file));
+my $interface_file  = Gears::Util->find_using_interface_header($impl_ir->{isa},"$FindBin::Bin/..");
 
-my $inter_ir        = Gears::Util->parse_with_rewrite($interface_file);
-
+my $inter_ir        = Gears::Util->parse_with_separate_code_data_gears($interface_file);
 
 my $output_file = $impl_file;
 $output_file =~ s/\.h/.cbc/;