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