nsz Git - libfirm/blob - ir/be/ia32/ia32_spec.pl

   1 # Creation: 2005/10/19
   2 # $Id$
   3 # This is the specification for the ia32 assembler Firm-operations
   4
   5 use File::Basename;
   6
   7 $new_emit_syntax = 1;
   8 my $myname = $0;
   9
  10 # the cpu architecture (ia32, ia64, mips, sparc, ppc, ...)
  11 $arch = "ia32";
  12
  13 # The node description is done as a perl hash initializer with the
  14 # following structure:
  15 #
  16 # %nodes = (
  17 #
  18 # <op-name> => {
  19 #   op_flags  => "N|L|C|X|I|F|Y|H|c|K",
  20 #   irn_flags => "R|N|I|S"
  21 #   arity     => "0|1|2|3 ... |variable|dynamic|any",
  22 #   state     => "floats|pinned|mem_pinned|exc_pinned",
  23 #   args      => [
  24 #                    { type => "type 1", name => "name 1" },
  25 #                    { type => "type 2", name => "name 2" },
  26 #                    ...
  27 #                  ],
  28 #   comment   => "any comment for constructor",
  29 #   reg_req   => { in => [ "reg_class|register" ], out => [ "reg_class|register|in_rX" ] },
  30 #   cmp_attr  => "c source code for comparing node attributes",
  31 #   emit      => "emit code with templates",
  32 #   attr      => "attitional attribute arguments for constructor"
  33 #   init_attr => "emit attribute initialization template"
  34 #   rd_constructor => "c source code which constructs an ir_node"
  35 #   attr_type => "name of the attribute struct",
  36 # },
  37 #
  38 # ... # (all nodes you need to describe)
  39 #
  40 # ); # close the %nodes initializer
  41
  42 # op_flags: flags for the operation, OPTIONAL (default is "N")
  43 # the op_flags correspond to the firm irop_flags:
  44 #   N   irop_flag_none
  45 #   L   irop_flag_labeled
  46 #   C   irop_flag_commutative
  47 #   X   irop_flag_cfopcode
  48 #   I   irop_flag_ip_cfopcode
  49 #   F   irop_flag_fragile
  50 #   Y   irop_flag_forking
  51 #   H   irop_flag_highlevel
  52 #   c   irop_flag_constlike
  53 #   K   irop_flag_keep
  54 #
  55 # irn_flags: special node flags, OPTIONAL (default is 0)
  56 # following irn_flags are supported:
  57 #   R   rematerializeable
  58 #   N   not spillable
  59 #   I   ignore for register allocation
  60 #   S   modifies stack pointer
  61 #
  62 # state: state of the operation, OPTIONAL (default is "floats")
  63 #
  64 # arity: arity of the operation, MUST NOT BE OMITTED
  65 #
  66 # args:  the OPTIONAL arguments of the node constructor (debug, irg and block
  67 #        are always the first 3 arguments and are always autmatically
  68 #        created)
  69 #        If this key is missing the following arguments will be created:
  70 #        for i = 1 .. arity: ir_node *op_i
  71 #        ir_mode *mode
  72 #
  73 # outs:  if a node defines more than one output, the names of the projections
  74 #        nodes having outs having automatically the mode mode_T
  75 #        One can also annotate some flags for each out, additional to irn_flags.
  76 #        They are separated from name with a colon ':', and concatenated by pipe '|'
  77 #        Only I and S are available at the moment (same meaning as in irn_flags).
  78 #        example: [ "frame:I", "stack:I|S", "M" ]
  79 #
  80 # comment: OPTIONAL comment for the node constructor
  81 #
  82 # rd_constructor: for every operation there will be a
  83 #      new_rd_<arch>_<op-name> function with the arguments from above
  84 #      which creates the ir_node corresponding to the defined operation
  85 #      you can either put the complete source code of this function here
  86 #
  87 #      This key is OPTIONAL. If omitted, the following constructor will
  88 #      be created:
  89 #      if (!op_<arch>_<op-name>) assert(0);
  90 #      for i = 1 to arity
  91 #         set in[i] = op_i
  92 #      done
  93 #      res = new_ir_node(db, irg, block, op_<arch>_<op-name>, mode, arity, in)
  94 #      return res
  95 #
  96 # NOTE: rd_constructor and args are only optional if and only if arity is 0,1,2 or 3
  97 #
  98
  99 # register types:
 100 #   0 - no special type
 101 #   1 - caller save (register must be saved by the caller of a function)
 102 #   2 - callee save (register must be saved by the called function)
 103 #   4 - ignore (do not assign this register)
 104 #   8 - emitter can choose an arbitrary register of this class
 105 #  16 - the register is a virtual one
 106 #  32 - register represents a state
 107 # NOTE: Last entry of each class is the largest Firm-Mode a register can hold
 108 %reg_classes = (
 109         gp => [
 110                 { name => "edx", type => 1 },
 111                 { name => "ecx", type => 1 },
 112                 { name => "eax", type => 1 },
 113                 { name => "ebx", type => 2 },
 114                 { name => "esi", type => 2 },
 115                 { name => "edi", type => 2 },
 116                 { name => "ebp", type => 2 },
 117                 { name => "esp", type => 4 },
 118                 { name => "gp_NOREG", type => 4 | 8 | 16 }, # we need a dummy register for NoReg nodes
 119                 { name => "gp_UKNWN", type => 4 | 8 | 16 },  # we need a dummy register for Unknown nodes
 120                 { mode => "mode_Iu" }
 121         ],
 122         mmx => [
 123                 { name => "mm0", type => 4 },
 124                 { name => "mm1", type => 4 },
 125                 { name => "mm2", type => 4 },
 126                 { name => "mm3", type => 4 },
 127                 { name => "mm4", type => 4 },
 128                 { name => "mm5", type => 4 },
 129                 { name => "mm6", type => 4 },
 130                 { name => "mm7", type => 4 },
 131                 { mode => "mode_E", flags => "manual_ra" }
 132         ],
 133         xmm => [
 134                 { name => "xmm0", type => 1 },
 135                 { name => "xmm1", type => 1 },
 136                 { name => "xmm2", type => 1 },
 137                 { name => "xmm3", type => 1 },
 138                 { name => "xmm4", type => 1 },
 139                 { name => "xmm5", type => 1 },
 140                 { name => "xmm6", type => 1 },
 141                 { name => "xmm7", type => 1 },
 142                 { name => "xmm_NOREG", type => 4 | 16 },     # we need a dummy register for NoReg nodes
 143                 { name => "xmm_UKNWN", type => 4 | 8 | 16},  # we need a dummy register for Unknown nodes
 144                 { mode => "mode_E" }
 145         ],
 146         vfp => [
 147                 { name => "vf0", type => 1 | 16 },
 148                 { name => "vf1", type => 1 | 16 },
 149                 { name => "vf2", type => 1 | 16 },
 150                 { name => "vf3", type => 1 | 16 },
 151                 { name => "vf4", type => 1 | 16 },
 152                 { name => "vf5", type => 1 | 16 },
 153                 { name => "vf6", type => 1 | 16 },
 154                 { name => "vf7", type => 1 | 16 },
 155                 { name => "vfp_NOREG", type => 4 | 8 | 16 }, # we need a dummy register for NoReg nodes
 156                 { name => "vfp_UKNWN", type => 4 | 8 | 16 },  # we need a dummy register for Unknown nodes
 157                 { mode => "mode_E" }
 158         ],
 159         st => [
 160                 { name => "st0", realname => "st",    type => 4 },
 161                 { name => "st1", realname => "st(1)", type => 4 },
 162                 { name => "st2", realname => "st(2)", type => 4 },
 163                 { name => "st3", realname => "st(3)", type => 4 },
 164                 { name => "st4", realname => "st(4)", type => 4 },
 165                 { name => "st5", realname => "st(5)", type => 4 },
 166                 { name => "st6", realname => "st(6)", type => 4 },
 167                 { name => "st7", realname => "st(7)", type => 4 },
 168                 { mode => "mode_E", flags => "manual_ra" }
 169         ],
 170         fp_cw => [      # the floating point control word
 171                 { name => "fpcw", type => 4|32 },
 172                 { mode => "mode_fpcw", flags => "manual_ra|state" }
 173         ],
 174         flags => [
 175                 { name => "eflags", type => 0 },
 176                 { mode => "mode_Iu", flags => "manual_ra" }
 177         ],
 178 ); # %reg_classes
 179
 180 %cpu = (
 181         GP     => [ 1, "GP_EAX", "GP_EBX", "GP_ECX", "GP_EDX", "GP_ESI", "GP_EDI", "GP_EBP" ],
 182         SSE    => [ 1, "SSE_XMM0", "SSE_XMM1", "SSE_XMM2", "SSE_XMM3", "SSE_XMM4", "SSE_XMM5", "SSE_XMM6", "SSE_XMM7" ],
 183         VFP    => [ 1, "VFP_VF0", "VFP_VF1", "VFP_VF2", "VFP_VF3", "VFP_VF4", "VFP_VF5", "VFP_VF6", "VFP_VF7" ],
 184         BRANCH => [ 1, "BRANCH1", "BRANCH2" ],
 185 ); # %cpu
 186
 187 %vliw = (
 188         bundle_size       => 1,
 189         bundels_per_cycle => 1
 190 ); # vliw
 191
 192 %emit_templates = (
 193         S0 => "${arch}_emit_source_register(node, 0);",
 194         S1 => "${arch}_emit_source_register(node, 1);",
 195         S2 => "${arch}_emit_source_register(node, 2);",
 196         S3 => "${arch}_emit_source_register(node, 3);",
 197         SB1 => "${arch}_emit_8bit_source_register_or_immediate(node, 1);",
 198         SB2 => "${arch}_emit_8bit_source_register_or_immediate(node, 2);",
 199         SB3 => "${arch}_emit_8bit_source_register_or_immediate(node, 3);",
 200         SI3 => "${arch}_emit_source_register_or_immediate(node, 3);",
 201         D0 => "${arch}_emit_dest_register(node, 0);",
 202         D1 => "${arch}_emit_dest_register(node, 1);",
 203         DB0 => "${arch}_emit_8bit_dest_register(node, 0);",
 204         X0 => "${arch}_emit_x87_register(node, 0);",
 205         X1 => "${arch}_emit_x87_register(node, 1);",
 206         SE => "${arch}_emit_extend_suffix(get_ia32_ls_mode(node));",
 207         ME => "if(get_mode_size_bits(get_ia32_ls_mode(node)) != 32)\n
 208                    ia32_emit_mode_suffix(node);",
 209         M  => "${arch}_emit_mode_suffix(node);",
 210         XM => "${arch}_emit_x87_mode_suffix(node);",
 211         XXM => "${arch}_emit_xmm_mode_suffix(node);",
 212         XSD => "${arch}_emit_xmm_mode_suffix_s(node);",
 213         AM => "${arch}_emit_am(node);",
 214         unop3 => "${arch}_emit_unop(node, 3);",
 215         unop4 => "${arch}_emit_unop(node, 4);",
 216         unop5 => "${arch}_emit_unop(node, 5);",
 217         binop => "${arch}_emit_binop(node);",
 218         x87_binop => "${arch}_emit_x87_binop(node);",
 219         CMP0  => "${arch}_emit_cmp_suffix_node(node, 0);",
 220         CMP3  => "${arch}_emit_cmp_suffix_node(node, 3);",
 221 );
 222
 223 #--------------------------------------------------#
 224 #                        _                         #
 225 #                       (_)                        #
 226 #  _ __   _____      __  _ _ __    ___  _ __  ___  #
 227 # | '_ \ / _ \ \ /\ / / | | '__|  / _ \| '_ \/ __| #
 228 # | | | |  __/\ V  V /  | | |    | (_) | |_) \__ \ #
 229 # |_| |_|\___| \_/\_/   |_|_|     \___/| .__/|___/ #
 230 #                                      | |         #
 231 #                                      |_|         #
 232 #--------------------------------------------------#
 233
 234 $default_op_attr_type = "ia32_op_attr_t";
 235 $default_attr_type    = "ia32_attr_t";
 236 $default_copy_attr    = "ia32_copy_attr";
 237
 238 sub ia32_custom_init_attr {
 239         my $node = shift;
 240         my $name = shift;
 241         my $res = "";
 242
 243         if(defined($node->{modified_flags})) {
 244                 $res .= "\tset_ia32_flags(res, get_ia32_flags(res) | arch_irn_flags_modify_flags);\n";
 245         }
 246         if(defined($node->{am})) {
 247                 my $am = $node->{am};
 248                 if($am eq "full,binary") {
 249                         $res .= "\tset_ia32_am_support(res, ia32_am_Full, ia32_am_binary);";
 250                 } elsif($am eq "full,unary") {
 251                         $res .= "\tset_ia32_am_support(res, ia32_am_Full, ia32_am_unary);";
 252                 } elsif($am eq "source,unary") {
 253                         $res .= "\tset_ia32_am_support(res, ia32_am_Source, ia32_am_unary);";
 254                 } elsif($am eq "source,binary") {
 255                         $res .= "\tset_ia32_am_support(res, ia32_am_Source, ia32_am_binary);";
 256                 } elsif($am eq "dest,unary") {
 257                         $res .= "\tset_ia32_am_support(res, ia32_am_Dest, ia32_am_unary);";
 258                 } elsif($am eq "dest,binary") {
 259                         $res .= "\tset_ia32_am_support(res, ia32_am_Dest, ia32_am_binary);";
 260                 } elsif($am eq "dest,ternary") {
 261                         $res .= "\tset_ia32_am_support(res, ia32_am_Dest, ia32_am_ternary);";
 262                 } elsif($am eq "source,ternary") {
 263                         $res .= "\tset_ia32_am_support(res, ia32_am_Source, ia32_am_ternary);";
 264                 } elsif($am eq "none") {
 265                         # nothing to do
 266                 } else {
 267                         die("Invalid address mode '$am' specified on op $name");
 268                 }
 269                 if($am ne "none") {
 270                         if($node->{state} ne "exc_pinned"
 271                                         and $node->{state} ne "pinned") {
 272                                 die("AM nodes must have pinned or AM pinned state ($name)");
 273                         }
 274                 }
 275         }
 276         return $res;
 277 }
 278 $custom_init_attr_func = \&ia32_custom_init_attr;
 279
 280 %init_attr = (
 281         ia32_attr_t     => "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);",
 282         ia32_x87_attr_t =>
 283                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 284                 "\tinit_ia32_x87_attributes(res);",
 285         ia32_asm_attr_t =>
 286                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 287                 "\tinit_ia32_x87_attributes(res);".
 288                 "\tinit_ia32_asm_attributes(res);",
 289         ia32_immediate_attr_t =>
 290                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 291                 "\tinit_ia32_immediate_attributes(res, symconst, symconst_sign, offset);",
 292         ia32_copyb_attr_t =>
 293                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 294                 "\tinit_ia32_copyb_attributes(res, size);",
 295         ia32_condcode_attr_t =>
 296                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 297                 "\tinit_ia32_condcode_attributes(res, pnc);",
 298 );
 299
 300 %compare_attr = (
 301         ia32_attr_t           => "ia32_compare_nodes_attr",
 302         ia32_x87_attr_t       => "ia32_compare_x87_attr",
 303         ia32_asm_attr_t       => "ia32_compare_asm_attr",
 304         ia32_immediate_attr_t => "ia32_compare_immediate_attr",
 305         ia32_copyb_attr_t     => "ia32_compare_copyb_attr",
 306         ia32_condcode_attr_t  => "ia32_compare_condcode_attr",
 307 );
 308
 309 %operands = (
 310 );
 311
 312 $mode_xmm     = "mode_E";
 313 $mode_gp      = "mode_Iu";
 314 $mode_flags   = "mode_Iu";
 315 $mode_fpcw    = "mode_fpcw";
 316 $status_flags = [ "CF", "PF", "AF", "ZF", "SF", "OF" ];
 317 $fpcw_flags   = [ "FP_IM", "FP_DM", "FP_ZM", "FP_OM", "FP_UM", "FP_PM",
 318                   "FP_PC0", "FP_PC1", "FP_RC0", "FP_RC1", "FP_X" ];
 319
 320 %nodes = (
 321
 322 Immediate => {
 323         state     => "pinned",
 324         op_flags  => "c",
 325         irn_flags => "I",
 326         reg_req   => { out => [ "gp_NOREG" ] },
 327         attr      => "ir_entity *symconst, int symconst_sign, long offset",
 328         attr_type => "ia32_immediate_attr_t",
 329         latency   => 0,
 330         mode      => $mode_gp,
 331 },
 332
 333 Asm => {
 334         mode      => "mode_T",
 335         arity     => "variable",
 336         out_arity => "variable",
 337         attr_type => "ia32_asm_attr_t",
 338         attr      => "ident *asm_text, const ia32_asm_reg_t *register_map",
 339         init_attr => "attr->asm_text = asm_text;\n".
 340                      "\tattr->register_map = register_map;\n",
 341         latency   => 10,
 342         modified_flags => 1,
 343 },
 344
 345 ProduceVal => {
 346         op_flags  => "c",
 347         irn_flags => "R",
 348         reg_req   => { out => [ "gp" ] },
 349         emit      => "",
 350         units     => [ ],
 351         latency   => 0,
 352         mode      => $mode_gp,
 353         cmp_attr  => "return 1;",
 354 },
 355
 356 #-----------------------------------------------------------------#
 357 #  _       _                                         _            #
 358 # (_)     | |                                       | |           #
 359 #  _ _ __ | |_ ___  __ _  ___ _ __   _ __   ___   __| | ___  ___  #
 360 # | | '_ \| __/ _ \/ _` |/ _ \ '__| | '_ \ / _ \ / _` |/ _ \/ __| #
 361 # | | | | | ||  __/ (_| |  __/ |    | | | | (_) | (_| |  __/\__ \ #
 362 # |_|_| |_|\__\___|\__, |\___|_|    |_| |_|\___/ \__,_|\___||___/ #
 363 #                   __/ |                                         #
 364 #                  |___/                                          #
 365 #-----------------------------------------------------------------#
 366
 367 # commutative operations
 368
 369 Add => {
 370         irn_flags => "R",
 371         state     => "exc_pinned",
 372         reg_req   => { in  => [ "gp", "gp", "none", "gp", "gp" ],
 373                        out => [ "in_r4 in_r5", "flags", "none" ] },
 374         ins       => [ "base", "index", "mem", "left", "right" ],
 375         outs      => [ "res", "flags", "M" ],
 376         emit      => '. add%M %binop',
 377         am        => "full,binary",
 378         units     => [ "GP" ],
 379         latency   => 1,
 380         mode      => $mode_gp,
 381         modified_flags => $status_flags
 382 },
 383
 384 AddMem => {
 385         irn_flags => "R",
 386         state     => "exc_pinned",
 387         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 388         ins       => [ "base", "index", "mem", "val" ],
 389         emit      => ". add%M %SI3, %AM",
 390         units     => [ "GP" ],
 391         latency   => 1,
 392         mode      => "mode_M",
 393         modified_flags => $status_flags
 394 },
 395
 396 AddMem8Bit => {
 397         irn_flags => "R",
 398         state     => "exc_pinned",
 399         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 400         ins       => [ "base", "index", "mem", "val" ],
 401         emit      => ". add%M %SB3, %AM",
 402         units     => [ "GP" ],
 403         latency   => 1,
 404         mode      => "mode_M",
 405         modified_flags => $status_flags
 406 },
 407
 408 Adc => {
 409         state     => "exc_pinned",
 410         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp", "flags" ],
 411                        out => [ "in_r4 in_r5", "flags", "none" ] },
 412         ins       => [ "base", "index", "mem", "left", "right", "eflags" ],
 413         outs      => [ "res", "flags", "M" ],
 414         emit      => '. adc%M %binop',
 415         am        => "full,binary",
 416         units     => [ "GP" ],
 417         latency   => 1,
 418         mode      => $mode_gp,
 419         modified_flags => $status_flags
 420 },
 421
 422 l_Add => {
 423         op_flags  => "C",
 424         reg_req   => { in => [ "none", "none" ], out => [ "none" ] },
 425         ins       => [ "left", "right" ],
 426 },
 427
 428 l_Adc => {
 429         reg_req   => { in => [ "none", "none", "none" ], out => [ "none" ] },
 430         ins       => [ "left", "right", "eflags" ],
 431 },
 432
 433 Mul => {
 434         # we should not rematrialize this node. It produces 2 results and has
 435         # very strict constrains
 436         state     => "exc_pinned",
 437         reg_req   => { in => [ "gp", "gp", "none", "eax", "gp" ],
 438                        out => [ "eax", "edx", "none" ] },
 439         ins       => [ "base", "index", "mem", "val_high", "val_low" ],
 440         emit      => '. mul%M %unop4',
 441         outs      => [ "res_low", "res_high", "M" ],
 442         am        => "source,binary",
 443         latency   => 10,
 444         units     => [ "GP" ],
 445         modified_flags => $status_flags
 446 },
 447
 448 l_Mul => {
 449         # we should not rematrialize this node. It produces 2 results and has
 450         # very strict constrains
 451         op_flags  => "C",
 452         cmp_attr  => "return 1;",
 453         outs      => [ "EAX", "EDX", "M" ],
 454         arity     => 2
 455 },
 456
 457 IMul => {
 458         irn_flags => "R",
 459         state     => "exc_pinned",
 460         # TODO: adjust out requirements for the 3 operand form
 461         # (no need for should_be_same then)
 462         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 463                            out => [ "in_r4 in_r5", "flags", "none" ] },
 464         ins       => [ "base", "index", "mem", "left", "right" ],
 465         outs      => [ "res", "flags", "M" ],
 466         am        => "source,binary",
 467         latency   => 5,
 468         units     => [ "GP" ],
 469         mode      => $mode_gp,
 470         modified_flags => $status_flags
 471 },
 472
 473 IMul1OP => {
 474         irn_flags => "R",
 475         state     => "exc_pinned",
 476         reg_req   => { in => [ "gp", "gp", "none", "eax", "gp" ],
 477                        out => [ "eax", "edx", "none" ] },
 478         ins       => [ "base", "index", "mem", "val_high", "val_low" ],
 479         emit      => '. imul%M %unop4',
 480         outs      => [ "res_low", "res_high", "M" ],
 481         am        => "source,binary",
 482         latency   => 5,
 483         units     => [ "GP" ],
 484         modified_flags => $status_flags
 485 },
 486
 487 l_IMul => {
 488         op_flags  => "C",
 489         cmp_attr  => "return 1;",
 490         outs      => [ "res_low", "res_high", "M" ],
 491         arity     => 2
 492 },
 493
 494 And => {
 495         irn_flags => "R",
 496         state     => "exc_pinned",
 497         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 498                            out => [ "in_r4 in_r5", "flags", "none" ] },
 499         ins       => [ "base", "index", "mem", "left", "right" ],
 500         outs      => [ "res", "flags", "M" ],
 501         op_modes  => "commutative | am | immediate | mode_neutral",
 502         am        => "full,binary",
 503         emit      => '. and%M %binop',
 504         units     => [ "GP" ],
 505         latency   => 1,
 506         mode      => $mode_gp,
 507         modified_flags => $status_flags
 508 },
 509
 510 AndMem => {
 511         irn_flags => "R",
 512         state     => "exc_pinned",
 513         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 514         ins       => [ "base", "index", "mem", "val" ],
 515         emit      => '. and%M %SI3, %AM',
 516         units     => [ "GP" ],
 517         latency   => 1,
 518         mode      => "mode_M",
 519         modified_flags => $status_flags
 520 },
 521
 522 AndMem8Bit => {
 523         irn_flags => "R",
 524         state     => "exc_pinned",
 525         reg_req   => { in => [ "gp", "gp", "none",  "eax ebx ecx edx" ], out => [ "none" ] },
 526         ins       => [ "base", "index", "mem", "val" ],
 527         emit      => '. and%M %SB3, %AM',
 528         units     => [ "GP" ],
 529         latency   => 1,
 530         mode      => "mode_M",
 531         modified_flags => $status_flags
 532 },
 533
 534 Or => {
 535         irn_flags => "R",
 536         state     => "exc_pinned",
 537         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 538                        out => [ "in_r4 in_r5", "flags", "none" ] },
 539         ins       => [ "base", "index", "mem", "left", "right" ],
 540         outs      => [ "res", "flags", "M" ],
 541         am        => "full,binary",
 542         emit      => '. or%M %binop',
 543         units     => [ "GP" ],
 544         latency   => 1,
 545         mode      => $mode_gp,
 546         modified_flags => $status_flags
 547 },
 548
 549 OrMem => {
 550         irn_flags => "R",
 551         state     => "exc_pinned",
 552         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 553         ins       => [ "base", "index", "mem", "val" ],
 554         emit      => '. or%M %SI3, %AM',
 555         units     => [ "GP" ],
 556         latency   => 1,
 557         mode      => "mode_M",
 558         modified_flags => $status_flags
 559 },
 560
 561 OrMem8Bit => {
 562         irn_flags => "R",
 563         state     => "exc_pinned",
 564         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 565         ins       => [ "base", "index", "mem", "val" ],
 566         emit      => '. or%M %SB3, %AM',
 567         units     => [ "GP" ],
 568         latency   => 1,
 569         mode      => "mode_M",
 570         modified_flags => $status_flags
 571 },
 572
 573 Xor => {
 574         irn_flags => "R",
 575         state     => "exc_pinned",
 576         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 577                        out => [ "in_r4 in_r5", "flags", "none" ] },
 578         ins       => [ "base", "index", "mem", "left", "right" ],
 579         outs      => [ "res", "flags", "M" ],
 580         am        => "full,binary",
 581         emit      => '. xor%M %binop',
 582         units     => [ "GP" ],
 583         latency   => 1,
 584         mode      => $mode_gp,
 585         modified_flags => $status_flags
 586 },
 587
 588 XorMem => {
 589         irn_flags => "R",
 590         state     => "exc_pinned",
 591         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 592         ins       => [ "base", "index", "mem", "val" ],
 593         emit      => '. xor%M %SI3, %AM',
 594         units     => [ "GP" ],
 595         latency   => 1,
 596         mode      => "mode_M",
 597         modified_flags => $status_flags
 598 },
 599
 600 XorMem8Bit => {
 601         irn_flags => "R",
 602         state     => "exc_pinned",
 603         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 604         ins       => [ "base", "index", "mem", "val" ],
 605         emit      => '. xor%M %SB3, %AM',
 606         units     => [ "GP" ],
 607         latency   => 1,
 608         mode      => "mode_M",
 609         modified_flags => $status_flags
 610 },
 611
 612 # not commutative operations
 613
 614 Sub => {
 615         irn_flags => "R",
 616         state     => "exc_pinned",
 617         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 618                        out => [ "in_r4", "flags", "none" ] },
 619         ins       => [ "base", "index", "mem", "left", "right" ],
 620         outs      => [ "res", "flags", "M" ],
 621         am        => "full,binary",
 622         emit      => '. sub%M %binop',
 623         units     => [ "GP" ],
 624         latency   => 1,
 625         mode      => $mode_gp,
 626         modified_flags => $status_flags
 627 },
 628
 629 SubMem => {
 630         irn_flags => "R",
 631         state     => "exc_pinned",
 632         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 633         ins       => [ "base", "index", "mem", "val" ],
 634         emit      => '. sub%M %SI3, %AM',
 635         units     => [ "GP" ],
 636         latency   => 1,
 637         mode      => 'mode_M',
 638         modified_flags => $status_flags
 639 },
 640
 641 SubMem8Bit => {
 642         irn_flags => "R",
 643         state     => "exc_pinned",
 644         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 645         ins       => [ "base", "index", "mem", "val" ],
 646         emit      => '. sub%M %SB3, %AM',
 647         units     => [ "GP" ],
 648         latency   => 1,
 649         mode      => 'mode_M',
 650         modified_flags => $status_flags
 651 },
 652
 653 Sbb => {
 654         state     => "exc_pinned",
 655         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp", "flags" ],
 656                        out => [ "in_r4 !in_r5", "flags", "none" ] },
 657         ins       => [ "base", "index", "mem", "left", "right", "eflags" ],
 658         outs      => [ "res", "flags", "M" ],
 659         am        => "full,binary",
 660         emit      => '. sbb%M %binop',
 661         units     => [ "GP" ],
 662         latency   => 1,
 663         mode      => $mode_gp,
 664         modified_flags => $status_flags
 665 },
 666
 667 l_Sub => {
 668         reg_req   => { in => [ "none", "none" ], out => [ "none" ] },
 669         ins       => [ "left", "right" ],
 670 },
 671
 672 l_Sbb => {
 673         reg_req   => { in => [ "none", "none", "none" ], out => [ "none" ] },
 674         ins       => [ "left", "right", "eflags" ],
 675 },
 676
 677 IDiv => {
 678         op_flags  => "F|L",
 679         state     => "exc_pinned",
 680         reg_req   => { in => [ "gp", "gp", "none", "eax", "edx", "gp" ],
 681                        out => [ "eax", "flags", "none", "edx", "none" ] },
 682         ins       => [ "base", "index", "mem", "left_low", "left_high", "right" ],
 683         outs      => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
 684         am        => "source,ternary",
 685         emit      => ". idiv%M %unop5",
 686         latency   => 25,
 687         units     => [ "GP" ],
 688         modified_flags => $status_flags
 689 },
 690
 691 Div => {
 692         op_flags  => "F|L",
 693         state     => "exc_pinned",
 694         reg_req   => { in => [ "gp", "gp", "none", "eax", "edx", "gp" ],
 695                        out => [ "eax", "flags", "none", "edx", "none" ] },
 696         ins       => [ "base", "index", "mem", "left_low", "left_high", "right" ],
 697         outs      => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
 698         am        => "source,ternary",
 699         emit      => ". div%M %unop5",
 700         latency   => 25,
 701         units     => [ "GP" ],
 702         modified_flags => $status_flags
 703 },
 704
 705 Shl => {
 706         irn_flags => "R",
 707         reg_req   => { in => [ "gp", "ecx" ],
 708                        out => [ "in_r1 !in_r2", "flags" ] },
 709         ins       => [ "val", "count" ],
 710         outs      => [ "res", "flags" ],
 711         emit      => '. shl %SB1, %S0',
 712         units     => [ "GP" ],
 713         latency   => 1,
 714         mode      => $mode_gp,
 715         modified_flags => $status_flags
 716 },
 717
 718 ShlMem => {
 719         irn_flags => "R",
 720         state     => "exc_pinned",
 721         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 722         ins       => [ "base", "index", "mem", "count" ],
 723         emit      => '. shl%M %SB3, %AM',
 724         units     => [ "GP" ],
 725         latency   => 1,
 726         mode      => "mode_M",
 727         modified_flags => $status_flags
 728 },
 729
 730 l_ShlDep => {
 731         cmp_attr => "return 1;",
 732         ins      => [ "val", "count", "dep" ],
 733         arity    => 3
 734 },
 735
 736 ShlD => {
 737         irn_flags => "R",
 738         reg_req   => { in => [ "gp", "gp", "ecx" ],
 739                        out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
 740         ins       => [ "val_high", "val_low", "count" ],
 741         outs      => [ "res", "flags" ],
 742         emit      => ". shld%M %SB2, %S1, %D0",
 743         latency   => 6,
 744         units     => [ "GP" ],
 745         mode      => $mode_gp,
 746         modified_flags => $status_flags
 747 },
 748
 749 l_ShlD => {
 750         cmp_attr  => "return 1;",
 751         ins       => [ "val_high", "val_low", "count" ],
 752         arity     => 3,
 753 },
 754
 755 Shr => {
 756         irn_flags => "R",
 757         reg_req   => { in => [ "gp", "ecx" ],
 758                        out => [ "in_r1 !in_r2", "flags" ] },
 759         ins       => [ "val", "count" ],
 760         outs      => [ "res", "flags" ],
 761         emit      => '. shr %SB1, %S0',
 762         units     => [ "GP" ],
 763         mode      => $mode_gp,
 764         latency   => 1,
 765         modified_flags => $status_flags
 766 },
 767
 768 ShrMem => {
 769         irn_flags => "R",
 770         state     => "exc_pinned",
 771         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 772         ins       => [ "base", "index", "mem", "count" ],
 773         emit      => '. shr%M %SB3, %AM',
 774         units     => [ "GP" ],
 775         mode      => "mode_M",
 776         latency   => 1,
 777         modified_flags => $status_flags
 778 },
 779
 780 l_ShrDep => {
 781         cmp_attr  => "return 1;",
 782         ins       => [ "val", "count", "dep" ],
 783         arity     => 3
 784 },
 785
 786 ShrD => {
 787         irn_flags => "R",
 788         reg_req   => { in => [ "gp", "gp", "ecx" ],
 789                        out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
 790         ins       => [ "val_high", "val_low", "count" ],
 791         outs      => [ "res", "flags" ],
 792         emit      => ". shrd%M %SB2, %S1, %D0",
 793         latency   => 6,
 794         units     => [ "GP" ],
 795         mode      => $mode_gp,
 796         modified_flags => $status_flags
 797 },
 798
 799 l_ShrD => {
 800         cmp_attr  => "return 1;",
 801         arity     => 3,
 802         ins       => [ "val_high", "val_low", "count" ],
 803 },
 804
 805 Sar => {
 806         irn_flags => "R",
 807         reg_req   => { in => [ "gp", "ecx" ],
 808                        out => [ "in_r1 !in_r2", "flags" ] },
 809         ins       => [ "val", "count" ],
 810         outs      => [ "res", "flags" ],
 811         emit      => '. sar %SB1, %S0',
 812         units     => [ "GP" ],
 813         latency   => 1,
 814         mode      => $mode_gp,
 815         modified_flags => $status_flags
 816 },
 817
 818 SarMem => {
 819         irn_flags => "R",
 820         state     => "exc_pinned",
 821         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 822         ins       => [ "base", "index", "mem", "count" ],
 823         emit      => '. sar%M %SB3, %AM',
 824         units     => [ "GP" ],
 825         latency   => 1,
 826         mode      => "mode_M",
 827         modified_flags => $status_flags
 828 },
 829
 830 l_SarDep => {
 831         cmp_attr  => "return 1;",
 832         ins       => [ "val", "count", "dep" ],
 833         arity     => 3
 834 },
 835
 836 Ror => {
 837         irn_flags => "R",
 838         reg_req   => { in => [ "gp", "ecx" ],
 839                        out => [ "in_r1 !in_r2", "flags" ] },
 840         ins       => [ "val", "count" ],
 841         outs      => [ "res", "flags" ],
 842         emit      => '. ror %SB1, %S0',
 843         units     => [ "GP" ],
 844         latency   => 1,
 845         mode      => $mode_gp,
 846         modified_flags => $status_flags
 847 },
 848
 849 RorMem => {
 850         irn_flags => "R",
 851         state     => "exc_pinned",
 852         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 853         ins       => [ "base", "index", "mem", "count" ],
 854         emit      => '. ror%M %SB3, %AM',
 855         units     => [ "GP" ],
 856         latency   => 1,
 857         mode      => "mode_M",
 858         modified_flags => $status_flags
 859 },
 860
 861 Rol => {
 862         irn_flags => "R",
 863         reg_req   => { in => [ "gp", "ecx" ],
 864                        out => [ "in_r1 !in_r2", "flags" ] },
 865         ins       => [ "val", "count" ],
 866         outs      => [ "res", "flags" ],
 867         emit      => '. rol %SB1, %S0',
 868         units     => [ "GP" ],
 869         latency   => 1,
 870         mode      => $mode_gp,
 871         modified_flags => $status_flags
 872 },
 873
 874 RolMem => {
 875         irn_flags => "R",
 876         state     => "exc_pinned",
 877         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 878         ins       => [ "base", "index", "mem", "count" ],
 879         emit      => '. rol%M %SB3, %AM',
 880         units     => [ "GP" ],
 881         latency   => 1,
 882         mode      => "mode_M",
 883         modified_flags => $status_flags
 884 },
 885
 886 # unary operations
 887
 888 Neg => {
 889         irn_flags => "R",
 890         reg_req   => { in => [ "gp" ],
 891                        out => [ "in_r1", "flags" ] },
 892         emit      => '. neg %S0',
 893         ins       => [ "val" ],
 894         outs      => [ "res", "flags" ],
 895         units     => [ "GP" ],
 896         latency   => 1,
 897         mode      => $mode_gp,
 898         modified_flags => $status_flags
 899 },
 900
 901 NegMem => {
 902         irn_flags => "R",
 903         state     => "exc_pinned",
 904         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 905         ins       => [ "base", "index", "mem" ],
 906         emit      => '. neg%M %AM',
 907         units     => [ "GP" ],
 908         latency   => 1,
 909         mode      => "mode_M",
 910         modified_flags => $status_flags
 911 },
 912
 913 Minus64Bit => {
 914         irn_flags => "R",
 915         reg_req   => { in => [ "gp", "gp" ], out => [ "in_r1", "gp" ] },
 916         outs      => [ "low_res", "high_res" ],
 917         units     => [ "GP" ],
 918         latency   => 3,
 919         modified_flags => $status_flags
 920 },
 921
 922
 923 Inc => {
 924         irn_flags => "R",
 925         reg_req   => { in => [ "gp" ],
 926                        out => [ "in_r1", "flags" ] },
 927         outs      => [ "res", "flags" ],
 928         emit      => '. inc %S0',
 929         units     => [ "GP" ],
 930         mode      => $mode_gp,
 931         latency   => 1,
 932         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 933 },
 934
 935 IncMem => {
 936         irn_flags => "R",
 937         state     => "exc_pinned",
 938         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 939         ins       => [ "base", "index", "mem" ],
 940         emit      => '. inc%M %AM',
 941         units     => [ "GP" ],
 942         mode      => "mode_M",
 943         latency   => 1,
 944         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 945 },
 946
 947 Dec => {
 948         irn_flags => "R",
 949         reg_req   => { in => [ "gp" ],
 950                        out => [ "in_r1", "flags" ] },
 951         outs      => [ "res", "flags" ],
 952         emit      => '. dec %S0',
 953         units     => [ "GP" ],
 954         mode      => $mode_gp,
 955         latency   => 1,
 956         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 957 },
 958
 959 DecMem => {
 960         irn_flags => "R",
 961         state     => "exc_pinned",
 962         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 963         ins       => [ "base", "index", "mem" ],
 964         emit      => '. dec%M %AM',
 965         units     => [ "GP" ],
 966         mode      => "mode_M",
 967         latency   => 1,
 968         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 969 },
 970
 971 Not => {
 972         irn_flags => "R",
 973         reg_req   => { in => [ "gp" ],
 974                        out => [ "in_r1", "flags" ] },
 975         ins       => [ "val" ],
 976         outs      => [ "res", "flags" ],
 977         emit      => '. not %S0',
 978         units     => [ "GP" ],
 979         latency   => 1,
 980         mode      => $mode_gp,
 981         # no flags modified
 982 },
 983
 984 NotMem => {
 985         irn_flags => "R",
 986         state     => "exc_pinned",
 987         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 988         ins       => [ "base", "index", "mem" ],
 989         emit      => '. not%M %AM',
 990         units     => [ "GP" ],
 991         latency   => 1,
 992         mode      => "mode_M",
 993         # no flags modified
 994 },
 995
 996 Cmc => {
 997         reg_req => { in => [ "flags" ], out => [ "flags" ] },
 998         emit    => '.cmc',
 999         units     => [ "GP" ],
1000         latency   => 1,
1001         mode      => $mode_flags,
1002         modified_flags => $status_flags
1003 },
1004
1005 Stc => {
1006         reg_req => { out => [ "flags" ] },
1007         emit    => '.stc',
1008         units     => [ "GP" ],
1009         latency   => 1,
1010         mode      => $mode_flags,
1011         modified_flags => $status_flags
1012 },
1013
1014 # other operations
1015
1016 Cmp => {
1017         irn_flags => "R",
1018         state     => "exc_pinned",
1019         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ] , out => [ "flags" ] },
1020         ins       => [ "base", "index", "mem", "left", "right" ],
1021         outs      => [ "eflags" ],
1022         am        => "source,binary",
1023         emit      => '. cmp%M %binop',
1024         attr      => "int ins_permuted, int cmp_unsigned",
1025         init_attr => "attr->data.ins_permuted   = ins_permuted;\n".
1026                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1027         latency   => 1,
1028         units     => [ "GP" ],
1029         mode      => $mode_flags,
1030         modified_flags => $status_flags
1031 },
1032
1033 Cmp8Bit => {
1034         irn_flags => "R",
1035         state     => "exc_pinned",
1036         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] , out => [ "flags" ] },
1037         ins       => [ "base", "index", "mem", "left", "right" ],
1038         outs      => [ "eflags" ],
1039         am        => "source,binary",
1040         emit      => '. cmpb %binop',
1041         attr      => "int ins_permuted, int cmp_unsigned",
1042         init_attr => "attr->data.ins_permuted   = ins_permuted;\n".
1043                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1044         latency   => 1,
1045         units     => [ "GP" ],
1046         mode      => $mode_flags,
1047         modified_flags => $status_flags
1048 },
1049
1050 Test => {
1051         irn_flags => "R",
1052         state     => "exc_pinned",
1053         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ] , out => [ "flags" ] },
1054         ins       => [ "base", "index", "mem", "left", "right" ],
1055         outs      => [ "eflags" ],
1056         am        => "source,binary",
1057         emit      => '. test%M %binop',
1058         attr      => "int ins_permuted, int cmp_unsigned",
1059         init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1060                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1061         latency   => 1,
1062         units     => [ "GP" ],
1063         mode      => $mode_flags,
1064         modified_flags => $status_flags
1065 },
1066
1067 Test8Bit => {
1068         irn_flags => "R",
1069         state     => "exc_pinned",
1070         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] , out => [ "flags" ] },
1071         ins       => [ "base", "index", "mem", "left", "right" ],
1072         outs      => [ "eflags" ],
1073         am        => "source,binary",
1074         emit      => '. testb %binop',
1075         attr      => "int ins_permuted, int cmp_unsigned",
1076         init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1077                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1078         latency   => 1,
1079         units     => [ "GP" ],
1080         mode      => $mode_flags,
1081         modified_flags => $status_flags
1082 },
1083
1084 Set => {
1085         #irn_flags => "R",
1086         reg_req   => { in => [ "eflags" ], out => [ "eax ebx ecx edx" ] },
1087         ins       => [ "eflags" ],
1088         attr_type => "ia32_condcode_attr_t",
1089         attr      => "pn_Cmp pnc, int ins_permuted",
1090         init_attr => "attr->attr.data.ins_permuted = ins_permuted;\n".
1091                       "\tset_ia32_ls_mode(res, mode_Bu);\n",
1092         emit      => '. set%CMP0 %DB0',
1093         latency   => 1,
1094         units     => [ "GP" ],
1095         mode      => $mode_gp,
1096 },
1097
1098 SetMem => {
1099         #irn_flags => "R",
1100         state     => "exc_pinned",
1101         reg_req   => { in => [ "gp", "gp", "none", "eflags" ], out => [ "none" ] },
1102         ins       => [ "base", "index", "mem","eflags" ],
1103         attr_type => "ia32_condcode_attr_t",
1104         attr      => "pn_Cmp pnc, int ins_permuted",
1105         init_attr => "attr->attr.data.ins_permuted = ins_permuted;\n".
1106                       "\tset_ia32_ls_mode(res, mode_Bu);\n",
1107         emit      => '. set%CMP3 %AM',
1108         latency   => 1,
1109         units     => [ "GP" ],
1110         mode      => 'mode_M',
1111 },
1112
1113 CMov => {
1114         #irn_flags => "R",
1115         # (note: leave the false,true order intact to make it compatible with other
1116         #  ia32_binary ops)
1117         state     => "exc_pinned",
1118         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp", "eflags" ], out => [ "in_r4 in_r5" ] },
1119         ins       => [ "base", "index", "mem", "val_false", "val_true", "eflags" ],
1120         am        => "source,binary",
1121         attr_type => "ia32_condcode_attr_t",
1122         attr      => "int ins_permuted, pn_Cmp pnc",
1123         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
1124         latency   => 1,
1125         units     => [ "GP" ],
1126         mode      => $mode_gp,
1127 },
1128
1129 Jcc => {
1130         state     => "pinned",
1131         op_flags  => "L|X|Y",
1132         reg_req   => { in  => [ "eflags" ], out => [ "none", "none" ] },
1133         ins       => [ "eflags" ],
1134         outs      => [ "false", "true" ],
1135         attr_type => "ia32_condcode_attr_t",
1136         attr      => "pn_Cmp pnc",
1137         latency   => 2,
1138         units     => [ "BRANCH" ],
1139 },
1140
1141 SwitchJmp => {
1142         state     => "pinned",
1143         op_flags  => "L|X|Y",
1144         reg_req   => { in => [ "gp" ], out => [ "none" ] },
1145         mode      => "mode_T",
1146         attr_type => "ia32_condcode_attr_t",
1147         attr      => "pn_Cmp pnc",
1148         latency   => 3,
1149         units     => [ "BRANCH" ],
1150         modified_flags => $status_flags,
1151 },
1152
1153 IJmp => {
1154         state     => "pinned",
1155         op_flags  => "X",
1156         reg_req   => { in => [ "gp", "gp", "none", "gp" ] },
1157         ins       => [ "base", "index", "mem", "target" ],
1158         am        => "source,unary",
1159         emit      => '. jmp *%unop3',
1160         latency   => 1,
1161         units     => [ "BRANCH" ],
1162         mode      => "mode_X",
1163 },
1164
1165 Const => {
1166         op_flags  => "c",
1167         irn_flags => "R",
1168         reg_req   => { out => [ "gp" ] },
1169         units     => [ "GP" ],
1170         attr      => "ir_entity *symconst, int symconst_sign, long offset",
1171         attr_type => "ia32_immediate_attr_t",
1172         latency   => 1,
1173         mode      => $mode_gp,
1174 },
1175
1176 GetEIP => {
1177         op_flags => "c",
1178         reg_req  => { out => [ "gp" ] },
1179         units    => [ "GP" ],
1180         latency  => 5,
1181         mode     => $mode_gp,
1182         modified_flags => $status_flags,
1183 },
1184
1185 Unknown_GP => {
1186         state     => "pinned",
1187         op_flags  => "c",
1188         irn_flags => "I",
1189         reg_req   => { out => [ "gp_UKNWN" ] },
1190         units     => [],
1191         emit      => "",
1192         latency   => 0,
1193         mode      => $mode_gp
1194 },
1195
1196 Unknown_VFP => {
1197         state     => "pinned",
1198         op_flags  => "c",
1199         irn_flags => "I",
1200         reg_req   => { out => [ "vfp_UKNWN" ] },
1201         units     => [],
1202         emit      => "",
1203         mode      => "mode_E",
1204         latency   => 0,
1205         attr_type => "ia32_x87_attr_t",
1206 },
1207
1208 Unknown_XMM => {
1209         state     => "pinned",
1210         op_flags  => "c",
1211         irn_flags => "I",
1212         reg_req   => { out => [ "xmm_UKNWN" ] },
1213         units     => [],
1214         emit      => "",
1215         latency   => 0,
1216         mode      => "mode_E"
1217 },
1218
1219 NoReg_GP => {
1220         state     => "pinned",
1221         op_flags  => "c",
1222         irn_flags => "I",
1223         reg_req   => { out => [ "gp_NOREG" ] },
1224         units     => [],
1225         emit      => "",
1226         latency   => 0,
1227         mode      => $mode_gp
1228 },
1229
1230 NoReg_VFP => {
1231         state     => "pinned",
1232         op_flags  => "c",
1233         irn_flags => "I",
1234         reg_req   => { out => [ "vfp_NOREG" ] },
1235         units     => [],
1236         emit      => "",
1237         mode      => "mode_E",
1238         latency   => 0,
1239         attr_type => "ia32_x87_attr_t",
1240 },
1241
1242 NoReg_XMM => {
1243         state     => "pinned",
1244         op_flags  => "c",
1245         irn_flags => "I",
1246         reg_req   => { out => [ "xmm_NOREG" ] },
1247         units     => [],
1248         emit      => "",
1249         latency   => 0,
1250         mode      => "mode_E"
1251 },
1252
1253 ChangeCW => {
1254         state     => "pinned",
1255         op_flags  => "c",
1256         irn_flags => "I",
1257         reg_req   => { out => [ "fp_cw" ] },
1258         mode      => $mode_fpcw,
1259         latency   => 3,
1260         units     => [ "GP" ],
1261         modified_flags => $fpcw_flags
1262 },
1263
1264 FldCW => {
1265         op_flags  => "L|F",
1266         state     => "pinned",
1267         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "fp_cw" ] },
1268         ins       => [ "base", "index", "mem" ],
1269         latency   => 5,
1270         emit      => ". fldcw %AM",
1271         mode      => $mode_fpcw,
1272         units     => [ "GP" ],
1273         modified_flags => $fpcw_flags
1274 },
1275
1276 FnstCW => {
1277         op_flags  => "L|F",
1278         state     => "pinned",
1279         reg_req   => { in => [ "gp", "gp", "none", "fp_cw" ], out => [ "none" ] },
1280         ins       => [ "base", "index", "mem", "fpcw" ],
1281         latency   => 5,
1282         emit      => ". fnstcw %AM",
1283         mode      => "mode_M",
1284         units     => [ "GP" ],
1285 },
1286
1287 FnstCWNOP => {
1288         op_flags  => "L|F",
1289         state     => "pinned",
1290         reg_req   => { in => [ "fp_cw" ], out => [ "none" ] },
1291         ins       => [ "fpcw" ],
1292         latency   => 0,
1293         emit      => "",
1294         mode      => "mode_M",
1295 },
1296
1297 Cltd => {
1298         # we should not rematrialize this node. It has very strict constraints.
1299         reg_req   => { in => [ "eax", "edx" ], out => [ "edx" ] },
1300         ins       => [ "val", "globbered" ],
1301         emit      => '. cltd',
1302         latency   => 1,
1303         mode      => $mode_gp,
1304         units     => [ "GP" ],
1305 },
1306
1307 # Load / Store
1308 #
1309 # Note that we add additional latency values depending on address mode, so a
1310 # lateny of 0 for load is correct
1311
1312 Load => {
1313         op_flags  => "L|F",
1314         state     => "exc_pinned",
1315         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "gp", "none", "none" ] },
1316         ins       => [ "base", "index", "mem" ],
1317         outs      => [ "res", "M", "X_exc" ],
1318         latency   => 0,
1319         emit      => ". mov%SE%ME%.l %AM, %D0",
1320         units     => [ "GP" ],
1321 },
1322
1323 l_Load => {
1324         op_flags  => "L|F",
1325         cmp_attr  => "return 1;",
1326         outs      => [ "res", "M" ],
1327         arity     => 2,
1328 },
1329
1330 l_Store => {
1331         op_flags  => "L|F",
1332         cmp_attr  => "return 1;",
1333         state     => "exc_pinned",
1334         arity     => 3,
1335         mode      => "mode_M",
1336 },
1337
1338 Store => {
1339         op_flags  => "L|F",
1340         state     => "exc_pinned",
1341         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none", "none" ] },
1342         ins       => [ "base", "index", "mem", "val" ],
1343         outs      => [ "M", "X_exc" ],
1344         emit      => '. mov%M %SI3, %AM',
1345         latency   => 2,
1346         units     => [ "GP" ],
1347         mode      => "mode_M",
1348 },
1349
1350 Store8Bit => {
1351         op_flags  => "L|F",
1352         state     => "exc_pinned",
1353         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => ["none", "none" ] },
1354         ins       => [ "base", "index", "mem", "val" ],
1355         outs      => [ "M", "X_exc" ],
1356         emit      => '. mov%M %SB3, %AM',
1357         latency   => 2,
1358         units     => [ "GP" ],
1359         mode      => "mode_M",
1360 },
1361
1362 Lea => {
1363         irn_flags => "R",
1364         reg_req   => { in => [ "gp", "gp" ], out => [ "gp" ] },
1365         ins       => [ "base", "index" ],
1366         emit      => '. leal %AM, %D0',
1367         latency   => 2,
1368         units     => [ "GP" ],
1369         mode      => $mode_gp,
1370 # lea doesn't modify the flags, but setting this seems advantageous since it
1371 # increases chances that the Lea is transformed back to an Add
1372         modified_flags => 1,
1373 },
1374
1375 Push => {
1376         state     => "exc_pinned",
1377         reg_req   => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp", "none" ] },
1378         ins       => [ "base", "index", "mem", "val", "stack" ],
1379         emit      => '. push%M %unop4',
1380         outs      => [ "stack:I|S", "M" ],
1381         am        => "source,binary",
1382         latency   => 2,
1383         units     => [ "GP" ],
1384 },
1385
1386 Pop => {
1387         state     => "exc_pinned",
1388         reg_req   => { in => [ "none", "esp" ], out => [ "gp", "none", "none", "esp" ] },
1389         ins       => [ "mem", "stack" ],
1390         outs      => [ "res", "M", "unused", "stack:I|S" ],
1391         emit      => '. pop%M %D0',
1392         latency   => 3, # Pop is more expensive than Push on Athlon
1393         units     => [ "GP" ],
1394 },
1395
1396 PopMem => {
1397         state     => "exc_pinned",
1398         reg_req   => { in => [ "gp", "gp", "none", "esp" ], out => [ "none", "none", "none", "esp" ] },
1399         ins       => [ "base", "index", "mem", "stack" ],
1400         outs      => [ "unused0", "M", "unused1", "stack:I|S" ],
1401         emit      => '. pop%M %AM',
1402         latency   => 3, # Pop is more expensive than Push on Athlon
1403         units     => [ "GP" ],
1404 },
1405
1406 Enter => {
1407         reg_req   => { in => [ "esp" ], out => [ "ebp", "esp", "none" ] },
1408         emit      => '. enter',
1409         outs      => [ "frame:I", "stack:I|S", "M" ],
1410         latency   => 15,
1411         units     => [ "GP" ],
1412 },
1413
1414 Leave => {
1415         reg_req   => { in => [ "esp", "ebp" ], out => [ "ebp", "esp" ] },
1416         emit      => '. leave',
1417         outs      => [ "frame:I", "stack:I|S" ],
1418         latency   => 3,
1419         units     => [ "GP" ],
1420 },
1421
1422 AddSP => {
1423         irn_flags => "I",
1424         state     => "pinned",
1425         reg_req   => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "in_r4", "none" ] },
1426         ins       => [ "base", "index", "mem", "stack", "size" ],
1427         am        => "source,binary",
1428         emit      => '. addl %binop',
1429         latency   => 1,
1430         outs      => [ "stack:I|S", "M" ],
1431         units     => [ "GP" ],
1432         modified_flags => $status_flags
1433 },
1434
1435 SubSP => {
1436 #irn_flags => "I",
1437         state     => "pinned",
1438         reg_req   => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "in_r4", "gp", "none" ] },
1439         ins       => [ "base", "index", "mem", "stack", "size" ],
1440         am        => "source,binary",
1441         emit      => ". subl %binop\n".
1442                      ". movl %%esp, %D1",
1443         latency   => 2,
1444         outs      => [ "stack:I|S", "addr", "M" ],
1445         units     => [ "GP" ],
1446         modified_flags => $status_flags
1447 },
1448
1449 RepPrefix => {
1450         op_flags  => "K",
1451         state     => "pinned",
1452         mode      => "mode_M",
1453         emit      => ". rep",
1454         latency   => 0,
1455 },
1456
1457 LdTls => {
1458         irn_flags => "R",
1459         reg_req   => { out => [ "gp" ] },
1460         units     => [ "GP" ],
1461         latency   => 1,
1462 },
1463
1464
1465 #-----------------------------------------------------------------------------#
1466 #   _____ _____ ______    __ _             _                     _            #
1467 #  / ____/ ____|  ____|  / _| |           | |                   | |           #
1468 # | (___| (___ | |__    | |_| | ___   __ _| |_   _ __   ___   __| | ___  ___  #
1469 #  \___ \\___ \|  __|   |  _| |/ _ \ / _` | __| | '_ \ / _ \ / _` |/ _ \/ __| #
1470 #  ____) |___) | |____  | | | | (_) | (_| | |_  | | | | (_) | (_| |  __/\__ \ #
1471 # |_____/_____/|______| |_| |_|\___/ \__,_|\__| |_| |_|\___/ \__,_|\___||___/ #
1472 #-----------------------------------------------------------------------------#
1473
1474 xZero => {
1475         irn_flags => "R",
1476         reg_req   => { out => [ "xmm" ] },
1477         emit      => '. xorp%XSD %D0, %D0',
1478         latency   => 3,
1479         units     => [ "SSE" ],
1480         mode      => "mode_E",
1481 },
1482
1483 # commutative operations
1484
1485 xAdd => {
1486         irn_flags => "R",
1487         state     => "exc_pinned",
1488         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1489         ins       => [ "base", "index", "mem", "left", "right" ],
1490         am        => "source,binary",
1491         emit      => '. add%XXM %binop',
1492         latency   => 4,
1493         units     => [ "SSE" ],
1494         mode      => "mode_E",
1495 },
1496
1497 xMul => {
1498         irn_flags => "R",
1499         state     => "exc_pinned",
1500         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1501         ins       => [ "base", "index", "mem", "left", "right" ],
1502         am        => "source,binary",
1503         emit      => '. mul%XXM %binop',
1504         latency   => 4,
1505         units     => [ "SSE" ],
1506         mode      => "mode_E",
1507 },
1508
1509 xMax => {
1510         irn_flags => "R",
1511         state     => "exc_pinned",
1512         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1513         ins       => [ "base", "index", "mem", "left", "right" ],
1514         am        => "source,binary",
1515         emit      => '. max%XXM %binop',
1516         latency   => 2,
1517         units     => [ "SSE" ],
1518         mode      => "mode_E",
1519 },
1520
1521 xMin => {
1522         irn_flags => "R",
1523         state     => "exc_pinned",
1524         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1525         ins       => [ "base", "index", "mem", "left", "right" ],
1526         am        => "source,binary",
1527         emit      => '. min%XXM %binop',
1528         latency   => 2,
1529         units     => [ "SSE" ],
1530         mode      => "mode_E",
1531 },
1532
1533 xAnd => {
1534         irn_flags => "R",
1535         state     => "exc_pinned",
1536         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1537         ins       => [ "base", "index", "mem", "left", "right" ],
1538         am        => "source,binary",
1539         emit      => '. andp%XSD %binop',
1540         latency   => 3,
1541         units     => [ "SSE" ],
1542         mode      => "mode_E",
1543 },
1544
1545 xOr => {
1546         irn_flags => "R",
1547         state     => "exc_pinned",
1548         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1549         ins       => [ "base", "index", "mem", "left", "right" ],
1550         am        => "source,binary",
1551         emit      => '. orp%XSD %binop',
1552         latency   => 3,
1553         units     => [ "SSE" ],
1554         mode      => "mode_E",
1555 },
1556
1557 xXor => {
1558         irn_flags => "R",
1559         state     => "exc_pinned",
1560         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1561         ins       => [ "base", "index", "mem", "left", "right" ],
1562         am        => "source,binary",
1563         emit      => '. xorp%XSD %binop',
1564         latency   => 3,
1565         units     => [ "SSE" ],
1566         mode      => "mode_E",
1567 },
1568
1569 # not commutative operations
1570
1571 xAndNot => {
1572         irn_flags => "R",
1573         state     => "exc_pinned",
1574         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 !in_r5" ] },
1575         ins       => [ "base", "index", "mem", "left", "right" ],
1576         am        => "source,binary",
1577         emit      => '. andnp%XSD %binop',
1578         latency   => 3,
1579         units     => [ "SSE" ],
1580         mode      => "mode_E",
1581 },
1582
1583 xSub => {
1584         irn_flags => "R",
1585         state     => "exc_pinned",
1586         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4" ] },
1587         ins       => [ "base", "index", "mem", "left", "right" ],
1588         am        => "source,binary",
1589         emit      => '. sub%XXM %binop',
1590         latency   => 4,
1591         units     => [ "SSE" ],
1592         mode      => "mode_E",
1593 },
1594
1595 xDiv => {
1596         irn_flags => "R",
1597         state     => "exc_pinned",
1598         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 !in_r5", "none" ] },
1599         ins       => [ "base", "index", "mem", "left", "right" ],
1600         am        => "source,binary",
1601         outs      => [ "res", "M" ],
1602         emit      => '. div%XXM %binop',
1603         latency   => 16,
1604         units     => [ "SSE" ],
1605 },
1606
1607 # other operations
1608
1609 Ucomi => {
1610         irn_flags => "R",
1611         state     => "exc_pinned",
1612         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "eflags" ] },
1613         ins       => [ "base", "index", "mem", "left", "right" ],
1614         outs      => [ "flags" ],
1615         am        => "source,binary",
1616         attr      => "int ins_permuted",
1617         init_attr => "attr->data.ins_permuted = ins_permuted;",
1618         emit      => ' .ucomi%XXM %binop',
1619         latency   => 3,
1620         units     => [ "SSE" ],
1621         mode      => $mode_flags,
1622         modified_flags => 1,
1623 },
1624
1625 # Load / Store
1626
1627 xLoad => {
1628         op_flags  => "L|F",
1629         state     => "exc_pinned",
1630         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none", "none" ] },
1631         ins       => [ "base", "index", "mem" ],
1632         outs      => [ "res", "M", "X_exc" ],
1633         emit      => '. mov%XXM %AM, %D0',
1634         attr      => "ir_mode *load_mode",
1635         init_attr => "attr->ls_mode = load_mode;",
1636         latency   => 0,
1637         units     => [ "SSE" ],
1638 },
1639
1640 xStore => {
1641         op_flags => "L|F",
1642         state    => "exc_pinned",
1643         reg_req  => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none" ] },
1644         ins       => [ "base", "index", "mem", "val" ],
1645         outs      => [ "M", "X_exc" ],
1646         emit     => '. mov%XXM %S3, %AM',
1647         latency  => 0,
1648         units    => [ "SSE" ],
1649         mode     => "mode_M",
1650 },
1651
1652 xStoreSimple => {
1653         op_flags => "L|F",
1654         state    => "exc_pinned",
1655         reg_req  => { in => [ "gp", "gp", "none", "xmm" ] },
1656         ins      => [ "base", "index", "mem", "val" ],
1657         emit     => '. mov%XXM %S3, %AM',
1658         latency  => 0,
1659         units    => [ "SSE" ],
1660         mode     => "mode_M",
1661 },
1662
1663 CvtSI2SS => {
1664         op_flags => "L|F",
1665         state     => "exc_pinned",
1666         reg_req  => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
1667         ins      => [ "base", "index", "mem", "val" ],
1668         am       => "source,unary",
1669         emit     => '. cvtsi2ss %unop3, %D0',
1670         latency  => 2,
1671         units    => [ "SSE" ],
1672         mode     => $mode_xmm
1673 },
1674
1675 CvtSI2SD => {
1676         op_flags => "L|F",
1677         state     => "exc_pinned",
1678         reg_req  => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
1679         ins      => [ "base", "index", "mem", "val" ],
1680         am       => "source,unary",
1681         emit     => '. cvtsi2sd %unop3, %D0',
1682         latency  => 2,
1683         units    => [ "SSE" ],
1684         mode     => $mode_xmm
1685 },
1686
1687
1688 l_LLtoFloat => {
1689         op_flags => "L|F",
1690         cmp_attr => "return 1;",
1691         ins      => [ "val_high", "val_low" ],
1692 },
1693
1694 l_FloattoLL => {
1695         op_flags => "L|F",
1696         cmp_attr => "return 1;",
1697         ins      => [ "val" ],
1698         outs     => [ "res_high", "res_low" ],
1699 },
1700
1701 # CopyB
1702
1703 CopyB => {
1704         op_flags  => "F|H",
1705         state     => "pinned",
1706         reg_req   => { in => [ "edi", "esi", "ecx", "none" ], out => [ "edi", "esi", "ecx", "none" ] },
1707         outs      => [ "DST", "SRC", "CNT", "M" ],
1708         attr_type => "ia32_copyb_attr_t",
1709         attr      => "unsigned size",
1710         units     => [ "GP" ],
1711         latency  => 3,
1712 # we don't care about this flag, so no need to mark this node
1713 #       modified_flags => [ "DF" ]
1714 },
1715
1716 CopyB_i => {
1717         op_flags  => "F|H",
1718         state     => "pinned",
1719         reg_req   => { in => [ "edi", "esi", "none" ], out => [  "edi", "esi", "none" ] },
1720         outs      => [ "DST", "SRC", "M" ],
1721         attr_type => "ia32_copyb_attr_t",
1722         attr      => "unsigned size",
1723         units     => [ "GP" ],
1724         latency  => 3,
1725 # we don't care about this flag, so no need to mark this node
1726 #       modified_flags => [ "DF" ]
1727 },
1728
1729 # Conversions
1730
1731 Conv_I2I => {
1732         state     => "exc_pinned",
1733         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "gp", "none" ] },
1734         ins       => [ "base", "index", "mem", "val" ],
1735         am        => "source,unary",
1736         units     => [ "GP" ],
1737         latency   => 1,
1738         attr      => "ir_mode *smaller_mode",
1739         init_attr => "attr->ls_mode = smaller_mode;",
1740         mode      => $mode_gp,
1741 },
1742
1743 Conv_I2I8Bit => {
1744         state     => "exc_pinned",
1745         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "gp", "none" ] },
1746         ins       => [ "base", "index", "mem", "val" ],
1747         am        => "source,unary",
1748         units     => [ "GP" ],
1749         latency   => 1,
1750         attr      => "ir_mode *smaller_mode",
1751         init_attr => "attr->ls_mode = smaller_mode;",
1752         mode      => $mode_gp,
1753 },
1754
1755 Conv_I2FP => {
1756         state     => "exc_pinned",
1757         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm", "none" ] },
1758         ins       => [ "base", "index", "mem", "val" ],
1759         am        => "source,unary",
1760         latency   => 10,
1761         units     => [ "SSE" ],
1762         mode      => "mode_E",
1763 },
1764
1765 Conv_FP2I => {
1766         state     => "exc_pinned",
1767         reg_req   => { in => [ "gp", "gp", "none", "xmm" ], out => [ "gp", "none" ] },
1768         ins       => [ "base", "index", "mem", "val" ],
1769         am        => "source,unary",
1770         latency   => 10,
1771         units     => [ "SSE" ],
1772         mode      => $mode_gp,
1773 },
1774
1775 Conv_FP2FP => {
1776         state     => "exc_pinned",
1777         reg_req   => { in => [ "gp", "gp", "none", "xmm" ], out => [ "xmm", "none" ] },
1778         ins       => [ "base", "index", "mem", "val" ],
1779         am        => "source,unary",
1780         latency   => 8,
1781         units     => [ "SSE" ],
1782         mode      => "mode_E",
1783 },
1784
1785 #----------------------------------------------------------#
1786 #        _      _               _    __ _             _    #
1787 #       (_)    | |             | |  / _| |           | |   #
1788 # __   ___ _ __| |_ _   _  __ _| | | |_| | ___   __ _| |_  #
1789 # \ \ / / | '__| __| | | |/ _` | | |  _| |/ _ \ / _` | __| #
1790 #  \ V /| | |  | |_| |_| | (_| | | | | | | (_) | (_| | |_  #
1791 #   \_/ |_|_|   \__|\__,_|\__,_|_| |_| |_|\___/ \__,_|\__| #
1792 #                 | |                                      #
1793 #  _ __   ___   __| | ___  ___                             #
1794 # | '_ \ / _ \ / _` |/ _ \/ __|                            #
1795 # | | | | (_) | (_| |  __/\__ \                            #
1796 # |_| |_|\___/ \__,_|\___||___/                            #
1797 #----------------------------------------------------------#
1798
1799 # rematerialisation disabled for all float nodes for now, because the fpcw
1800 # handler runs before spilling and we might end up with wrong fpcw then
1801
1802 vfadd => {
1803 #       irn_flags => "R",
1804         state     => "exc_pinned",
1805         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1806         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1807         am        => "source,binary",
1808         latency   => 4,
1809         units     => [ "VFP" ],
1810         mode      => "mode_E",
1811         attr_type => "ia32_x87_attr_t",
1812 },
1813
1814 vfmul => {
1815 #       irn_flags => "R",
1816         state     => "exc_pinned",
1817         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1818         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1819         am        => "source,binary",
1820         latency   => 4,
1821         units     => [ "VFP" ],
1822         mode      => "mode_E",
1823         attr_type => "ia32_x87_attr_t",
1824 },
1825
1826 vfsub => {
1827 #       irn_flags => "R",
1828         state     => "exc_pinned",
1829         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1830         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1831         am        => "source,binary",
1832         latency   => 4,
1833         units     => [ "VFP" ],
1834         mode      => "mode_E",
1835         attr_type => "ia32_x87_attr_t",
1836 },
1837
1838 vfdiv => {
1839         state     => "exc_pinned",
1840         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp", "none" ] },
1841         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1842         am        => "source,binary",
1843         outs      => [ "res", "M" ],
1844         latency   => 20,
1845         units     => [ "VFP" ],
1846         attr_type => "ia32_x87_attr_t",
1847 },
1848
1849 vfprem => {
1850         reg_req   => { in => [ "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1851         ins       => [ "left", "right", "fpcw" ],
1852         latency   => 20,
1853         units     => [ "VFP" ],
1854         mode      => "mode_E",
1855         attr_type => "ia32_x87_attr_t",
1856 },
1857
1858 vfabs => {
1859         irn_flags => "R",
1860         reg_req   => { in => [ "vfp"], out => [ "vfp" ] },
1861         ins       => [ "value" ],
1862         latency   => 2,
1863         units     => [ "VFP" ],
1864         mode      => "mode_E",
1865         attr_type => "ia32_x87_attr_t",
1866 },
1867
1868 vfchs => {
1869         irn_flags => "R",
1870         reg_req   => { in => [ "vfp"], out => [ "vfp" ] },
1871         ins       => [ "value" ],
1872         latency   => 2,
1873         units     => [ "VFP" ],
1874         mode      => "mode_E",
1875         attr_type => "ia32_x87_attr_t",
1876 },
1877
1878 # virtual Load and Store
1879
1880 vfld => {
1881         irn_flags => "R",
1882         op_flags  => "L|F",
1883         state     => "exc_pinned",
1884         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "vfp", "none", "none" ] },
1885         ins       => [ "base", "index", "mem" ],
1886         outs      => [ "res", "M", "X_exc" ],
1887         attr      => "ir_mode *load_mode",
1888         init_attr => "attr->attr.ls_mode = load_mode;",
1889         latency   => 2,
1890         units     => [ "VFP" ],
1891         attr_type => "ia32_x87_attr_t",
1892 },
1893
1894 vfst => {
1895         irn_flags => "R",
1896         op_flags  => "L|F",
1897         state     => "exc_pinned",
1898         reg_req   => { in => [ "gp", "gp", "none", "vfp" ], out => [ "none", "none" ] },
1899         ins       => [ "base", "index", "mem", "val" ],
1900         outs      => [ "M", "X_exc" ],
1901         attr      => "ir_mode *store_mode",
1902         init_attr => "attr->attr.ls_mode = store_mode;",
1903         latency   => 2,
1904         units     => [ "VFP" ],
1905         mode      => "mode_M",
1906         attr_type => "ia32_x87_attr_t",
1907 },
1908
1909 # Conversions
1910
1911 vfild => {
1912         state     => "exc_pinned",
1913         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "vfp", "none" ] },
1914         outs      => [ "res", "M" ],
1915         ins       => [ "base", "index", "mem" ],
1916         latency   => 4,
1917         units     => [ "VFP" ],
1918         attr_type => "ia32_x87_attr_t",
1919 },
1920
1921 l_vfild => {
1922         cmp_attr  => "return 1;",
1923         outs      => [ "res", "M" ],
1924         arity     => 2,
1925 },
1926
1927 vfist => {
1928         state     => "exc_pinned",
1929         reg_req   => { in => [ "gp", "gp", "none", "vfp", "fpcw" ] },
1930         ins       => [ "base", "index", "mem", "val", "fpcw" ],
1931         latency   => 4,
1932         units     => [ "VFP" ],
1933         mode      => "mode_M",
1934         attr_type => "ia32_x87_attr_t",
1935 },
1936
1937 l_vfist => {
1938         cmp_attr  => "return 1;",
1939         state     => "exc_pinned",
1940         arity     => 3,
1941         mode      => "mode_M",
1942 },
1943
1944
1945 # constants
1946
1947 vfldz => {
1948         irn_flags => "R",
1949         reg_req   => { out => [ "vfp" ] },
1950         latency   => 4,
1951         units     => [ "VFP" ],
1952         mode      => "mode_E",
1953         attr_type => "ia32_x87_attr_t",
1954 },
1955
1956 vfld1 => {
1957         irn_flags => "R",
1958         reg_req   => { out => [ "vfp" ] },
1959         latency   => 4,
1960         units     => [ "VFP" ],
1961         mode      => "mode_E",
1962         attr_type => "ia32_x87_attr_t",
1963 },
1964
1965 vfldpi => {
1966         irn_flags => "R",
1967         reg_req   => { out => [ "vfp" ] },
1968         latency   => 4,
1969         units     => [ "VFP" ],
1970         mode      => "mode_E",
1971         attr_type => "ia32_x87_attr_t",
1972 },
1973
1974 vfldln2 => {
1975         irn_flags => "R",
1976         reg_req   => { out => [ "vfp" ] },
1977         latency   => 4,
1978         units     => [ "VFP" ],
1979         mode      => "mode_E",
1980         attr_type => "ia32_x87_attr_t",
1981 },
1982
1983 vfldlg2 => {
1984         irn_flags => "R",
1985         reg_req   => { out => [ "vfp" ] },
1986         latency   => 4,
1987         units     => [ "VFP" ],
1988         mode      => "mode_E",
1989         attr_type => "ia32_x87_attr_t",
1990 },
1991
1992 vfldl2t => {
1993         irn_flags => "R",
1994         reg_req   => { out => [ "vfp" ] },
1995         latency   => 4,
1996         units     => [ "VFP" ],
1997         mode      => "mode_E",
1998         attr_type => "ia32_x87_attr_t",
1999 },
2000
2001 vfldl2e => {
2002         irn_flags => "R",
2003         reg_req   => { out => [ "vfp" ] },
2004         latency   => 4,
2005         units     => [ "VFP" ],
2006         mode      => "mode_E",
2007         attr_type => "ia32_x87_attr_t",
2008 },
2009
2010 # other
2011
2012 vFucomFnstsw => {
2013 # we can't allow to rematerialize this node so we don't have
2014 #  accidently produce Phi(Fucom, Fucom(ins_permuted))
2015 #       irn_flags => "R",
2016         reg_req   => { in => [ "vfp", "vfp" ], out => [ "eax" ] },
2017         ins       => [ "left", "right" ],
2018         outs      => [ "flags" ],
2019         attr      => "int ins_permuted",
2020         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2021         latency   => 3,
2022         units     => [ "VFP" ],
2023         attr_type => "ia32_x87_attr_t",
2024         mode      => $mode_gp
2025 },
2026
2027 vFucomi => {
2028         irn_flags => "R",
2029         reg_req   => { in => [ "vfp", "vfp" ], out => [ "eflags" ] },
2030         ins       => [ "left", "right" ],
2031         outs      => [ "flags" ],
2032         attr      => "int ins_permuted",
2033         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2034         latency   => 3,
2035         units     => [ "VFP" ],
2036         attr_type => "ia32_x87_attr_t",
2037         mode      => $mode_gp
2038 },
2039
2040 vFtstFnstsw => {
2041 #       irn_flags => "R",
2042         reg_req   => { in => [ "vfp" ], out => [ "eax" ] },
2043         ins       => [ "left" ],
2044         outs      => [ "flags" ],
2045         attr      => "int ins_permuted",
2046         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2047         latency   => 3,
2048         units     => [ "VFP" ],
2049         attr_type => "ia32_x87_attr_t",
2050         mode      => $mode_gp
2051 },
2052
2053 Sahf => {
2054         irn_flags => "R",
2055         reg_req   => { in => [ "eax" ], out => [ "eflags" ] },
2056         ins       => [ "val" ],
2057         outs      => [ "flags" ],
2058         emit      => '. sahf',
2059         latency   => 1,
2060         units     => [ "GP" ],
2061         mode      => $mode_flags,
2062 },
2063
2064 #------------------------------------------------------------------------#
2065 #       ___ _____    __ _             _                     _            #
2066 # __  _( _ )___  |  / _| | ___   __ _| |_   _ __   ___   __| | ___  ___  #
2067 # \ \/ / _ \  / /  | |_| |/ _ \ / _` | __| | '_ \ / _ \ / _` |/ _ \/ __| #
2068 #  >  < (_) |/ /   |  _| | (_) | (_| | |_  | | | | (_) | (_| |  __/\__ \ #
2069 # /_/\_\___//_/    |_| |_|\___/ \__,_|\__| |_| |_|\___/ \__,_|\___||___/ #
2070 #------------------------------------------------------------------------#
2071
2072 # Note: gas is strangely buggy: fdivrp and fdivp as well as fsubrp and fsubp
2073 #       are swapped, we work this around in the emitter...
2074
2075 fadd => {
2076         state     => "exc_pinned",
2077         rd_constructor => "NONE",
2078         reg_req   => { },
2079         emit      => '. fadd%XM %x87_binop',
2080         latency   => 4,
2081         attr_type => "ia32_x87_attr_t",
2082 },
2083
2084 faddp => {
2085         state     => "exc_pinned",
2086         rd_constructor => "NONE",
2087         reg_req   => { },
2088         emit      => '. faddp%XM %x87_binop',
2089         latency   => 4,
2090         attr_type => "ia32_x87_attr_t",
2091 },
2092
2093 fmul => {
2094         state     => "exc_pinned",
2095         rd_constructor => "NONE",
2096         reg_req   => { },
2097         emit      => '. fmul%XM %x87_binop',
2098         latency   => 4,
2099         attr_type => "ia32_x87_attr_t",
2100 },
2101
2102 fmulp => {
2103         state     => "exc_pinned",
2104         rd_constructor => "NONE",
2105         reg_req   => { },
2106         emit      => '. fmulp%XM %x87_binop',,
2107         latency   => 4,
2108         attr_type => "ia32_x87_attr_t",
2109 },
2110
2111 fsub => {
2112         state     => "exc_pinned",
2113         rd_constructor => "NONE",
2114         reg_req   => { },
2115         emit      => '. fsub%XM %x87_binop',
2116         latency   => 4,
2117         attr_type => "ia32_x87_attr_t",
2118 },
2119
2120 fsubp => {
2121         state     => "exc_pinned",
2122         rd_constructor => "NONE",
2123         reg_req   => { },
2124 # see note about gas bugs
2125         emit      => '. fsubrp%XM %x87_binop',
2126         latency   => 4,
2127         attr_type => "ia32_x87_attr_t",
2128 },
2129
2130 fsubr => {
2131         state     => "exc_pinned",
2132         rd_constructor => "NONE",
2133         irn_flags => "R",
2134         reg_req   => { },
2135         emit      => '. fsubr%XM %x87_binop',
2136         latency   => 4,
2137         attr_type => "ia32_x87_attr_t",
2138 },
2139
2140 fsubrp => {
2141         state     => "exc_pinned",
2142         rd_constructor => "NONE",
2143         irn_flags => "R",
2144         reg_req   => { },
2145 # see note about gas bugs
2146         emit      => '. fsubp%XM %x87_binop',
2147         latency   => 4,
2148         attr_type => "ia32_x87_attr_t",
2149 },
2150
2151 fprem => {
2152         rd_constructor => "NONE",
2153         reg_req   => { },
2154         emit      => '. fprem1',
2155         latency   => 20,
2156         attr_type => "ia32_x87_attr_t",
2157 },
2158
2159 # this node is just here, to keep the simulator running
2160 # we can omit this when a fprem simulation function exists
2161 fpremp => {
2162         rd_constructor => "NONE",
2163         reg_req   => { },
2164         emit      => '. fprem1\n'.
2165                      '. fstp %X0',
2166         latency   => 20,
2167         attr_type => "ia32_x87_attr_t",
2168 },
2169
2170 fdiv => {
2171         state     => "exc_pinned",
2172         rd_constructor => "NONE",
2173         reg_req   => { },
2174         emit      => '. fdiv%XM %x87_binop',
2175         latency   => 20,
2176         attr_type => "ia32_x87_attr_t",
2177 },
2178
2179 fdivp => {
2180         state     => "exc_pinned",
2181         rd_constructor => "NONE",
2182         reg_req   => { },
2183 # see note about gas bugs
2184         emit      => '. fdivrp%XM %x87_binop',
2185         latency   => 20,
2186         attr_type => "ia32_x87_attr_t",
2187 },
2188
2189 fdivr => {
2190         state     => "exc_pinned",
2191         rd_constructor => "NONE",
2192         reg_req   => { },
2193         emit      => '. fdivr%XM %x87_binop',
2194         latency   => 20,
2195         attr_type => "ia32_x87_attr_t",
2196 },
2197
2198 fdivrp => {
2199         state     => "exc_pinned",
2200         rd_constructor => "NONE",
2201         reg_req   => { },
2202 # see note about gas bugs
2203         emit      => '. fdivp%XM %x87_binop',
2204         latency   => 20,
2205         attr_type => "ia32_x87_attr_t",
2206 },
2207
2208 fabs => {
2209         rd_constructor => "NONE",
2210         reg_req   => { },
2211         emit      => '. fabs',
2212         latency   => 4,
2213         attr_type => "ia32_x87_attr_t",
2214 },
2215
2216 fchs => {
2217         op_flags  => "R|K",
2218         rd_constructor => "NONE",
2219         reg_req   => { },
2220         emit      => '. fchs',
2221         latency   => 4,
2222         attr_type => "ia32_x87_attr_t",
2223 },
2224
2225 # x87 Load and Store
2226
2227 fld => {
2228         rd_constructor => "NONE",
2229         op_flags  => "R|L|F",
2230         state     => "exc_pinned",
2231         reg_req   => { },
2232         emit      => '. fld%XM %AM',
2233         attr_type => "ia32_x87_attr_t",
2234         latency   => 2,
2235 },
2236
2237 fst => {
2238         rd_constructor => "NONE",
2239         op_flags  => "R|L|F",
2240         state     => "exc_pinned",
2241         reg_req   => { },
2242         emit      => '. fst%XM %AM',
2243         mode      => "mode_M",
2244         attr_type => "ia32_x87_attr_t",
2245         latency   => 2,
2246 },
2247
2248 fstp => {
2249         rd_constructor => "NONE",
2250         op_flags  => "R|L|F",
2251         state     => "exc_pinned",
2252         reg_req   => { },
2253         emit      => '. fstp%XM %AM',
2254         mode      => "mode_M",
2255         attr_type => "ia32_x87_attr_t",
2256         latency   => 2,
2257 },
2258
2259 # Conversions
2260
2261 fild => {
2262         state     => "exc_pinned",
2263         rd_constructor => "NONE",
2264         reg_req   => { },
2265         emit      => '. fild%M %AM',
2266         attr_type => "ia32_x87_attr_t",
2267         latency   => 2,
2268 },
2269
2270 fist => {
2271         state     => "exc_pinned",
2272         rd_constructor => "NONE",
2273         reg_req   => { },
2274         emit      => '. fist%M %AM',
2275         mode      => "mode_M",
2276         attr_type => "ia32_x87_attr_t",
2277         latency   => 2,
2278 },
2279
2280 fistp => {
2281         state     => "exc_pinned",
2282         rd_constructor => "NONE",
2283         reg_req   => { },
2284         emit      => '. fistp%M %AM',
2285         mode      => "mode_M",
2286         attr_type => "ia32_x87_attr_t",
2287         latency   => 2,
2288 },
2289
2290 # constants
2291
2292 fldz => {
2293         op_flags  => "R|c|K",
2294         irn_flags => "R",
2295         reg_req   => { out => [ "vfp" ] },
2296         emit      => '. fldz',
2297         attr_type => "ia32_x87_attr_t",
2298         latency   => 2,
2299 },
2300
2301 fld1 => {
2302         op_flags  => "R|c|K",
2303         irn_flags => "R",
2304         reg_req   => { out => [ "vfp" ] },
2305         emit      => '. fld1',
2306         attr_type => "ia32_x87_attr_t",
2307         latency   => 2,
2308 },
2309
2310 fldpi => {
2311         op_flags  => "R|c|K",
2312         irn_flags => "R",
2313         reg_req   => { out => [ "vfp" ] },
2314         emit      => '. fldpi',
2315         attr_type => "ia32_x87_attr_t",
2316         latency   => 2,
2317 },
2318
2319 fldln2 => {
2320         op_flags  => "R|c|K",
2321         irn_flags => "R",
2322         reg_req   => { out => [ "vfp" ] },
2323         emit      => '. fldln2',
2324         attr_type => "ia32_x87_attr_t",
2325         latency   => 2,
2326 },
2327
2328 fldlg2 => {
2329         op_flags  => "R|c|K",
2330         irn_flags => "R",
2331         reg_req   => { out => [ "vfp" ] },
2332         emit      => '. fldlg2',
2333         attr_type => "ia32_x87_attr_t",
2334         latency   => 2,
2335 },
2336
2337 fldl2t => {
2338         op_flags  => "R|c|K",
2339         irn_flags => "R",
2340         reg_req   => { out => [ "vfp" ] },
2341         emit      => '. fldll2t',
2342         attr_type => "ia32_x87_attr_t",
2343         latency   => 2,
2344 },
2345
2346 fldl2e => {
2347         op_flags  => "R|c|K",
2348         irn_flags => "R",
2349         reg_req   => { out => [ "vfp" ] },
2350         emit      => '. fldl2e',
2351         attr_type => "ia32_x87_attr_t",
2352         latency   => 2,
2353 },
2354
2355 # fxch, fpush, fpop
2356 # Note that it is NEVER allowed to do CSE on these nodes
2357 # Moreover, note the virtual register requierements!
2358
2359 fxch => {
2360         op_flags  => "R|K",
2361         reg_req   => { },
2362         cmp_attr  => "return 1;",
2363         emit      => '. fxch %X0',
2364         attr_type => "ia32_x87_attr_t",
2365         mode      => "mode_ANY",
2366         latency   => 1,
2367 },
2368
2369 fpush => {
2370         op_flags  => "R|K",
2371         reg_req   => {},
2372         cmp_attr  => "return 1;",
2373         emit      => '. fld %X0',
2374         attr_type => "ia32_x87_attr_t",
2375         mode      => "mode_ANY",
2376         latency   => 1,
2377 },
2378
2379 fpushCopy => {
2380         reg_req   => { in => [ "vfp"], out => [ "vfp" ] },
2381         cmp_attr  => "return 1;",
2382         emit      => '. fld %X0',
2383         attr_type => "ia32_x87_attr_t",
2384         latency   => 1,
2385 },
2386
2387 fpop => {
2388         op_flags  => "K",
2389         reg_req   => { },
2390         cmp_attr  => "return 1;",
2391         emit      => '. fstp %X0',
2392         attr_type => "ia32_x87_attr_t",
2393         mode      => "mode_ANY",
2394         latency   => 1,
2395 },
2396
2397 ffreep => {
2398         op_flags  => "K",
2399         reg_req   => { },
2400         cmp_attr  => "return 1;",
2401         emit      => '. ffreep %X0',
2402         attr_type => "ia32_x87_attr_t",
2403         mode      => "mode_ANY",
2404         latency   => 1,
2405 },
2406
2407 emms => {
2408         op_flags  => "K",
2409         reg_req   => { },
2410         cmp_attr  => "return 1;",
2411         emit      => '. emms',
2412         attr_type => "ia32_x87_attr_t",
2413         mode      => "mode_ANY",
2414         latency   => 3,
2415 },
2416
2417 femms => {
2418         op_flags  => "K",
2419         reg_req   => { },
2420         cmp_attr  => "return 1;",
2421         emit      => '. femms',
2422         attr_type => "ia32_x87_attr_t",
2423         mode      => "mode_ANY",
2424         latency   => 3,
2425 },
2426
2427 # compare
2428
2429 FucomFnstsw => {
2430         reg_req   => { },
2431         emit      => ". fucom %X1\n".
2432                      ". fnstsw %%ax",
2433         attr_type => "ia32_x87_attr_t",
2434         latency   => 2,
2435 },
2436
2437 FucompFnstsw => {
2438         reg_req   => { },
2439         emit      => ". fucomp %X1\n".
2440                      ". fnstsw %%ax",
2441         attr_type => "ia32_x87_attr_t",
2442         latency   => 2,
2443 },
2444
2445 FucomppFnstsw => {
2446         reg_req   => { },
2447         emit      => ". fucompp\n".
2448                      ". fnstsw %%ax",
2449         attr_type => "ia32_x87_attr_t",
2450         latency   => 2,
2451 },
2452
2453 Fucomi => {
2454         reg_req   => { },
2455         emit      => '. fucomi %X1',
2456         attr_type => "ia32_x87_attr_t",
2457         latency   => 1,
2458 },
2459
2460 Fucompi => {
2461         reg_req   => { },
2462         emit      => '. fucompi %X1',
2463         attr_type => "ia32_x87_attr_t",
2464         latency   => 1,
2465 },
2466
2467 FtstFnstsw => {
2468         reg_req   => { },
2469         emit      => ". ftst\n".
2470                      ". fnstsw %%ax",
2471         attr_type => "ia32_x87_attr_t",
2472         latency   => 2,
2473 },
2474
2475
2476 # -------------------------------------------------------------------------------- #
2477 #  ____ ____  _____                  _                               _             #
2478 # / ___/ ___|| ____| __   _____  ___| |_ ___  _ __   _ __   ___   __| | ___  ___   #
2479 # \___ \___ \|  _|   \ \ / / _ \/ __| __/ _ \| '__| | '_ \ / _ \ / _` |/ _ \/ __|  #
2480 #  ___) |__) | |___   \ V /  __/ (__| || (_) | |    | | | | (_) | (_| |  __/\__ \  #
2481 # |____/____/|_____|   \_/ \___|\___|\__\___/|_|    |_| |_|\___/ \__,_|\___||___/  #
2482 #                                                                                  #
2483 # -------------------------------------------------------------------------------- #
2484
2485
2486 # Spilling and reloading of SSE registers, hardcoded, not generated #
2487
2488 xxLoad => {
2489         op_flags  => "L|F",
2490         state     => "exc_pinned",
2491         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none" ] },
2492         emit      => '. movdqu %D0, %AM',
2493         outs      => [ "res", "M" ],
2494         units     => [ "SSE" ],
2495         latency   => 1,
2496 },
2497
2498 xxStore => {
2499         op_flags => "L|F",
2500         state    => "exc_pinned",
2501         reg_req  => { in => [ "gp", "gp", "none", "xmm" ] },
2502         ins      => [ "base", "index", "mem", "val" ],
2503         emit     => '. movdqu %binop',
2504         units    => [ "SSE" ],
2505         latency   => 1,
2506         mode     => "mode_M",
2507 },
2508
2509 ); # end of %nodes
2510
2511 # Include the generated SIMD node specification written by the SIMD optimization
2512 $my_script_name = dirname($myname) . "/../ia32/ia32_simd_spec.pl";
2513 unless ($return = do $my_script_name) {
2514         warn "couldn't parse $my_script_name: $@" if $@;
2515         warn "couldn't do $my_script_name: $!"    unless defined $return;
2516         warn "couldn't run $my_script_name"       unless $return;
2517 }
2518
2519 # Transform some attributes
2520 foreach my $op (keys(%nodes)) {
2521         my $node         = $nodes{$op};
2522         my $op_attr_init = $node->{op_attr_init};
2523
2524         if(defined($op_attr_init)) {
2525                 $op_attr_init .= "\n\t";
2526         } else {
2527                 $op_attr_init = "";
2528         }
2529
2530         if(!defined($node->{latency})) {
2531                 if($op =~ m/^l_/) {
2532                         $node->{latency} = 0;
2533                 } else {
2534                         die("Latency missing for op $op");
2535                 }
2536         }
2537         $op_attr_init .= "attr->latency = ".$node->{latency} . ";";
2538
2539         $node->{op_attr_init} = $op_attr_init;
2540 }
2541
2542 print "";