Mercurial > hg > Members > menikon > CbC_xv6

comparison src/gearsTools/gen_Stub.pl @ 278:98aea649e37b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add gen_stub perl scripts
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Tue, 28 Jan 2020 14:23:29 +0900
parents
children 0a74a7bbe765
comparison
equal deleted inserted replaced
277:0ea4d14c54bd 278:98aea649e37b
1 #!/usr/bin/env perl
2 use strict;
3 use warnings;
4
5 use FindBin;
6 use lib "$FindBin::Bin/lib";
7 use Gears::Util;
8 use Gears::Stub;
9
10 use Getopt::Std;
11 use File::Spec;
12
13 use DDP {deparse => 1};
14
15 my $target_cbc_file = shift;
16 my $stubManager = Gears::Stub->new(file_name => File::Spec->rel2abs($target_cbc_file));
17
18 $stubManager->findInterfacewImpl($stubManager->slup());