From: Christoph Mallon Date: Wed, 28 Nov 2012 21:48:34 +0000 (+0100) Subject: arch_spec: Remove remnants of unused operands. X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=30b992a490bfdcccb934dbe90710b663898c001f;p=libfirm arch_spec: Remove remnants of unused operands. --- diff --git a/ir/be/ia32/ia32_spec.pl b/ir/be/ia32/ia32_spec.pl index d5d88bab7..bedbeb1af 100644 --- a/ir/be/ia32/ia32_spec.pl +++ b/ir/be/ia32/ia32_spec.pl @@ -156,9 +156,6 @@ $custom_init_attr_func = \&ia32_custom_init_attr; ia32_climbframe_attr_t => "ia32_compare_climbframe_attr", ); -%operands = ( -); - $status_flags = [ "CF", "PF", "AF", "ZF", "SF", "OF" ]; $status_flags_wo_cf = [ "PF", "AF", "ZF", "SF", "OF" ]; $fpcw_flags = [ "FP_IM", "FP_DM", "FP_ZM", "FP_OM", "FP_UM", "FP_PM", diff --git a/ir/be/scripts/generate_new_opcodes.pl b/ir/be/scripts/generate_new_opcodes.pl index 7cd267938..c992ea2a8 100755 --- a/ir/be/scripts/generate_new_opcodes.pl +++ b/ir/be/scripts/generate_new_opcodes.pl @@ -36,7 +36,6 @@ my $line_nr = 0; our $arch; our $additional_opcodes; our %nodes; -our %operands; our %cpu; our $default_op_attr_type; our $default_attr_type; @@ -81,33 +80,6 @@ if(! %compare_attr) { ); } -# Operands are really just nodes with some special constraints, we check -# these and create new entries in the nodes hashmap -foreach my $op (keys(%operands)) { - my %operand = %{ $operands{"$op"} }; - my %op_node; - - # constraints - if(defined($operand{op_flags})) { die "Fatal error: operands can't have op_flags ($op)"; } - if(defined($operand{cmp_attr})) { die "Fatal error: cmp_attr not allowed for operands ($op)"; } - if(defined($operand{mode})) { die "Operand must not have a mode defined ($op)"; } - if(defined($operand{out_arity})) { die "operand must not have out_arity defined ($op)"; } - if(defined($nodes{$op})) { die "$op defined as operand and as node"; }; - - - foreach my $flag (keys(%operand)) { - $op_node{$flag} = $operand{$flag}; - } - $op_node{op_flags} = "O"; - $op_node{cmp_attr} = 'return 1;'; - $op_node{mode} = 'mode_ANY'; - - $nodes{$op} = \%op_node; -} - -#print Dumper(%nodes); -#print Dumper(%operands); - # create c code file from specs my @obst_limit_func;