arch_spec: Remove remnants of unused operands.
authorChristoph Mallon <christoph.mallon@gmx.de>
Wed, 28 Nov 2012 21:48:34 +0000 (22:48 +0100)
committerChristoph Mallon <christoph.mallon@gmx.de>
Wed, 28 Nov 2012 22:42:47 +0000 (23:42 +0100)
ir/be/ia32/ia32_spec.pl
ir/be/scripts/generate_new_opcodes.pl

index d5d88ba..bedbeb1 100644 (file)
@@ -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",
index 7cd2679..c992ea2 100755 (executable)
@@ -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;