comparison src/gearsTools/gen_Stub.pl @ 281:4d76280758db

move context.pm to util.pm ...
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Tue, 28 Jan 2020 16:50:07 +0900
parents 0a74a7bbe765
children
comparison
equal deleted inserted replaced
280:21a5761e3e7a 281:4d76280758db
13 use DDP {deparse => 1}; 13 use DDP {deparse => 1};
14 14
15 my $target_cbc_file = shift; 15 my $target_cbc_file = shift;
16 my $stubManager = Gears::Stub->new(file_name => File::Spec->rel2abs($target_cbc_file)); 16 my $stubManager = Gears::Stub->new(file_name => File::Spec->rel2abs($target_cbc_file));
17 17
18 $stubManager->findInterfacewImpl(File::Spec->rel2abs($target_cbc_file)); 18 my $interface_w_impl = $stubManager->findInterfacewImpl(File::Spec->rel2abs($target_cbc_file));
19