Mercurial > hg > CbC > CbC_xv6
changeset 366:dcf47cf23ecc
...
author | anatofuz |
---|---|
date | Fri, 03 Jul 2020 16:17:47 +0900 |
parents | f0c51aac6bed |
children | 650fac123133 |
files | src/gearsTools/trans_impl.pl |
diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/gearsTools/trans_impl.pl Fri Jul 03 16:11:43 2020 +0900 +++ b/src/gearsTools/trans_impl.pl Fri Jul 03 16:17:47 2020 +0900 @@ -13,6 +13,10 @@ getopts("wo:" => \%opt); my $impl_file = shift or die 'require impl file'; +if ($impl_file !~ /\.h$/) { + die "require header file"; +} + 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/..");