X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2FTEMPLATE%2FTEMPLATE_spec.pl;h=17179adb3a6dcbb428febabe9982b3293af849cf;hb=e9e538b53d0d890d5037faf17f0865299a75dd28;hp=4025c8a0695ea9d541a1eb3100b6b7b0195e883d;hpb=07ce9818702faae854ee98b17e94a30a7a7022b5;p=libfirm diff --git a/ir/be/TEMPLATE/TEMPLATE_spec.pl b/ir/be/TEMPLATE/TEMPLATE_spec.pl index 4025c8a06..17179adb3 100644 --- a/ir/be/TEMPLATE/TEMPLATE_spec.pl +++ b/ir/be/TEMPLATE/TEMPLATE_spec.pl @@ -1,15 +1,11 @@ -# Creation: 2006/02/13 -# $Id$ - # the cpu architecture (ia32, ia64, mips, sparc, ppc, ...) - $arch = "TEMPLATE"; # # Modes # $mode_gp = "mode_Iu"; # mode used by general purpose registers -$mode_fp = "mode_E"; # mode used by floatingpoint registers +$mode_fp = "mode_F"; # mode used by floatingpoint registers # The node description is done as a perl hash initializer with the # following structure: @@ -61,67 +57,51 @@ $mode_fp = "mode_E"; # mode used by floatingpoint registers # # register types: # 0 - no special type -# 1 - caller save (register must be saved by the caller of a function) -# 2 - callee save (register must be saved by the called function) -# 4 - ignore (do not assign this register) +# 1 - ignore (do not assign this register) +# 2 - the register is a virtual one +# 4 - register represents a state # NOTE: Last entry of each class is the largest Firm-Mode a register can hold %reg_classes = ( gp => [ - { name => "r0", type => 1 }, - { name => "r1", type => 1 }, - { name => "r2", type => 1 }, - { name => "r3", type => 1 }, - { name => "r4", type => 1 }, - { name => "r5", type => 1 }, - { name => "r6", type => 1 }, - { name => "r7", type => 2 }, - { name => "r8", type => 2 }, - { name => "r9", type => 2 }, - { name => "r10", type => 2 }, - { name => "r11", type => 2 }, - { name => "r12", type => 2 }, - { name => "r13", type => 2 }, - { name => "sp", realname => "r14", type => 4 }, # stackpointer - { name => "bp", realname => "r15", type => 4 }, # basepointer + { name => "r0" }, + { name => "r1" }, + { name => "r2" }, + { name => "r3" }, + { name => "r4" }, + { name => "r5" }, + { name => "r6" }, + { name => "r7" }, + { name => "r8" }, + { name => "r9" }, + { name => "r10" }, + { name => "r11" }, + { name => "r12" }, + { name => "r13" }, + { name => "sp", realname => "r14", type => 1 }, # stackpointer + { name => "bp", realname => "r15", type => 1 }, # basepointer { mode => $mode_gp } ], fp => [ - { name => "f0", type => 1 }, - { name => "f1", type => 1 }, - { name => "f2", type => 1 }, - { name => "f3", type => 1 }, - { name => "f4", type => 1 }, - { name => "f5", type => 1 }, - { name => "f6", type => 1 }, - { name => "f7", type => 1 }, - { name => "f8", type => 1 }, - { name => "f9", type => 1 }, - { name => "f10", type => 1 }, - { name => "f11", type => 1 }, - { name => "f12", type => 1 }, - { name => "f13", type => 1 }, - { name => "f14", type => 1 }, - { name => "f15", type => 1 }, + { name => "f0" }, + { name => "f1" }, + { name => "f2" }, + { name => "f3" }, + { name => "f4" }, + { name => "f5" }, + { name => "f6" }, + { name => "f7" }, + { name => "f8" }, + { name => "f9" }, + { name => "f10" }, + { name => "f11" }, + { name => "f12" }, + { name => "f13" }, + { name => "f14" }, + { name => "f15" }, { mode => $mode_fp } ] ); -%emit_templates = ( - S1 => "${arch}_emit_source_register(node, 0);", - S2 => "${arch}_emit_source_register(node, 1);", - S3 => "${arch}_emit_source_register(node, 2);", - S4 => "${arch}_emit_source_register(node, 3);", - S5 => "${arch}_emit_source_register(node, 4);", - S6 => "${arch}_emit_source_register(node, 5);", - D1 => "${arch}_emit_dest_register(node, 0);", - D2 => "${arch}_emit_dest_register(node, 1);", - D3 => "${arch}_emit_dest_register(node, 2);", - D4 => "${arch}_emit_dest_register(node, 3);", - D5 => "${arch}_emit_dest_register(node, 4);", - D6 => "${arch}_emit_dest_register(node, 5);", - C => "${arch}_emit_immediate(node);" -); - $default_attr_type = "TEMPLATE_attr_t"; $default_copy_attr = "TEMPLATE_copy_attr"; @@ -133,7 +113,7 @@ Add => { op_flags => [ "commutative" ], irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit => '. add %S1, %S2, %D1', + emit => 'add %S1, %S2, %D1', mode => $mode_gp, }, @@ -141,7 +121,7 @@ Mul => { op_flags => [ "commutative" ], irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit =>'. mul %S1, %S2, %D1', + emit =>'mul %S1, %S2, %D1', mode => $mode_gp, }, @@ -149,7 +129,7 @@ And => { op_flags => [ "commutative" ], irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit => '. and %S1, %S2, %D1', + emit => 'and %S1, %S2, %D1', mode => $mode_gp, }, @@ -157,7 +137,7 @@ Or => { op_flags => [ "commutative" ], irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit => '. or %S1, %S2, %D1', + emit => 'or %S1, %S2, %D1', mode => $mode_gp, }, @@ -165,35 +145,35 @@ Xor => { op_flags => [ "commutative" ], irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit => '. xor %S1, %S2, %D1', + emit => 'xor %S1, %S2, %D1', mode => $mode_gp, }, Sub => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit => '. sub %S1, %S2, %D1', + emit => 'sub %S1, %S2, %D1', mode => $mode_gp, }, Shl => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] }, - emit => '. shl %S1, %S2, %D1', + emit => 'shl %S1, %S2, %D1', mode => $mode_gp, }, Shr => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp", "gp" ], out => [ "in_r1" ] }, - emit => '. shr %S2, %D1', + emit => 'shr %S2, %D1', mode => $mode_gp, }, Minus => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "gp" ], out => [ "gp" ] }, - emit => '. neg %S1, %D1', + emit => 'neg %S1, %D1', mode => $mode_gp, }, @@ -201,17 +181,17 @@ Not => { arity => 1, remat => 1, reg_req => { in => [ "gp" ], out => [ "gp" ] }, - emit => '. not %S1, %D1', + emit => 'not %S1, %D1', mode => $mode_gp, }, Const => { op_flags => [ "constlike" ], irn_flags => [ "rematerializable" ], - attr => "tarval *value", + attr => "ir_tarval *value", custominit => "set_TEMPLATE_value(res, value);", reg_req => { out => [ "gp" ] }, - emit => '. mov %C, %D1', + emit => 'mov %I, %D1', cmp_attr => ' /* TODO: compare Const attributes */ @@ -230,22 +210,37 @@ Jmp => { mode => "mode_X", }, +Start => { + state => "pinned", + reg_req => { in => [], out => [ "sp:I|S", "none" ] }, + outs => [ "stack", "M" ], + ins => [], +}, + +Return => { + state => "pinned", + op_flags => [ "cfopcode" ], + ins => [ "stack", "mem" ], + reg_req => { in => [ "sp", "none", ], out => [] }, + mode => "mode_X", +}, + # Load / Store Load => { - op_flags => [ "labeled", "fragile" ], + op_flags => [ "uses_memory" ], irn_flags => [ "rematerializable" ], state => "exc_pinned", reg_req => { in => [ "gp", "none" ], out => [ "gp" ] }, - emit => '. mov (%S1), %D1', + emit => 'mov (%S1), %D1', }, Store => { - op_flags => [ "labeled", "fragile" ], + op_flags => [ "uses_memory" ], irn_flags => [ "rematerializable" ], state => "exc_pinned", reg_req => { in => [ "gp", "gp", "none" ] }, - emit => '. movl %S2, (%S1)', + emit => 'movl %S2, (%S1)', }, # Floating Point operations @@ -254,34 +249,34 @@ fAdd => { op_flags => [ "commutative" ], irn_flags => [ "rematerializable" ], reg_req => { in => [ "fp", "fp" ], out => [ "fp" ] }, - emit => '. fadd %S1, %S2, %D1', + emit => 'fadd %S1, %S2, %D1', mode => $mode_fp, }, fMul => { op_flags => [ "commutative" ], reg_req => { in => [ "fp", "fp" ], out => [ "fp" ] }, - emit =>'. fmul %S1, %S2, %D1', + emit =>'fmul %S1, %S2, %D1', mode => $mode_fp, }, fSub => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "fp", "fp" ], out => [ "fp" ] }, - emit => '. fsub %S1, %S2, %D1', + emit => 'fsub %S1, %S2, %D1', mode => $mode_fp, }, fDiv => { reg_req => { in => [ "fp", "fp" ], out => [ "fp" ] }, - emit => '. fdiv %S1, %S2, %D1', + emit => 'fdiv %S1, %S2, %D1', mode => $mode_fp, }, fMinus => { irn_flags => [ "rematerializable" ], reg_req => { in => [ "fp" ], out => [ "fp" ] }, - emit => '. fneg %S1, %D1', + emit => 'fneg %S1, %D1', mode => $mode_fp, }, @@ -289,7 +284,7 @@ fConst => { op_flags => [ "constlike" ], irn_flags => [ "rematerializable" ], reg_req => { out => [ "fp" ] }, - emit => '. fmov %C, %D1', + emit => 'fmov %I, %D1', cmp_attr => ' /* TODO: compare fConst attributes */ @@ -301,19 +296,19 @@ fConst => { # Load / Store fLoad => { - op_flags => [ "labeled", "fragile" ], + op_flags => [ "uses_memory" ], irn_flags => [ "rematerializable" ], state => "exc_pinned", reg_req => { in => [ "gp", "none" ], out => [ "fp" ] }, - emit => '. fmov (%S1), %D1', + emit => 'fmov (%S1), %D1', }, fStore => { - op_flags => [ "labeled", "fragile" ], + op_flags => [ "uses_memory" ], irn_flags => [ "rematerializable" ], state => "exc_pinned", reg_req => { in => [ "gp", "fp", "none" ] }, - emit => '. fmov %S2, (%S1)', + emit => 'fmov %S2, (%S1)', }, );