Mercurial > hg > Members > menikon > CbC_xv6
changeset 277:0ea4d14c54bd
remove dead codes...
author | anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 28 Jan 2020 14:21:08 +0900 |
parents | 49a70efcbd3a |
children | 98aea649e37b |
files | src/gearsTools/lib/Gears/Context.pm |
diffstat | 1 files changed, 0 insertions(+), 39 deletions(-) [+] |
line wrap: on
line diff
--- a/src/gearsTools/lib/Gears/Context.pm Tue Jan 28 14:06:54 2020 +0900 +++ b/src/gearsTools/lib/Gears/Context.pm Tue Jan 28 14:21:08 2020 +0900 @@ -186,19 +186,6 @@ sub tree2data_struct_str { my ($self, $dg_str) = @_; my $data_struct_str = ""; - - # 定義順で大変なのでオミット - ##もとのxv6に登録されているものはcontext.hには定義を書かない - #my $alread_defined_str = _already_defined_struct(); - #for my $str (sort keys %$dg_str) { - # if (defined $alread_defined_str->{$str}) { - # my $str_name = $alread_defined_str->{$str}; - # $data_struct_str .= "struct $str_name $str_name;\n"; - # delete $dg_str->{$str_name}; - # } - #} - - #定義されてないものはcontext.hに書くフォーマットに合わせておく for my $interface (sort keys %$dg_str) { $data_struct_str .= Gears::Util->h2context_str($dg_str->{$interface}->{elem}); next unless ($dg_str->{$interface}->{impl}); @@ -254,31 +241,5 @@ return \%res; } -sub _already_defined_struct { - my @struct_list = qw/ -__jmp_buf_tag -buf -cbc_devsw -context -cpu -devsw -dinode -dirent -elfhdr -file -inode -pipe -proc -proghdr -spinlock -stat -superblock -trapframe -/; - - my %def_hash; - map { $def_hash{$_} = $_} @struct_list; - return \%def_hash; -} 1;