X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=ir%2Fbe%2Fia32%2Fia32_spec.pl;h=fcb14afdca4b22faa983e55624d621aa2bf4a4ba;hb=bfc8b05685e863c76fc0788bbc1d8ad97b8d699a;hp=a9394487ab2a770d16b221956906ae1e39c76d42;hpb=e3b765fcef0e337f4fe2e17d57d2fbaf1912ec79;p=libfirm diff --git a/ir/be/ia32/ia32_spec.pl b/ir/be/ia32/ia32_spec.pl index a9394487a..fcb14afdc 100644 --- a/ir/be/ia32/ia32_spec.pl +++ b/ir/be/ia32/ia32_spec.pl @@ -1,5 +1,3 @@ -# Creation: 2005/10/19 -# $Id$ # This is the specification for the ia32 assembler Firm-operations $arch = "ia32"; @@ -11,133 +9,66 @@ $mode_gp = "mode_Iu"; $mode_flags = "mode_Iu"; $mode_fpcw = "ia32_mode_fpcw"; -# register types: -$normal = 0; # no special type -$ignore = 1; # ignore (do not assign this register) -$arbitrary = 2; # emitter can choose an arbitrary register of this class -$virtual = 4; # the register is a virtual one -$state = 8; # register represents a state -# NOTE: Last entry of each class is the largest Firm-Mode a register can hold %reg_classes = ( gp => [ - { name => "edx" }, - { name => "ecx" }, - { name => "eax" }, - { name => "ebx" }, - { name => "esi" }, - { name => "edi" }, - { name => "ebp" }, - { name => "esp", type => $ignore }, - { name => "gp_NOREG", type => $ignore | $arbitrary | $virtual }, # we need a dummy register for NoReg nodes + { name => "edx", dwarf => 2 }, + { name => "ecx", dwarf => 1 }, + { name => "eax", dwarf => 0 }, + { name => "ebx", dwarf => 3 }, + { name => "esi", dwarf => 6 }, + { name => "edi", dwarf => 7 }, + { name => "ebp", dwarf => 5 }, + { name => "esp", dwarf => 4, type => "ignore" }, + { name => "gp_NOREG", type => "ignore | virtual" }, # we need a dummy register for NoReg nodes { mode => $mode_gp } ], mmx => [ - { name => "mm0", type => $ignore }, - { name => "mm1", type => $ignore }, - { name => "mm2", type => $ignore }, - { name => "mm3", type => $ignore }, - { name => "mm4", type => $ignore }, - { name => "mm5", type => $ignore }, - { name => "mm6", type => $ignore }, - { name => "mm7", type => $ignore }, + { name => "mm0", dwarf => 29, type => "ignore" }, + { name => "mm1", dwarf => 30, type => "ignore" }, + { name => "mm2", dwarf => 31, type => "ignore" }, + { name => "mm3", dwarf => 32, type => "ignore" }, + { name => "mm4", dwarf => 33, type => "ignore" }, + { name => "mm5", dwarf => 34, type => "ignore" }, + { name => "mm6", dwarf => 35, type => "ignore" }, + { name => "mm7", dwarf => 36, type => "ignore" }, { mode => $mode_mmx, flags => "manual_ra" } ], xmm => [ - { name => "xmm0" }, - { name => "xmm1" }, - { name => "xmm2" }, - { name => "xmm3" }, - { name => "xmm4" }, - { name => "xmm5" }, - { name => "xmm6" }, - { name => "xmm7" }, - { name => "xmm_NOREG", type => $ignore | $virtual }, # we need a dummy register for NoReg nodes + { name => "xmm0", dwarf => 21 }, + { name => "xmm1", dwarf => 22 }, + { name => "xmm2", dwarf => 23 }, + { name => "xmm3", dwarf => 24 }, + { name => "xmm4", dwarf => 25 }, + { name => "xmm5", dwarf => 26 }, + { name => "xmm6", dwarf => 27 }, + { name => "xmm7", dwarf => 28 }, + { name => "xmm_NOREG", type => "ignore | virtual" }, # we need a dummy register for NoReg nodes { mode => $mode_xmm } ], - vfp => [ - { name => "vf0" }, - { name => "vf1" }, - { name => "vf2" }, - { name => "vf3" }, - { name => "vf4" }, - { name => "vf5" }, - { name => "vf6" }, - { name => "vf7" }, - { name => "vfp_NOREG", type => $ignore | $arbitrary | $virtual }, # we need a dummy register for NoReg nodes + fp => [ + { name => "st0", realname => "st", dwarf => 11 }, + { name => "st1", realname => "st(1)", dwarf => 12 }, + { name => "st2", realname => "st(2)", dwarf => 13 }, + { name => "st3", realname => "st(3)", dwarf => 14 }, + { name => "st4", realname => "st(4)", dwarf => 15 }, + { name => "st5", realname => "st(5)", dwarf => 16 }, + { name => "st6", realname => "st(6)", dwarf => 17 }, + { name => "st7", realname => "st(7)", dwarf => 18 }, + { name => "fp_NOREG", type => "ignore | virtual" }, # we need a dummy register for NoReg nodes { mode => $mode_fp87 } ], - st => [ - { name => "st0", realname => "st", type => $ignore }, - { name => "st1", realname => "st(1)", type => $ignore }, - { name => "st2", realname => "st(2)", type => $ignore }, - { name => "st3", realname => "st(3)", type => $ignore }, - { name => "st4", realname => "st(4)", type => $ignore }, - { name => "st5", realname => "st(5)", type => $ignore }, - { name => "st6", realname => "st(6)", type => $ignore }, - { name => "st7", realname => "st(7)", type => $ignore }, - { mode => $mode_fp87, flags => "manual_ra" } - ], fp_cw => [ # the floating point control word - { name => "fpcw", type => $ignore | $state }, - { mode => $mode_fpcw, flags => "manual_ra|state" } + { name => "fpcw", dwarf => 37, type => "state" }, + { mode => $mode_fpcw, flags => "manual_ra | state" } ], flags => [ - { name => "eflags", type => 0 }, + { name => "eflags", dwarf => 9 }, { mode => "mode_Iu", flags => "manual_ra" } ], ); # %reg_classes -%cpu = ( - GP => [ 1, "GP_EAX", "GP_EBX", "GP_ECX", "GP_EDX", "GP_ESI", "GP_EDI", "GP_EBP" ], - SSE => [ 1, "SSE_XMM0", "SSE_XMM1", "SSE_XMM2", "SSE_XMM3", "SSE_XMM4", "SSE_XMM5", "SSE_XMM6", "SSE_XMM7" ], - VFP => [ 1, "VFP_VF0", "VFP_VF1", "VFP_VF2", "VFP_VF3", "VFP_VF4", "VFP_VF5", "VFP_VF6", "VFP_VF7" ], - BRANCH => [ 1, "BRANCH1", "BRANCH2" ], -); # %cpu - -%vliw = ( - bundle_size => 1, - bundels_per_cycle => 1 -); # vliw - -%emit_templates = ( - S0 => "${arch}_emit_source_register(node, 0);", - S1 => "${arch}_emit_source_register(node, 1);", - S2 => "${arch}_emit_source_register(node, 2);", - S3 => "${arch}_emit_source_register(node, 3);", - SB0 => "${arch}_emit_8bit_source_register_or_immediate(node, 0);", - SB1 => "${arch}_emit_8bit_source_register_or_immediate(node, 1);", - SB2 => "${arch}_emit_8bit_source_register_or_immediate(node, 2);", - SB3 => "${arch}_emit_8bit_source_register_or_immediate(node, 3);", - SH0 => "${arch}_emit_8bit_high_source_register(node, 0);", - SS0 => "${arch}_emit_16bit_source_register_or_immediate(node, 0);", - SI0 => "${arch}_emit_source_register_or_immediate(node, 0);", - SI1 => "${arch}_emit_source_register_or_immediate(node, 1);", - SI3 => "${arch}_emit_source_register_or_immediate(node, 3);", - D0 => "${arch}_emit_dest_register(node, 0);", - D1 => "${arch}_emit_dest_register(node, 1);", - DS0 => "${arch}_emit_dest_register_size(node, 0);", - DB0 => "${arch}_emit_8bit_dest_register(node, 0);", - X0 => "${arch}_emit_x87_register(node, 0);", - X1 => "${arch}_emit_x87_register(node, 1);", - EX => "${arch}_emit_extend_suffix(node);", - M => "${arch}_emit_mode_suffix(node);", - XM => "${arch}_emit_x87_mode_suffix(node);", - XXM => "${arch}_emit_xmm_mode_suffix(node);", - XSD => "${arch}_emit_xmm_mode_suffix_s(node);", - AM => "${arch}_emit_am(node);", - unop3 => "${arch}_emit_unop(node, n_ia32_unary_op);", - unop4 => "${arch}_emit_unop(node, n_ia32_binary_right);", - binop => "${arch}_emit_binop(node);", - x87_binop => "${arch}_emit_x87_binop(node);", - CMP3 => "${arch}_emit_cmp_suffix_node(node, 3);", -); - - - - -$default_op_attr_type = "ia32_op_attr_t"; -$default_attr_type = "ia32_attr_t"; -$default_copy_attr = "ia32_copy_attr"; +$default_attr_type = "ia32_attr_t"; +$default_copy_attr = "ia32_copy_attr"; sub ia32_custom_init_attr { my $constr = shift; @@ -172,31 +103,30 @@ $custom_init_attr_func = \&ia32_custom_init_attr; %init_attr = ( ia32_asm_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". - "\tinit_ia32_x87_attributes(res);". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_asm_attributes(res);", ia32_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);", + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);", ia32_call_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_call_attributes(res, pop, call_tp);", ia32_condcode_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_condcode_attributes(res, condition_code);", ia32_switch_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". - "\tinit_ia32_switch_attributes(res, default_pn);", + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". + "\tinit_ia32_switch_attributes(res, switch_table);", ia32_copyb_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_copyb_attributes(res, size);", ia32_immediate_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_immediate_attributes(res, symconst, symconst_sign, no_pic_adjust, offset);", ia32_x87_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_x87_attributes(res);", ia32_climbframe_attr_t => - "\tinit_ia32_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n". + "\tinit_ia32_attributes(res, irn_flags_, in_reqs, n_res);\n". "\tinit_ia32_climbframe_attributes(res, count);", ); @@ -205,21 +135,29 @@ $custom_init_attr_func = \&ia32_custom_init_attr; ia32_attr_t => "ia32_compare_nodes_attr", ia32_call_attr_t => "ia32_compare_call_attr", ia32_condcode_attr_t => "ia32_compare_condcode_attr", - ia32_switch_attr_t => "ia32_compare_switch_attr", ia32_copyb_attr_t => "ia32_compare_copyb_attr", + ia32_switch_attr_t => "ia32_compare_nodes_attr", ia32_immediate_attr_t => "ia32_compare_immediate_attr", ia32_x87_attr_t => "ia32_compare_x87_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", "FP_PC0", "FP_PC1", "FP_RC0", "FP_RC1", "FP_X" ]; +my %binop_flags_constructors = ( + "" => { + reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ], + out => [ "flags", "none", "none" ] }, + }, + "8bit" => { + reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ], + out => [ "flags", "none", "none" ] }, + } +); + %nodes = ( Immediate => { @@ -252,7 +190,6 @@ ProduceVal => { irn_flags => [ "rematerializable" ], reg_req => { out => [ "gp" ] }, emit => "", - units => [ ], latency => 0, mode => $mode_gp, cmp_attr => "return 1;", @@ -265,9 +202,8 @@ Add => { out => [ "in_r4 in_r5", "flags", "none" ] }, ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], - emit => '. add%M %binop', + emit => 'add%M %B', am => "source,binary", - units => [ "GP" ], latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -278,8 +214,7 @@ AddMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => ". add%M %SI3, %AM", - units => [ "GP" ], + emit => "add%M %#S3, %AM", latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -290,8 +225,7 @@ AddMem8Bit => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => ". add%M %SB3, %AM", - units => [ "GP" ], + emit => "add%M %#S3, %AM", latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -303,9 +237,8 @@ Adc => { out => [ "in_r4 in_r5", "flags", "none" ] }, ins => [ "base", "index", "mem", "left", "right", "eflags" ], outs => [ "res", "flags", "M" ], - emit => '. adc%M %binop', + emit => 'adc%M %B', am => "source,binary", - units => [ "GP" ], latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -330,11 +263,10 @@ Mul => { reg_req => { in => [ "gp", "gp", "none", "eax", "gp" ], out => [ "eax", "flags", "none", "edx" ] }, ins => [ "base", "index", "mem", "left", "right" ], - emit => '. mul%M %unop4', + emit => 'mul%M %AS4', outs => [ "res_low", "flags", "M", "res_high" ], am => "source,binary", latency => 10, - units => [ "GP" ], modified_flags => $status_flags }, @@ -356,7 +288,6 @@ IMul => { outs => [ "res", "flags", "M" ], am => "source,binary", latency => 5, - units => [ "GP" ], mode => $mode_gp, modified_flags => $status_flags }, @@ -367,11 +298,10 @@ IMul1OP => { reg_req => { in => [ "gp", "gp", "none", "eax", "gp" ], out => [ "eax", "flags", "none", "edx" ] }, ins => [ "base", "index", "mem", "left", "right" ], - emit => '. imul%M %unop4', + emit => 'imul%M %AS4', outs => [ "res_low", "flags", "M", "res_high" ], am => "source,binary", latency => 5, - units => [ "GP" ], modified_flags => $status_flags }, @@ -390,8 +320,7 @@ And => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. and%M %binop', - units => [ "GP" ], + emit => 'and%M %B', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -402,8 +331,7 @@ AndMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => '. and%M %SI3, %AM', - units => [ "GP" ], + emit => 'and%M %#S3, %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -414,8 +342,7 @@ AndMem8Bit => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => '. and%M %SB3, %AM', - units => [ "GP" ], + emit => 'and%M %#S3, %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -429,8 +356,7 @@ Or => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. or%M %binop', - units => [ "GP" ], + emit => 'or%M %B', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -441,8 +367,7 @@ OrMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => '. or%M %SI3, %AM', - units => [ "GP" ], + emit => 'or%M %#S3, %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -453,8 +378,7 @@ OrMem8Bit => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => '. or%M %SB3, %AM', - units => [ "GP" ], + emit => 'or%M %#S3, %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -468,8 +392,7 @@ Xor => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. xor%M %binop', - units => [ "GP" ], + emit => 'xor%M %B', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -480,8 +403,7 @@ Xor0 => { irn_flags => [ "rematerializable" ], reg_req => { out => [ "gp", "flags" ] }, outs => [ "res", "flags" ], - emit => ". xor%M %D0, %D0", - units => [ "GP" ], + emit => "xor%M %D0, %D0", latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -492,8 +414,7 @@ XorMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => '. xor%M %SI3, %AM', - units => [ "GP" ], + emit => 'xor%M %#S3, %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -504,8 +425,7 @@ XorMem8Bit => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "val" ], - emit => '. xor%M %SB3, %AM', - units => [ "GP" ], + emit => 'xor%M %#S3, %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -519,8 +439,7 @@ Sub => { ins => [ "base", "index", "mem", "minuend", "subtrahend" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. sub%M %binop', - units => [ "GP" ], + emit => 'sub%M %B', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -531,8 +450,7 @@ SubMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "subtrahend" ], - emit => '. sub%M %SI3, %AM', - units => [ "GP" ], + emit => 'sub%M %#S3, %AM', latency => 1, mode => 'mode_M', modified_flags => $status_flags @@ -543,8 +461,7 @@ SubMem8Bit => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "subtrahend" ], - emit => '. sub%M %SB3, %AM', - units => [ "GP" ], + emit => 'sub%M %#S3, %AM', latency => 1, mode => 'mode_M', modified_flags => $status_flags @@ -557,8 +474,7 @@ Sbb => { ins => [ "base", "index", "mem", "minuend", "subtrahend", "eflags" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. sbb%M %binop', - units => [ "GP" ], + emit => 'sbb%M %B', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -569,8 +485,7 @@ Sbb0 => { # irn_flags => [ "rematerializable" ], reg_req => { in => [ "flags" ], out => [ "gp", "flags" ] }, outs => [ "res", "flags" ], - emit => ". sbb%M %D0, %D0", - units => [ "GP" ], + emit => "sbb%M %D0, %D0", latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -589,30 +504,28 @@ l_Sbb => { }, IDiv => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "fragile", "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp", "eax", "edx" ], out => [ "eax", "flags", "none", "edx", "none", "none" ] }, ins => [ "base", "index", "mem", "divisor", "dividend_low", "dividend_high" ], outs => [ "div_res", "flags", "M", "mod_res", "X_regular", "X_except" ], am => "source,unary", - emit => ". idiv%M %unop3", + emit => "idiv%M %AS3", latency => 25, - units => [ "GP" ], modified_flags => $status_flags }, Div => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "fragile", "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp", "eax", "edx" ], out => [ "eax", "flags", "none", "edx", "none", "none" ] }, ins => [ "base", "index", "mem", "divisor", "dividend_low", "dividend_high" ], outs => [ "div_res", "flags", "M", "mod_res", "X_regular", "X_except" ], am => "source,unary", - emit => ". div%M %unop3", + emit => "div%M %AS3", latency => 25, - units => [ "GP" ], modified_flags => $status_flags }, @@ -622,8 +535,7 @@ Shl => { out => [ "in_r1 !in_r2", "flags" ] }, ins => [ "val", "count" ], outs => [ "res", "flags" ], - emit => '. shl%M %SB1, %S0', - units => [ "GP" ], + emit => 'shl%M % 1, mode => $mode_gp, modified_flags => $status_flags @@ -634,8 +546,7 @@ ShlMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "count" ], - emit => '. shl%M %SB3, %AM', - units => [ "GP" ], + emit => 'shl%M % 1, mode => "mode_M", modified_flags => $status_flags @@ -647,9 +558,8 @@ ShlD => { out => [ "in_r1 !in_r2 !in_r3", "flags" ] }, ins => [ "val_high", "val_low", "count" ], outs => [ "res", "flags" ], - emit => ". shld%M %SB2, %S1, %D0", + emit => "shld%M % 6, - units => [ "GP" ], mode => $mode_gp, modified_flags => $status_flags }, @@ -660,8 +570,7 @@ Shr => { out => [ "in_r1 !in_r2", "flags" ] }, ins => [ "val", "count" ], outs => [ "res", "flags" ], - emit => '. shr%M %SB1, %S0', - units => [ "GP" ], + emit => 'shr%M % $mode_gp, latency => 1, modified_flags => $status_flags @@ -672,8 +581,7 @@ ShrMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "count" ], - emit => '. shr%M %SB3, %AM', - units => [ "GP" ], + emit => 'shr%M % "mode_M", latency => 1, modified_flags => $status_flags @@ -685,9 +593,8 @@ ShrD => { out => [ "in_r1 !in_r2 !in_r3", "flags" ] }, ins => [ "val_high", "val_low", "count" ], outs => [ "res", "flags" ], - emit => ". shrd%M %SB2, %S1, %D0", + emit => "shrd%M % 6, - units => [ "GP" ], mode => $mode_gp, modified_flags => $status_flags }, @@ -698,8 +605,7 @@ Sar => { out => [ "in_r1 !in_r2", "flags" ] }, ins => [ "val", "count" ], outs => [ "res", "flags" ], - emit => '. sar%M %SB1, %S0', - units => [ "GP" ], + emit => 'sar%M % 1, mode => $mode_gp, modified_flags => $status_flags @@ -710,8 +616,7 @@ SarMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "count" ], - emit => '. sar%M %SB3, %AM', - units => [ "GP" ], + emit => 'sar%M % 1, mode => "mode_M", modified_flags => $status_flags @@ -723,8 +628,7 @@ Ror => { out => [ "in_r1 !in_r2", "flags" ] }, ins => [ "val", "count" ], outs => [ "res", "flags" ], - emit => '. ror%M %SB1, %S0', - units => [ "GP" ], + emit => 'ror%M % 1, mode => $mode_gp, modified_flags => $status_flags @@ -735,8 +639,7 @@ RorMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "count" ], - emit => '. ror%M %SB3, %AM', - units => [ "GP" ], + emit => 'ror%M % 1, mode => "mode_M", modified_flags => $status_flags @@ -748,8 +651,7 @@ Rol => { out => [ "in_r1 !in_r2", "flags" ] }, ins => [ "val", "count" ], outs => [ "res", "flags" ], - emit => '. rol%M %SB1, %S0', - units => [ "GP" ], + emit => 'rol%M % 1, mode => $mode_gp, modified_flags => $status_flags @@ -760,8 +662,7 @@ RolMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "count" ], - emit => '. rol%M %SB3, %AM', - units => [ "GP" ], + emit => 'rol%M % 1, mode => "mode_M", modified_flags => $status_flags @@ -771,10 +672,9 @@ Neg => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp" ], out => [ "in_r1", "flags" ] }, - emit => '. neg%M %S0', + emit => 'neg%M %S0', ins => [ "val" ], outs => [ "res", "flags" ], - units => [ "GP" ], latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -785,8 +685,7 @@ NegMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], - emit => '. neg%M %AM', - units => [ "GP" ], + emit => 'neg%M %AM', latency => 1, mode => "mode_M", modified_flags => $status_flags @@ -796,7 +695,6 @@ Minus64Bit => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "in_r1", "in_r2" ] }, outs => [ "low_res", "high_res" ], - units => [ "GP" ], latency => 3, modified_flags => $status_flags }, @@ -808,8 +706,7 @@ Inc => { out => [ "in_r1", "flags" ] }, ins => [ "val" ], outs => [ "res", "flags" ], - emit => '. inc%M %S0', - units => [ "GP" ], + emit => 'inc%M %S0', mode => $mode_gp, latency => 1, modified_flags => $status_flags_wo_cf @@ -820,8 +717,7 @@ IncMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], - emit => '. inc%M %AM', - units => [ "GP" ], + emit => 'inc%M %AM', mode => "mode_M", latency => 1, modified_flags => $status_flags_wo_cf @@ -833,8 +729,7 @@ Dec => { out => [ "in_r1", "flags" ] }, ins => [ "val" ], outs => [ "res", "flags" ], - emit => '. dec%M %S0', - units => [ "GP" ], + emit => 'dec%M %S0', mode => $mode_gp, latency => 1, modified_flags => $status_flags_wo_cf @@ -845,8 +740,7 @@ DecMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], - emit => '. dec%M %AM', - units => [ "GP" ], + emit => 'dec%M %AM', mode => "mode_M", latency => 1, modified_flags => $status_flags_wo_cf @@ -858,8 +752,7 @@ Not => { out => [ "in_r1" ] }, ins => [ "val" ], outs => [ "res" ], - emit => '. not%M %S0', - units => [ "GP" ], + emit => 'not%M %S0', latency => 1, mode => $mode_gp, # no flags modified @@ -870,8 +763,7 @@ NotMem => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], - emit => '. not%M %AM', - units => [ "GP" ], + emit => 'not%M %AM', latency => 1, mode => "mode_M", # no flags modified @@ -879,8 +771,7 @@ NotMem => { Cmc => { reg_req => { in => [ "flags" ], out => [ "flags" ] }, - emit => '.cmc', - units => [ "GP" ], + emit => 'cmc', latency => 1, mode => $mode_flags, modified_flags => $status_flags @@ -888,8 +779,7 @@ Cmc => { Stc => { reg_req => { out => [ "flags" ] }, - emit => '.stc', - units => [ "GP" ], + emit => 'stc', latency => 1, mode => $mode_flags, modified_flags => $status_flags @@ -898,33 +788,14 @@ Stc => { Cmp => { irn_flags => [ "rematerializable" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ], - out => [ "flags", "none", "none" ] }, - ins => [ "base", "index", "mem", "left", "right" ], - outs => [ "eflags", "unused", "M" ], - am => "source,binary", - emit => '. cmp%M %binop', - attr => "bool ins_permuted", - init_attr => "attr->data.ins_permuted = ins_permuted;", - latency => 1, - units => [ "GP" ], - mode => $mode_flags, - modified_flags => $status_flags -}, - -Cmp8Bit => { - irn_flags => [ "rematerializable" ], - state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] , - out => [ "flags", "none", "none" ] }, + constructors => \%binop_flags_constructors, ins => [ "base", "index", "mem", "left", "right" ], outs => [ "eflags", "unused", "M" ], am => "source,binary", - emit => '. cmpb %binop', + emit => 'cmp%M %B', attr => "bool ins_permuted", init_attr => "attr->data.ins_permuted = ins_permuted;", latency => 1, - units => [ "GP" ], mode => $mode_flags, modified_flags => $status_flags }, @@ -934,10 +805,9 @@ XorHighLow => { state => "exc_pinned", reg_req => { in => [ "eax ebx ecx edx" ], out => [ "in_r1", "flags" ] }, - emit => '. xorb %SH0, %SB0', + emit => 'xorb %>S0, % [ "value" ], outs => [ "res", "flags" ], - units => [ "GP" ], latency => 1, mode => $mode_gp, modified_flags => $status_flags, @@ -946,33 +816,14 @@ XorHighLow => { Test => { irn_flags => [ "rematerializable" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ] , - out => [ "flags", "none", "none" ] }, - ins => [ "base", "index", "mem", "left", "right" ], - outs => [ "eflags", "unused", "M" ], - am => "source,binary", - emit => '. test%M %binop', - attr => "bool ins_permuted", - init_attr => "attr->data.ins_permuted = ins_permuted;", - latency => 1, - units => [ "GP" ], - mode => $mode_flags, - modified_flags => $status_flags -}, - -Test8Bit => { - irn_flags => [ "rematerializable" ], - state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] , - out => [ "flags", "none", "none" ] }, + constructors => \%binop_flags_constructors, ins => [ "base", "index", "mem", "left", "right" ], outs => [ "eflags", "unused", "M" ], am => "source,binary", - emit => '. testb %binop', + emit => 'test%M %B', attr => "bool ins_permuted", init_attr => "attr->data.ins_permuted = ins_permuted;", latency => 1, - units => [ "GP" ], mode => $mode_flags, modified_flags => $status_flags }, @@ -992,7 +843,6 @@ Setcc => { . "\t\t/* attr->latency = 3; */\n" . "\t}\n", latency => 1, - units => [ "GP" ], mode => $mode_gp, }, @@ -1004,9 +854,8 @@ SetccMem => { attr_type => "ia32_condcode_attr_t", attr => "ia32_condition_code_t condition_code", init_attr => "set_ia32_ls_mode(res, mode_Bu);\n", - emit => '. set%CMP3 %AM', + emit => 'set%P3 %AM', latency => 1, - units => [ "GP" ], mode => 'mode_M', }, @@ -1023,33 +872,29 @@ CMovcc => { attr_type => "ia32_condcode_attr_t", attr => "ia32_condition_code_t condition_code", latency => 1, - units => [ "GP" ], mode => $mode_gp, }, Jcc => { state => "pinned", - op_flags => [ "labeled", "cfopcode", "forking" ], + op_flags => [ "cfopcode", "forking" ], reg_req => { in => [ "eflags" ], out => [ "none", "none" ] }, ins => [ "eflags" ], outs => [ "false", "true" ], attr_type => "ia32_condcode_attr_t", attr => "ia32_condition_code_t condition_code", latency => 2, - units => [ "BRANCH" ], }, SwitchJmp => { state => "pinned", - op_flags => [ "labeled", "cfopcode", "forking" ], + op_flags => [ "cfopcode", "forking" ], reg_req => { in => [ "gp", "gp" ] }, ins => [ "base", "index" ], - mode => "mode_T", + out_arity => "variable", attr_type => "ia32_switch_attr_t", - attr => "long default_pn", + attr => "const ir_switch_table *switch_table", latency => 2, - units => [ "BRANCH" ], - init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements }, Jmp => { @@ -1058,28 +903,27 @@ Jmp => { op_flags => [ "cfopcode" ], reg_req => { out => [ "none" ] }, latency => 1, - units => [ "BRANCH" ], mode => "mode_X", }, IJmp => { state => "pinned", op_flags => [ "cfopcode", "unknown_jump" ], - reg_req => { in => [ "gp", "gp", "none", "gp" ] }, + reg_req => { in => [ "gp", "gp", "none", "gp" ], + out => [ "none", "flags", "none" ] }, ins => [ "base", "index", "mem", "target" ], + outs => [ "jmp", "flags", "M" ], am => "source,unary", - emit => '. jmp *%unop3', + emit => 'jmp %*AS3', latency => 1, - units => [ "BRANCH" ], mode => "mode_X", - init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements }, Const => { op_flags => [ "constlike" ], irn_flags => [ "rematerializable" ], reg_req => { out => [ "gp" ] }, - units => [ "GP" ], + emit => "movl %I, %D0", attr => "ir_entity *symconst, int symconst_sign, int no_pic_adjust, long offset", attr_type => "ia32_immediate_attr_t", latency => 1, @@ -1098,7 +942,6 @@ Unknown => { GetEIP => { op_flags => [ "constlike" ], reg_req => { out => [ "gp" ] }, - units => [ "GP" ], latency => 5, mode => $mode_gp, modified_flags => $status_flags, @@ -1106,22 +949,18 @@ GetEIP => { NoReg_GP => { state => "pinned", - op_flags => [ "constlike", "dump_noblock", "dump_noinput" ], + op_flags => [ "constlike", "dump_noblock" ], irn_flags => [ "not_scheduled" ], reg_req => { out => [ "gp_NOREG:I" ] }, - units => [], - emit => "", latency => 0, mode => $mode_gp }, -NoReg_VFP => { +NoReg_FP => { state => "pinned", - op_flags => [ "constlike", "dump_noblock", "dump_noinput" ], + op_flags => [ "constlike", "dump_noblock" ], irn_flags => [ "not_scheduled" ], - reg_req => { out => [ "vfp_NOREG:I" ] }, - units => [], - emit => "", + reg_req => { out => [ "fp_NOREG:I" ] }, mode => $mode_fp87, latency => 0, attr_type => "ia32_x87_attr_t", @@ -1129,11 +968,9 @@ NoReg_VFP => { NoReg_XMM => { state => "pinned", - op_flags => [ "constlike", "dump_noblock", "dump_noinput" ], + op_flags => [ "constlike", "dump_noblock" ], irn_flags => [ "not_scheduled" ], reg_req => { out => [ "xmm_NOREG:I" ] }, - units => [], - emit => "", latency => 0, mode => $mode_xmm, }, @@ -1142,38 +979,35 @@ ChangeCW => { state => "pinned", op_flags => [ "constlike" ], irn_flags => [ "not_scheduled" ], - reg_req => { out => [ "fpcw:I" ] }, + reg_req => { out => [ "fpcw" ] }, mode => $mode_fpcw, latency => 3, - units => [ "GP" ], modified_flags => $fpcw_flags }, FldCW => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "pinned", - reg_req => { in => [ "gp", "gp", "none" ], out => [ "fpcw:I" ] }, + reg_req => { in => [ "gp", "gp", "none" ], out => [ "fpcw" ] }, ins => [ "base", "index", "mem" ], latency => 5, - emit => ". fldcw %AM", + emit => "fldcw %AM", mode => $mode_fpcw, - units => [ "GP" ], modified_flags => $fpcw_flags }, FnstCW => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "pinned", reg_req => { in => [ "gp", "gp", "none", "fp_cw" ], out => [ "none" ] }, ins => [ "base", "index", "mem", "fpcw" ], latency => 5, - emit => ". fnstcw %AM", + emit => "fnstcw %AM", mode => "mode_M", - units => [ "GP" ], }, FnstCWNOP => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "pinned", reg_req => { in => [ "fp_cw" ], out => [ "none" ] }, ins => [ "fpcw" ], @@ -1186,10 +1020,9 @@ Cltd => { # we should not rematrialize this node. It has very strict constraints. reg_req => { in => [ "eax", "edx" ], out => [ "edx" ] }, ins => [ "val", "clobbered" ], - emit => '. cltd', + emit => 'cltd', latency => 1, mode => $mode_gp, - units => [ "GP" ], }, # Load / Store @@ -1198,48 +1031,44 @@ Cltd => { # lateny of 0 for load is correct Load => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "gp", "none", "none", "none", "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "res", "unused", "M", "X_regular", "X_except" ], latency => 0, - emit => ". mov%EX%.l %AM, %D0", - units => [ "GP" ], + emit => "mov%#Ml %AM, %D0", }, Store => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "M", "X_regular", "X_except" ], - emit => '. mov%M %SI3, %AM', + emit => 'mov%M %#S3, %AM', latency => 2, - units => [ "GP" ], }, Store8Bit => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => ["none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "M", "X_regular", "X_except" ], - emit => '. mov%M %SB3, %AM', + emit => 'mov%M %#S3, %AM', latency => 2, - units => [ "GP" ], }, Lea => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, ins => [ "base", "index" ], - emit => '. leal %AM, %D0', + emit => 'leal %AM, %D0', latency => 2, - units => [ "GP" ], mode => $mode_gp, # lea doesn't modify the flags, but setting this seems advantageous since it # increases chances that the Lea is transformed back to an Add @@ -1250,11 +1079,10 @@ Push => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp", "esp" ], out => [ "esp:I|S", "none" ] }, ins => [ "base", "index", "mem", "val", "stack" ], - emit => '. push%M %unop3', + emit => 'push%M %AS3', outs => [ "stack", "M" ], am => "source,unary", latency => 2, - units => [ "GP" ], }, PushEax => { @@ -1262,9 +1090,8 @@ PushEax => { reg_req => { in => [ "esp" ], out => [ "esp:I|S" ] }, ins => [ "stack" ], outs => [ "stack" ], - emit => '. pushl %%eax', + emit => 'pushl %%eax', latency => 2, - units => [ "GP" ], mode => $mode_gp, }, @@ -1273,9 +1100,8 @@ Pop => { reg_req => { in => [ "none", "esp" ], out => [ "gp", "none", "none", "esp:I|S" ] }, ins => [ "mem", "stack" ], outs => [ "res", "M", "unused", "stack" ], - emit => '. pop%M %D0', + emit => 'pop%M %D0', latency => 3, # Pop is more expensive than Push on Athlon - units => [ "GP" ], }, PopEbp => { @@ -1283,9 +1109,8 @@ PopEbp => { reg_req => { in => [ "none", "esp" ], out => [ "ebp:I", "none", "none", "esp:I|S" ] }, ins => [ "mem", "stack" ], outs => [ "res", "M", "unused", "stack" ], - emit => '. pop%M %D0', + emit => 'pop%M %D0', latency => 3, # Pop is more expensive than Push on Athlon - units => [ "GP" ], }, CopyEbpEsp => { @@ -1293,9 +1118,8 @@ CopyEbpEsp => { reg_req => { in => [ "ebp" ], out => [ "esp:I|S" ] }, ins => [ "ebp" ], outs => [ "esp" ], - emit => '. movl %S0, %D0', + emit => 'movl %S0, %D0', latency => 1, - units => [ "GP" ], mode => $mode_gp, }, @@ -1304,25 +1128,22 @@ PopMem => { reg_req => { in => [ "gp", "gp", "none", "esp" ], out => [ "none", "none", "none", "esp:I|S" ] }, ins => [ "base", "index", "mem", "stack" ], outs => [ "unused0", "M", "unused1", "stack" ], - emit => '. pop%M %AM', + emit => 'pop%M %AM', latency => 3, # Pop is more expensive than Push on Athlon - units => [ "GP" ], }, Enter => { reg_req => { in => [ "esp" ], out => [ "ebp", "esp:I|S", "none" ] }, - emit => '. enter', + emit => 'enter', outs => [ "frame", "stack", "M" ], latency => 15, - units => [ "GP" ], }, Leave => { reg_req => { in => [ "ebp" ], out => [ "ebp:I", "esp:I|S" ] }, - emit => '. leave', + emit => 'leave', outs => [ "frame", "stack" ], latency => 3, - units => [ "GP" ], state => "exc_pinned", }, @@ -1331,10 +1152,9 @@ AddSP => { reg_req => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp:I|S", "none" ] }, ins => [ "base", "index", "mem", "stack", "size" ], am => "source,binary", - emit => '. addl %binop', + emit => 'addl %B', latency => 1, outs => [ "stack", "M" ], - units => [ "GP" ], modified_flags => $status_flags }, @@ -1343,11 +1163,10 @@ SubSP => { reg_req => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp:I|S", "gp", "none" ] }, ins => [ "base", "index", "mem", "stack", "size" ], am => "source,binary", - emit => ". subl %binop\n". - ". movl %%esp, %D1", + emit => "subl %B\n". + "movl %%esp, %D1", latency => 2, outs => [ "stack", "addr", "M" ], - units => [ "GP" ], modified_flags => $status_flags }, @@ -1355,15 +1174,14 @@ RepPrefix => { op_flags => [ "keep" ], state => "pinned", mode => "mode_M", - emit => ". rep", + emit => "rep", latency => 0, }, LdTls => { irn_flags => [ "rematerializable" ], reg_req => { out => [ "gp" ] }, - units => [ "GP" ], - emit => ". movl %%gs:0, %D0", + emit => "movl %%gs:0, %D0", mode => $mode_gp, latency => 1, }, @@ -1376,8 +1194,7 @@ Bt => { state => "exc_pinned", reg_req => { in => [ "gp", "gp" ], out => [ "flags" ] }, ins => [ "left", "right" ], - emit => '. bt%M %S1, %S0', - units => [ "GP" ], + emit => 'bt%M %S1, %S0', latency => 1, mode => $mode_flags, modified_flags => $status_flags # only CF is set, but the other flags are undefined @@ -1391,8 +1208,7 @@ Bsf => { ins => [ "base", "index", "mem", "operand" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. bsf%M %unop3, %D0', - units => [ "GP" ], + emit => 'bsf%M %AS3, %D0', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -1406,8 +1222,7 @@ Bsr => { ins => [ "base", "index", "mem", "operand" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. bsr%M %unop3, %D0', - units => [ "GP" ], + emit => 'bsr%M %AS3, %D0', latency => 1, mode => $mode_gp, modified_flags => $status_flags @@ -1424,26 +1239,25 @@ Popcnt => { ins => [ "base", "index", "mem", "operand" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. popcnt%M %unop3, %D0', - units => [ "GP" ], + emit => 'popcnt%M %AS3, %D0', latency => 1, mode => $mode_gp, modified_flags => $status_flags }, Call => { - op_flags => [ "fragile" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp", "esp", "fpcw", "eax", "ecx", "edx" ], - out => [ "esp:I|S", "fpcw:I", "none", "eax", "ecx", "edx", "vf0", "vf1", "vf2", "vf3", "vf4", "vf5", "vf6", "vf7", "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7", "none", "none" ] + out => [ "esp:I|S", "fpcw", "none", "eax", "ecx", "edx", "st0", "st1", "st2", "st3", "st4", "st5", "st6", "st7", "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7", "none", "none" ] }, ins => [ "base", "index", "mem", "addr", "stack", "fpcw", "eax", "ecx", "edx" ], - outs => [ "stack", "fpcw", "M", "eax", "ecx", "edx", "vf0", "vf1", "vf2", "vf3", "vf4", "vf5", "vf6", "vf7", "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7", "X_regular", "X_except" ], + outs => [ "stack", "fpcw", "M", "eax", "ecx", "edx", "st0", "st1", "st2", "st3", "st4", "st5", "st6", "st7", "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7", "X_regular", "X_except" ], + emit => "call %*AS3", attr_type => "ia32_call_attr_t", attr => "unsigned pop, ir_type *call_tp", am => "source,unary", - units => [ "BRANCH" ], latency => 4, # random number modified_flags => $status_flags }, @@ -1460,7 +1274,6 @@ ClimbFrame => { latency => 4, # random number attr_type => "ia32_climbframe_attr_t", attr => "unsigned count", - units => [ "GP" ], mode => $mode_gp }, @@ -1471,9 +1284,9 @@ Bswap => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp" ], out => [ "in_r1" ] }, - emit => '. bswap%M %S0', + outs => [ "res" ], + emit => 'bswap%M %S0', ins => [ "val" ], - units => [ "GP" ], latency => 1, mode => $mode_gp, }, @@ -1485,9 +1298,8 @@ Bswap16 => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "eax ebx ecx edx" ], out => [ "in_r1" ] }, - emit => '. xchg %SB0, %SH0', + emit => 'xchg %S0', ins => [ "val" ], - units => [ "GP" ], latency => 1, mode => $mode_gp, }, @@ -1500,8 +1312,7 @@ Breakpoint => { reg_req => { in => [ "none" ], out => [ "none" ] }, ins => [ "mem" ], latency => 0, - emit => ". int3", - units => [ "GP" ], + emit => "int3", mode => mode_M, }, @@ -1513,8 +1324,7 @@ UD2 => { reg_req => { in => [ "none" ], out => [ "none" ] }, ins => [ "mem" ], latency => 0, - emit => ". .value 0x0b0f", - units => [ "GP" ], + emit => "ud2", mode => mode_M, }, @@ -1526,8 +1336,7 @@ Outport => { state => "pinned", reg_req => { in => [ "edx", "eax", "none" ], out => [ "none" ] }, ins => [ "port", "value", "mem" ], - emit => '. out%M %SS0, %SI1', - units => [ "GP" ], + emit => 'out%M %^S0, %#S1', latency => 1, mode => mode_M, modified_flags => $status_flags @@ -1542,8 +1351,7 @@ Inport => { reg_req => { in => [ "edx", "none" ], out => [ "eax", "none" ] }, ins => [ "port", "mem" ], outs => [ "res", "M" ], - emit => '. in%M %DS0, %SS0', - units => [ "GP" ], + emit => 'in%M %#D0, %^S0', latency => 1, mode => mode_T, modified_flags => $status_flags @@ -1553,81 +1361,74 @@ Inport => { # Intel style prefetching # Prefetch0 => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "M" ], latency => 0, - emit => ". prefetcht0 %AM", - units => [ "GP" ], + emit => "prefetcht0 %AM", }, Prefetch1 => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "M" ], latency => 0, - emit => ". prefetcht1 %AM", - units => [ "GP" ], + emit => "prefetcht1 %AM", }, Prefetch2 => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "M" ], latency => 0, - emit => ". prefetcht2 %AM", - units => [ "GP" ], + emit => "prefetcht2 %AM", }, PrefetchNTA => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "M" ], latency => 0, - emit => ". prefetchnta %AM", - units => [ "GP" ], + emit => "prefetchnta %AM", }, # # 3DNow! prefetch instructions # Prefetch => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "M" ], latency => 0, - emit => ". prefetch %AM", - units => [ "GP" ], + emit => "prefetch %AM", }, PrefetchW => { - op_flags => [ "labeled" ], + op_flags => [ "uses_memory" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "M" ], latency => 0, - emit => ". prefetchw %AM", - units => [ "GP" ], + emit => "prefetchw %AM", }, # produces a 0/+0.0 xZero => { irn_flags => [ "rematerializable" ], reg_req => { out => [ "xmm" ] }, - emit => '. xorp%XSD %D0, %D0', + emit => 'xorp%FX %D0, %D0', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1643,9 +1444,8 @@ xUnknown => { xPzero => { irn_flags => [ "rematerializable" ], reg_req => { out => [ "xmm" ] }, - emit => '. pxor %D0, %D0', + emit => 'pxor %D0, %D0', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1653,9 +1453,8 @@ xPzero => { xAllOnes => { irn_flags => [ "rematerializable" ], reg_req => { out => [ "xmm" ] }, - emit => '. pcmpeqb %D0, %D0', + emit => 'pcmpeqb %D0, %D0', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1663,9 +1462,8 @@ xAllOnes => { xPslld => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] }, - emit => '. pslld %SI1, %D0', + emit => 'pslld %#S1, %D0', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1673,9 +1471,8 @@ xPslld => { xPsllq => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] }, - emit => '. psllq %SI1, %D0', + emit => 'psllq %#S1, %D0', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1683,9 +1480,8 @@ xPsllq => { xPsrld => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] }, - emit => '. psrld %SI1, %D0', + emit => 'psrld %#S1, %D0', latency => 1, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1693,9 +1489,8 @@ xPsrld => { xMovd => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp" ], out => [ "xmm" ] }, - emit => '. movd %S0, %D0', + emit => 'movd %S0, %D0', latency => 1, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1707,9 +1502,8 @@ xAdd => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. add%XXM %binop', + emit => 'adds%FX %B', latency => 4, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1721,9 +1515,8 @@ xMul => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. mul%XXM %binop', + emit => 'muls%FX %B', latency => 4, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1735,9 +1528,8 @@ xMax => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. max%XXM %binop', + emit => 'maxs%FX %B', latency => 2, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1749,9 +1541,8 @@ xMin => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. min%XXM %binop', + emit => 'mins%FX %B', latency => 2, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1763,9 +1554,8 @@ xAnd => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. andp%XSD %binop', + emit => 'andp%FX %B', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1777,9 +1567,8 @@ xOr => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. orp%XSD %binop', + emit => 'orp%FX %B', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1791,9 +1580,8 @@ xXor => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. xorp%XSD %binop', + emit => 'xorp%FX %B', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1805,9 +1593,8 @@ xAndNot => { ins => [ "base", "index", "mem", "left", "right" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. andnp%XSD %binop', + emit => 'andnp%FX %B', latency => 3, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1819,9 +1606,8 @@ xSub => { ins => [ "base", "index", "mem", "minuend", "subtrahend" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. sub%XXM %binop', + emit => 'subs%FX %B', latency => 4, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1833,9 +1619,8 @@ xDiv => { ins => [ "base", "index", "mem", "dividend", "divisor" ], outs => [ "res", "flags", "M" ], am => "source,binary", - emit => '. div%XXM %binop', + emit => 'divs%FX %B', latency => 16, - units => [ "SSE" ], }, Ucomi => { @@ -1848,72 +1633,64 @@ Ucomi => { am => "source,binary", attr => "bool ins_permuted", init_attr => "attr->data.ins_permuted = ins_permuted;", - emit => ' .ucomi%XXM %binop', + emit => 'ucomis%FX %B', latency => 3, - units => [ "SSE" ], mode => $mode_flags, modified_flags => 1, }, xLoad => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none", "none", "none", "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "res", "unused", "M", "X_regular", "X_except" ], - emit => '. mov%XXM %AM, %D0', + emit => 'movs%FX %AM, %D0', attr => "ir_mode *load_mode", init_attr => "attr->ls_mode = load_mode;", latency => 0, - units => [ "SSE" ], }, xStore => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "M", "X_regular", "X_except" ], - emit => '. mov%XXM %S3, %AM', + emit => 'movs%FX %S3, %AM', latency => 0, - units => [ "SSE" ], }, xStoreSimple => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "M", "X_regular", "X_except" ], - emit => '. mov%XXM %S3, %AM', + emit => 'movs%FX %S3, %AM', latency => 0, - units => [ "SSE" ], }, CvtSI2SS => { - op_flags => [ "labeled" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] }, ins => [ "base", "index", "mem", "val" ], am => "source,unary", - emit => '. cvtsi2ss %unop3, %D0', + emit => 'cvtsi2ss %AS3, %D0', latency => 2, - units => [ "SSE" ], mode => $mode_xmm }, CvtSI2SD => { - op_flags => [ "labeled" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] }, ins => [ "base", "index", "mem", "val" ], am => "source,unary", - emit => '. cvtsi2sd %unop3, %D0', + emit => 'cvtsi2sd %AS3, %D0', latency => 2, - units => [ "SSE" ], mode => $mode_xmm }, @@ -1932,7 +1709,7 @@ l_FloattoLL => { }, CopyB => { - op_flags => [ "fragile" ], + op_flags => [ "uses_memory", "fragile" ], state => "pinned", reg_req => { in => [ "edi", "esi", "ecx", "none" ], out => [ "edi", "esi", "ecx", "none", "none", "none" ] }, @@ -1940,14 +1717,13 @@ CopyB => { outs => [ "dest", "source", "count", "M", "X_regular", "X_except" ], attr_type => "ia32_copyb_attr_t", attr => "unsigned size", - units => [ "GP" ], latency => 3, # we don't care about this flag, so no need to mark this node # modified_flags => [ "DF" ] }, CopyB_i => { - op_flags => [ "fragile" ], + op_flags => [ "uses_memory", "fragile" ], state => "pinned", reg_req => { in => [ "edi", "esi", "none" ], out => [ "edi", "esi", "none", "none", "none" ] }, @@ -1955,7 +1731,6 @@ CopyB_i => { outs => [ "dest", "source", "M", "X_regular", "X_except" ], attr_type => "ia32_copyb_attr_t", attr => "unsigned size", - units => [ "GP" ], latency => 3, # we don't care about this flag, so no need to mark this node # modified_flags => [ "DF" ] @@ -1966,21 +1741,20 @@ Cwtl => { reg_req => { in => [ "eax" ], out => [ "eax" ] }, ins => [ "val" ], outs => [ "res" ], - emit => '. cwtl', - units => [ "GP" ], + emit => 'cwtl', latency => 1, mode => $mode_gp, }, Conv_I2I => { - op_flags => [ "fragile" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "gp", "none", "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "res", "flags", "M", "X_regular", "X_except" ], + emit => "mov%#Ml %#AS3, %D0", am => "source,unary", - units => [ "GP" ], latency => 1, attr => "ir_mode *smaller_mode", init_attr => "attr->ls_mode = smaller_mode;", @@ -1988,14 +1762,14 @@ Conv_I2I => { }, Conv_I2I8Bit => { - op_flags => [ "fragile" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "gp", "none", "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "res", "flags", "M", "X_regular", "X_except" ], + emit => "mov%#Ml %#AS3, %D0", am => "source,unary", - units => [ "GP" ], latency => 1, attr => "ir_mode *smaller_mode", init_attr => "attr->ls_mode = smaller_mode;", @@ -2008,7 +1782,6 @@ Conv_I2FP => { ins => [ "base", "index", "mem", "val" ], am => "source,unary", latency => 10, - units => [ "SSE" ], mode => $mode_xmm, }, @@ -2018,7 +1791,6 @@ Conv_FP2I => { ins => [ "base", "index", "mem", "val" ], am => "source,unary", latency => 10, - units => [ "SSE" ], mode => $mode_gp, }, @@ -2028,269 +1800,286 @@ Conv_FP2FP => { ins => [ "base", "index", "mem", "val" ], am => "source,unary", latency => 8, - units => [ "SSE" ], mode => $mode_xmm, }, # rematerialisation disabled for all float nodes for now, because the fpcw # handler runs before spilling and we might end up with wrong fpcw then -vfadd => { +fadd => { # irn_flags => [ "rematerializable" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], - out => [ "vfp", "none", "none" ] }, + reg_req => { in => [ "gp", "gp", "none", "fp", "fp", "fpcw" ], + out => [ "fp", "none", "none" ] }, ins => [ "base", "index", "mem", "left", "right", "fpcw" ], outs => [ "res", "dummy", "M" ], + emit => 'fadd%FP%FM %AF', am => "source,binary", latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfmul => { +fmul => { # irn_flags => [ "rematerializable" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], - out => [ "vfp", "none", "none" ] }, + reg_req => { in => [ "gp", "gp", "none", "fp", "fp", "fpcw" ], + out => [ "fp", "none", "none" ] }, ins => [ "base", "index", "mem", "left", "right", "fpcw" ], outs => [ "res", "dummy", "M" ], + emit => 'fmul%FP%FM %AF', am => "source,binary", latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfsub => { +fsub => { # irn_flags => [ "rematerializable" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], - out => [ "vfp", "none", "none" ] }, + reg_req => { in => [ "gp", "gp", "none", "fp", "fp", "fpcw" ], + out => [ "fp", "none", "none" ] }, ins => [ "base", "index", "mem", "minuend", "subtrahend", "fpcw" ], outs => [ "res", "dummy", "M" ], + emit => 'fsub%FR%FP%FM %AF', am => "source,binary", latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfdiv => { +fdiv => { state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], - out => [ "vfp", "none", "none" ] }, + reg_req => { in => [ "gp", "gp", "none", "fp", "fp", "fpcw" ], + out => [ "fp", "none", "none" ] }, ins => [ "base", "index", "mem", "dividend", "divisor", "fpcw" ], outs => [ "res", "dummy", "M" ], + emit => 'fdiv%FR%FP%FM %AF', am => "source,binary", latency => 20, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", }, -vfprem => { - reg_req => { in => [ "vfp", "vfp", "fpcw" ], out => [ "vfp" ] }, +fprem => { + reg_req => { in => [ "fp", "fp", "fpcw" ], out => [ "fp" ] }, ins => [ "left", "right", "fpcw" ], + emit => 'fprem1', latency => 20, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfabs => { +fabs => { irn_flags => [ "rematerializable" ], - reg_req => { in => [ "vfp"], out => [ "vfp" ] }, + reg_req => { in => [ "fp"], out => [ "fp" ] }, ins => [ "value" ], + emit => 'fabs', latency => 2, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfchs => { +fchs => { irn_flags => [ "rematerializable" ], - reg_req => { in => [ "vfp"], out => [ "vfp" ] }, + reg_req => { in => [ "fp"], out => [ "fp" ] }, + emit => 'fchs', ins => [ "value" ], latency => 2, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfld => { +fld => { irn_flags => [ "rematerializable" ], - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], - out => [ "vfp", "none", "none", "none", "none" ] }, + out => [ "fp", "none", "none", "none", "none" ] }, ins => [ "base", "index", "mem" ], outs => [ "res", "unused", "M", "X_regular", "X_except" ], + emit => 'fld%FM %AM', attr => "ir_mode *load_mode", init_attr => "attr->attr.ls_mode = load_mode;", latency => 2, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", }, -vfst => { +fst => { irn_flags => [ "rematerializable" ], - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp" ], + reg_req => { in => [ "gp", "gp", "none", "fp" ], out => [ "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "M", "X_regular", "X_except" ], + emit => 'fst%FP%FM %AM', attr => "ir_mode *store_mode", init_attr => "attr->attr.ls_mode = store_mode;", latency => 2, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", }, -vfild => { +fild => { state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], - out => [ "vfp", "none", "none" ] }, + out => [ "fp", "none", "none" ] }, outs => [ "res", "unused", "M" ], ins => [ "base", "index", "mem" ], + emit => 'fild%FM %AM', latency => 4, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", }, -vfist => { - op_flags => [ "fragile" ], +fist => { + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp", "fpcw" ], + reg_req => { in => [ "gp", "gp", "none", "fp", "fpcw" ], out => [ "none", "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val", "fpcw" ], outs => [ "dummy", "M", "X_regular", "X_except" ], + emit => 'fist%FP%FM %AM', latency => 4, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", }, # SSE3 fisttp instruction -vfisttp => { - op_flags => [ "fragile" ], +fisttp => { + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", - reg_req => { in => [ "gp", "gp", "none", "vfp" ], + reg_req => { in => [ "gp", "gp", "none", "fp" ], out => [ "in_r4", "none", "none", "none" ]}, ins => [ "base", "index", "mem", "val" ], outs => [ "res", "M", "X_regular", "X_except" ], + emit => 'fisttp%FM %AM', latency => 4, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", }, -vfldz => { +fldz => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, outs => [ "res" ], + emit => 'fldz', latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfld1 => { +fld1 => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, outs => [ "res" ], + emit => 'fld1', latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfldpi => { +fldpi => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, outs => [ "res" ], + emit => 'fldpi', latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfldln2 => { +fldln2 => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, outs => [ "res" ], + emit => 'fldln2', latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfldlg2 => { +fldlg2 => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, + emit => 'fldlg2', outs => [ "res" ], latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfldl2t => { +fldl2t => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, + emit => 'fldll2t', outs => [ "res" ], latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vfldl2e => { +fldl2e => { irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, + reg_req => { out => [ "fp" ] }, + emit => 'fldl2e', outs => [ "res" ], latency => 4, - units => [ "VFP" ], mode => $mode_fp87, attr_type => "ia32_x87_attr_t", }, -vFucomFnstsw => { +FucomFnstsw => { # we can't allow to rematerialize this node so we don't # accidently produce Phi(Fucom, Fucom(ins_permuted)) # irn_flags => [ "rematerializable" ], - reg_req => { in => [ "vfp", "vfp" ], out => [ "eax" ] }, + reg_req => { in => [ "fp", "fp" ], out => [ "eax" ] }, ins => [ "left", "right" ], outs => [ "flags" ], + emit => "fucom%FP %F0\n". + "fnstsw %%ax", attr => "bool ins_permuted", init_attr => "attr->attr.data.ins_permuted = ins_permuted;", latency => 3, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", mode => $mode_gp }, -vFucomi => { +FucomppFnstsw => { +# we can't allow to rematerialize this node so we don't +# accidently produce Phi(Fucom, Fucom(ins_permuted)) +# irn_flags => [ "rematerializable" ], + reg_req => { in => [ "fp", "fp" ], out => [ "eax" ] }, + ins => [ "left", "right" ], + outs => [ "flags" ], + emit => "fucompp\n". + "fnstsw %%ax", + attr => "bool ins_permuted", + init_attr => "attr->attr.data.ins_permuted = ins_permuted;", + latency => 3, + attr_type => "ia32_x87_attr_t", + mode => $mode_gp +}, + +Fucomi => { irn_flags => [ "rematerializable" ], - reg_req => { in => [ "vfp", "vfp" ], out => [ "eflags" ] }, + reg_req => { in => [ "fp", "fp" ], out => [ "eflags" ] }, ins => [ "left", "right" ], outs => [ "flags" ], + emit => 'fucom%FPi %F0', attr => "bool ins_permuted", init_attr => "attr->attr.data.ins_permuted = ins_permuted;", latency => 3, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", mode => $mode_gp }, -vFtstFnstsw => { +FtstFnstsw => { # irn_flags => [ "rematerializable" ], - reg_req => { in => [ "vfp" ], out => [ "eax" ] }, + reg_req => { in => [ "fp" ], out => [ "eax" ] }, ins => [ "left" ], outs => [ "flags" ], + emit => "ftst\n". + "fnstsw %%ax", attr => "bool ins_permuted", init_attr => "attr->attr.data.ins_permuted = ins_permuted;", latency => 3, - units => [ "VFP" ], attr_type => "ia32_x87_attr_t", mode => $mode_gp }, @@ -2300,281 +2089,11 @@ Sahf => { reg_req => { in => [ "eax" ], out => [ "eflags" ] }, ins => [ "val" ], outs => [ "flags" ], - emit => '. sahf', + emit => 'sahf', latency => 1, - units => [ "GP" ], mode => $mode_flags, }, -fadd => { - state => "exc_pinned", - emit => '. fadd%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -faddp => { - state => "exc_pinned", - emit => '. faddp%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fmul => { - state => "exc_pinned", - emit => '. fmul%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fmulp => { - state => "exc_pinned", - emit => '. fmulp%XM %x87_binop',, - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fsub => { - state => "exc_pinned", - emit => '. fsub%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -# Note: gas is strangely buggy: fdivrp and fdivp as well as fsubrp and fsubp -# are swapped, we work this around in the emitter... - -fsubp => { - state => "exc_pinned", -# see note about gas bugs - emit => '. fsubrp%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fsubr => { - state => "exc_pinned", - irn_flags => [ "rematerializable" ], - emit => '. fsubr%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fsubrp => { - state => "exc_pinned", - irn_flags => [ "rematerializable" ], -# see note about gas bugs before fsubp - emit => '. fsubp%XM %x87_binop', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fprem => { - emit => '. fprem1', - latency => 20, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -# this node is just here, to keep the simulator running -# we can omit this when a fprem simulation function exists -fpremp => { - emit => '. fprem1\n'. - '. fstp %X0', - latency => 20, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fdiv => { - state => "exc_pinned", - emit => '. fdiv%XM %x87_binop', - latency => 20, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fdivp => { - state => "exc_pinned", -# see note about gas bugs before fsubp - emit => '. fdivrp%XM %x87_binop', - latency => 20, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fdivr => { - state => "exc_pinned", - emit => '. fdivr%XM %x87_binop', - latency => 20, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fdivrp => { - state => "exc_pinned", -# see note about gas bugs before fsubp - emit => '. fdivp%XM %x87_binop', - latency => 20, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fabs => { - emit => '. fabs', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fchs => { - op_flags => [ "keep" ], - irn_flags => [ "rematerializable" ], - emit => '. fchs', - latency => 4, - attr_type => "ia32_x87_attr_t", - constructors => {}, -}, - -fld => { - irn_flags => [ "rematerializable" ], - op_flags => [ "labeled" ], - state => "exc_pinned", - emit => '. fld%XM %AM', - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -fst => { - irn_flags => [ "rematerializable" ], - op_flags => [ "labeled" ], - state => "exc_pinned", - emit => '. fst%XM %AM', - mode => "mode_M", - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -fstp => { - irn_flags => [ "rematerializable" ], - op_flags => [ "labeled" ], - state => "exc_pinned", - emit => '. fstp%XM %AM', - mode => "mode_M", - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -fild => { - state => "exc_pinned", - emit => '. fild%XM %AM', - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -fist => { - state => "exc_pinned", - emit => '. fist%XM %AM', - mode => "mode_M", - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -fistp => { - state => "exc_pinned", - emit => '. fistp%XM %AM', - mode => "mode_M", - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -# SSE3 fisttp instruction -fisttp => { - state => "exc_pinned", - emit => '. fisttp%XM %AM', - mode => "mode_M", - attr_type => "ia32_x87_attr_t", - latency => 2, - constructors => {}, -}, - -fldz => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fldz', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -fld1 => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fld1', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -fldpi => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fldpi', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -fldln2 => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fldln2', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -fldlg2 => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fldlg2', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -fldl2t => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fldll2t', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -fldl2e => { - op_flags => [ "constlike", "keep" ], - irn_flags => [ "rematerializable" ], - reg_req => { out => [ "vfp" ] }, - emit => '. fldl2e', - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - # fxch, fpush, fpop # Note that it is NEVER allowed to do CSE on these nodes # Moreover, note the virtual register requierements! @@ -2583,7 +2102,7 @@ fxch => { op_flags => [ "keep" ], reg_req => { out => [ "none" ] }, cmp_attr => "return 1;", - emit => '. fxch %X0', + emit => 'fxch %F0', attr_type => "ia32_x87_attr_t", mode => "mode_ANY", latency => 1, @@ -2593,16 +2112,16 @@ fpush => { op_flags => [ "keep" ], reg_req => { out => [ "none" ] }, cmp_attr => "return 1;", - emit => '. fld %X0', + emit => 'fld %F0', attr_type => "ia32_x87_attr_t", mode => "mode_ANY", latency => 1, }, fpushCopy => { - reg_req => { in => [ "vfp"], out => [ "vfp" ] }, + reg_req => { in => [ "fp"], out => [ "fp" ] }, cmp_attr => "return 1;", - emit => '. fld %X0', + emit => 'fld %F0', attr_type => "ia32_x87_attr_t", latency => 1, }, @@ -2611,7 +2130,7 @@ fpop => { op_flags => [ "keep" ], reg_req => { out => [ "none" ] }, cmp_attr => "return 1;", - emit => '. fstp %X0', + emit => 'fstp %F0', attr_type => "ia32_x87_attr_t", mode => "mode_ANY", latency => 1, @@ -2621,7 +2140,7 @@ ffreep => { op_flags => [ "keep" ], reg_req => { out => [ "none" ] }, cmp_attr => "return 1;", - emit => '. ffreep %X0', + emit => 'ffreep %F0', attr_type => "ia32_x87_attr_t", mode => "mode_ANY", latency => 1, @@ -2631,7 +2150,7 @@ emms => { op_flags => [ "keep" ], reg_req => { out => [ "none" ] }, cmp_attr => "return 1;", - emit => '. emms', + emit => 'emms', attr_type => "ia32_x87_attr_t", mode => "mode_ANY", latency => 3, @@ -2641,81 +2160,33 @@ femms => { op_flags => [ "keep" ], reg_req => { out => [ "none" ] }, cmp_attr => "return 1;", - emit => '. femms', + emit => 'femms', attr_type => "ia32_x87_attr_t", mode => "mode_ANY", latency => 3, }, -FucomFnstsw => { - reg_req => { }, - emit => ". fucom %X1\n". - ". fnstsw %%ax", - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -FucompFnstsw => { - reg_req => { }, - emit => ". fucomp %X1\n". - ". fnstsw %%ax", - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -FucomppFnstsw => { - reg_req => { }, - emit => ". fucompp\n". - ". fnstsw %%ax", - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - -Fucomi => { - reg_req => { }, - emit => '. fucomi %X1', - attr_type => "ia32_x87_attr_t", - latency => 1, -}, - -Fucompi => { - reg_req => { }, - emit => '. fucompi %X1', - attr_type => "ia32_x87_attr_t", - latency => 1, -}, - -FtstFnstsw => { - reg_req => { }, - emit => ". ftst\n". - ". fnstsw %%ax", - attr_type => "ia32_x87_attr_t", - latency => 2, -}, - # Spilling and reloading of SSE registers, hardcoded, not generated # xxLoad => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none", "none", "none" ] }, - emit => '. movdqu %D0, %AM', + emit => 'movdqu %D0, %AM', ins => [ "base", "index", "mem" ], outs => [ "res", "M", "X_regular", "X_except" ], - units => [ "SSE" ], latency => 1, }, xxStore => { - op_flags => [ "fragile", "labeled" ], + op_flags => [ "uses_memory", "fragile" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none", "none" ] }, ins => [ "base", "index", "mem", "val" ], outs => [ "M", "X_regular", "X_except" ], - emit => '. movdqu %binop', - units => [ "SSE" ], + emit => 'movdqu %B', latency => 1, }, @@ -2739,7 +2210,7 @@ foreach my $op (keys(%nodes)) { die("Latency missing for op $op"); } } - $op_attr_init .= "attr->latency = ".$node->{latency} . ";"; + $op_attr_init .= "ia32_init_op(op, ".$node->{latency} . ");"; $node->{op_attr_init} = $op_attr_init; }