fix sparc fneg instruction emitter
[libfirm] / ir / be / sparc / sparc_spec.pl
1 # Creation: 2006/02/13
2 # $Id$
3
4 $arch = "sparc";
5
6 $mode_gp      = "mode_Iu";
7 $mode_flags   = "mode_Bu";
8 $mode_fpflags = "mode_Bu";
9 $mode_fp      = "mode_F";
10 $mode_fp2     = "mode_D";
11 $mode_fp4     = "mode_E"; # not correct, we need to register a new mode
12
13 # available SPARC registers: 8 globals, 24 window regs (8 ins, 8 outs, 8 locals)
14 %reg_classes = (
15         gp => [
16                 { name => "g0" },
17                 { name => "g1" },
18                 { name => "g2" },
19                 { name => "g3" },
20                 { name => "g4" },
21                 { name => "g5" },
22                 { name => "g6" },
23                 { name => "g7" },
24
25                 { name => "o0" },
26                 { name => "o1" },
27                 { name => "o2" },
28                 { name => "o3" },
29                 { name => "o4" },
30                 { name => "o5" },
31                 { name => "sp" },
32                 { name => "o7" },
33
34                 { name => "l0" },
35                 { name => "l1" },
36                 { name => "l2" },
37                 { name => "l3" },
38                 { name => "l4" },
39                 { name => "l5" },
40                 { name => "l6" },
41                 { name => "l7" },
42
43                 { name => "i0" },
44                 { name => "i1" },
45                 { name => "i2" },
46                 { name => "i3" },
47                 { name => "i4" },
48                 { name => "i5" },
49                 { name => "frame_pointer", realname => "fp" },
50                 { name => "i7" },
51                 { mode => $mode_gp }
52         ],
53         fpflags_class => [
54                 { name => "fpflags" },
55                 { mode => $mode_fpflags, flags => "manual_ra" }
56         ],
57         flags_class => [
58                 { name => "flags" },
59                 { mode => $mode_flags, flags => "manual_ra" }
60         ],
61         mul_div_high_res => [
62                 { name => "y" },
63                 { mode => $mode_gp, flags => "manual_ra" }
64         ],
65         # fp registers can be accessed any time
66         fp => [
67                 { name => "f0" },
68                 { name => "f1" },
69                 { name => "f2" },
70                 { name => "f3" },
71                 { name => "f4" },
72                 { name => "f5" },
73                 { name => "f6" },
74                 { name => "f7" },
75                 { name => "f8" },
76                 { name => "f9" },
77                 { name => "f10" },
78                 { name => "f11" },
79                 { name => "f12" },
80                 { name => "f13" },
81                 { name => "f14" },
82                 { name => "f15" },
83                 { name => "f16" },
84                 { name => "f17" },
85                 { name => "f18" },
86                 { name => "f19" },
87                 { name => "f20" },
88                 { name => "f21" },
89                 { name => "f22" },
90                 { name => "f23" },
91                 { name => "f24" },
92                 { name => "f25" },
93                 { name => "f26" },
94                 { name => "f27" },
95                 { name => "f28" },
96                 { name => "f29" },
97                 { name => "f30" },
98                 { name => "f31" },
99                 { mode => $mode_fp }
100         ]
101 ); # %reg_classes
102
103 %emit_templates = (
104 # emit source reg or imm dep. on node's arity
105         RI  => "${arch}_emit_reg_or_imm(node, -1);",
106         R1I => "${arch}_emit_reg_or_imm(node, 1);",
107         S0  => "${arch}_emit_source_register(node, 0);",
108         S1  => "${arch}_emit_source_register(node, 1);",
109         D0  => "${arch}_emit_dest_register(node, 0);",
110         HIM => "${arch}_emit_high_immediate(node);",
111         LM  => "${arch}_emit_load_mode(node);",
112         SM  => "${arch}_emit_store_mode(node);",
113         FLSM => "${arch}_emit_float_load_store_mode(node);",
114         FPM  => "${arch}_emit_fp_mode_suffix(node);",
115         FCONVS => "${arch}_emit_fp_conv_source(node);",
116         FCONVD => "${arch}_emit_fp_conv_destination(node);",
117         O1     => "${arch}_emit_offset(node, 1);",
118         O2     => "${arch}_emit_offset(node, 2);",
119 );
120
121 $default_attr_type = "sparc_attr_t";
122 $default_copy_attr = "sparc_copy_attr";
123
124
125 %init_attr = (
126         sparc_attr_t             => "\tinit_sparc_attributes(res, irn_flags_, in_reqs, exec_units, n_res);",
127         sparc_load_store_attr_t  => "\tinit_sparc_attributes(res, irn_flags_, in_reqs, exec_units, n_res);",
128         sparc_jmp_cond_attr_t    => "\tinit_sparc_attributes(res, irn_flags_, in_reqs, exec_units, n_res);",
129         sparc_switch_jmp_attr_t  => "\tinit_sparc_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n".
130                                     "\tinit_sparc_switch_jmp_attributes(res, default_pn, jump_table);\n",
131         sparc_fp_attr_t          => "\tinit_sparc_attributes(res, irn_flags_, in_reqs, exec_units, n_res);\n".
132                                     "\tinit_sparc_fp_attributes(res, fp_mode);\n",
133         sparc_fp_conv_attr_t     => "\tinit_sparc_attributes(res, irn_flags_, in_reqs, exec_units, n_res);".
134                                     "\tinit_sparc_fp_conv_attributes(res, src_mode, dest_mode);\n",
135 );
136
137 %compare_attr = (
138         sparc_attr_t            => "cmp_attr_sparc",
139         sparc_load_store_attr_t => "cmp_attr_sparc_load_store",
140         sparc_jmp_cond_attr_t   => "cmp_attr_sparc_jmp_cond",
141         sparc_switch_jmp_attr_t => "cmp_attr_sparc_switch_jmp",
142         sparc_fp_attr_t         => "cmp_attr_sparc_fp",
143         sparc_fp_conv_attr_t    => "cmp_attr_sparc_fp_conv",
144 );
145
146 %custom_irn_flags = (
147         modifies_flags    => "(arch_irn_flags_t)sparc_arch_irn_flag_modifies_flags",
148         modifies_fp_flags => "(arch_irn_flags_t)sparc_arch_irn_flag_modifies_fp_flags",
149 );
150
151 my %cmp_operand_constructors = (
152         imm => {
153                 attr       => "ir_entity *immediate_entity, int32_t immediate_value",
154                 custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
155                 reg_req    => { in => [ "gp" ], out => [ "flags" ] },
156                 ins        => [ "left" ],
157         },
158         reg => {
159                 reg_req    => { in => [ "gp", "gp" ], out => [ "flags" ] },
160                 ins        => [ "left", "right" ],
161         },
162 );
163
164 my %binop_operand_constructors = (
165         imm => {
166                 attr       => "ir_entity *immediate_entity, int32_t immediate_value",
167                 custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
168                 reg_req    => { in => [ "gp" ], out => [ "gp" ] },
169                 ins        => [ "left" ],
170         },
171         reg => {
172                 reg_req    => { in => [ "gp", "gp" ], out => [ "gp" ] },
173                 ins        => [ "left", "right" ],
174         },
175 );
176
177 my %binopcc_operand_constructors = (
178         imm => {
179                 attr       => "ir_entity *immediate_entity, int32_t immediate_value",
180                 custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
181                 reg_req    => { in => [ "gp" ], out => [ "gp", "flags" ] },
182                 ins        => [ "left" ],
183         },
184         reg => {
185                 reg_req    => { in => [ "gp", "gp" ], out => [ "gp", "flags" ] },
186                 ins        => [ "left", "right" ],
187         },
188 );
189
190 my %binopx_operand_constructors = (
191         imm => {
192                 attr       => "ir_entity *immediate_entity, int32_t immediate_value",
193                 custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
194                 reg_req    => { in => [ "gp", "flags" ], out => [ "gp" ] },
195                 ins        => [ "left", "carry" ],
196         },
197         reg => {
198                 reg_req    => { in => [ "gp", "gp", "flags" ], out => [ "gp" ] },
199                 ins        => [ "left", "right", "carry" ],
200         },
201 );
202
203
204 my %binopcczero_operand_constructors = (
205         imm => {
206                 attr       => "ir_entity *immediate_entity, int32_t immediate_value",
207                 custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
208                 reg_req    => { in => [ "gp" ], out => [ "flags" ] },
209                 ins        => [ "left" ],
210         },
211         reg => {
212                 reg_req    => { in => [ "gp", "gp" ], out => [ "flags" ] },
213                 ins        => [ "left", "right" ],
214         },
215 );
216
217 my %div_operand_constructors = (
218         imm => {
219                 attr       => "ir_entity *immediate_entity, int32_t immediate_value",
220                 custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
221                 reg_req    => { in => [ "gp", "gp" ], out => [ "gp" ] },
222         },
223         reg => {
224                 reg_req    => { in => [ "gp", "gp", "gp" ], out => [ "gp" ] },
225         },
226 );
227
228 my %float_binop_constructors = (
229         s => {
230                 reg_req => { in => [ "fp", "fp" ], out => [ "fp" ] },
231                 mode    => $mode_fp,
232         },
233         d => {
234                 reg_req => { in => [ "fp:a|2", "fp:a|2" ], out => [ "fp:a|2" ] },
235                 mode    => $mode_fp2,
236         },
237         q => {
238                 reg_req => { in => [ "fp:a|4", "fp:a|4" ], out => [ "fp:a|4" ] },
239                 mode    => $mode_fp4,
240         }
241 );
242
243 my %float_unop_constructors = (
244         s => {
245                 reg_req => { in => [ "fp" ], out => [ "fp" ] },
246                 mode    => $mode_fp,
247         },
248         d => {
249                 reg_req => { in => [ "fp:a|2" ], out => [ "fp:a|2" ] },
250                 mode    => $mode_fp2,
251         },
252         q => {
253                 reg_req => { in => [ "fp:a|4" ], out => [ "fp:a|4" ] },
254                 mode    => $mode_fp4,
255         }
256 );
257
258 %nodes = (
259
260 Add => {
261         irn_flags    => [ "rematerializable" ],
262         mode         => $mode_gp,
263         emit         => '. add %S0, %R1I, %D0',
264         constructors => \%binop_operand_constructors,
265 },
266
267 AddCC => {
268         irn_flags    => [ "rematerializable" ],
269         emit         => '. addcc %S0, %R1I, %D0',
270         outs         => [ "res", "flags" ],
271         constructors => \%binopcc_operand_constructors,
272 },
273
274 AddX => {
275         # At the moment not rematerializable because of assert in beflags.c/
276         # (it claims that spiller can't rematerialize flag stuff correctly)
277         #irn_flags    => [ "rematerializable" ],
278         emit         => '. addx %S0, %R1I, %D0',
279         constructors => \%binopx_operand_constructors,
280         mode         => $mode_gp,
281 },
282
283 AddCC_t => {
284         ins       => [ "left", "right" ],
285         outs      => [ "res", "flags" ],
286         attr_type => "",
287 },
288
289 AddX_t => {
290         ins       => [ "left", "right", "flags_input" ],
291         attr_type => "",
292 },
293
294 Sub => {
295         irn_flags    => [ "rematerializable" ],
296         mode         => $mode_gp,
297         emit         => '. sub %S0, %R1I, %D0',
298         constructors => \%binop_operand_constructors,
299 },
300
301 SubCC => {
302         irn_flags    => [ "rematerializable" ],
303         emit         => '. subcc %S0, %R1I, %D0',
304         outs         => [ "res", "flags" ],
305         constructors => \%binopcc_operand_constructors,
306 },
307
308 SubX => {
309         # Not rematerializable (see AddX)
310         emit         => '. subx %S0, %R1I, %D0',
311         constructors => \%binopx_operand_constructors,
312         mode         => $mode_gp,
313 },
314
315 SubCC_t => {
316         ins       => [ "left", "right" ],
317         outs      => [ "res", "flags" ],
318         attr_type => "",
319 },
320
321 SubX_t => {
322         ins       => [ "left", "right", "flags_input" ],
323         attr_type => "",
324 },
325
326 # Load / Store
327 Ld => {
328         op_flags  => [ "labeled" ],
329         state     => "exc_pinned",
330         constructors => {
331                 imm => {
332                         reg_req    => { in => [ "gp", "none" ], out => [ "gp", "none" ] },
333                         ins        => [ "ptr", "mem" ],
334                         attr       => "ir_mode *ls_mode, ir_entity *entity, int32_t offset, bool is_frame_entity",
335                         custominit => "init_sparc_load_store_attributes(res, ls_mode, entity, offset, is_frame_entity, false);",
336                 },
337                 reg => {
338                         reg_req    => { in => [ "gp", "gp", "none" ], out => [ "gp", "none" ] },
339                         ins        => [ "ptr", "ptr2", "mem" ],
340                         attr       => "ir_mode *ls_mode",
341                         custominit => "init_sparc_load_store_attributes(res, ls_mode, NULL, 0, false, true);",
342                 },
343         },
344         ins       => [ "ptr", "mem" ],
345         outs      => [ "res", "M" ],
346         attr_type => "sparc_load_store_attr_t",
347         emit      => '. ld%LM [%S0%O1], %D0'
348 },
349
350 SetHi => {
351         irn_flags  => [ "rematerializable" ],
352         outs       => [ "res" ],
353         mode       => $mode_gp,
354         reg_req    => { in => [], out => [ "gp" ] },
355         attr       => "ir_entity *entity, int32_t immediate_value",
356         custominit => "sparc_set_attr_imm(res, entity, immediate_value);",
357         emit       => '. sethi %HIM, %D0'
358 },
359
360 St => {
361         op_flags  => [ "labeled" ],
362         mode      => "mode_M",
363         state     => "exc_pinned",
364         constructors => {
365                 imm => {
366                         reg_req    => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
367                         ins        => [ "val", "ptr", "mem" ],
368                         attr       => "ir_mode *ls_mode, ir_entity *entity, int32_t offset, bool is_frame_entity",
369                         custominit => "init_sparc_load_store_attributes(res, ls_mode, entity, offset, is_frame_entity, false);",
370                 },
371                 reg => {
372                         reg_req    => { in => [ "gp", "gp", "gp", "none" ], out => [ "none" ] },
373                         ins        => [ "val", "ptr", "ptr2", "mem" ],
374                         attr       => "ir_mode *ls_mode",
375                         custominit => "init_sparc_load_store_attributes(res, ls_mode, NULL, 0, false, true);",
376                 },
377         },
378         ins       => [ "val", "ptr", "mem" ],
379         outs      => [ "M" ],
380         attr_type => "sparc_load_store_attr_t",
381         emit      => '. st%SM %S0, [%S1%O2]'
382 },
383
384 Save => {
385         emit      => '. save %S0, %R1I, %D0',
386         outs      => [ "stack" ],
387         ins       => [ "stack" ],
388         constructors => {
389                 imm => {
390                         attr       => "ir_entity *immediate_entity, int32_t immediate_value",
391                         custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
392                         reg_req    => { in => [ "sp" ], out => [ "sp:I|S" ] },
393                         ins        => [ "stack" ],
394                 },
395                 reg => {
396                         reg_req    => { in => [ "sp", "gp" ], out => [ "sp:I|S" ] },
397                         ins        => [ "stack", "increment" ],
398                 }
399         },
400         mode => $mode_gp,
401 },
402
403 Restore => {
404         emit => '. restore %S0, %R1I, %D0',
405         outs => [ "stack" ],
406         ins  => [ "stack" ],
407         constructors => {
408                 imm => {
409                         attr       => "ir_entity *immediate_entity, int32_t immediate_value",
410                         custominit => "sparc_set_attr_imm(res, immediate_entity, immediate_value);",
411                         reg_req    => { in => [ "sp" ], out => [ "sp:I|S" ] },
412                         ins        => [ "stack" ],
413                 },
414                 reg => {
415                         reg_req    => { in => [ "sp", "gp" ], out => [ "sp:I|S" ] },
416                         ins        => [ "stack", "increment" ],
417                 }
418         },
419         mode => $mode_gp,
420 },
421
422 RestoreZero => {
423         emit => '. restore',
424         reg_req => { in => [ "frame_pointer" ], out => [ "sp:I|S" ] },
425         ins     => [ "frame_pointer" ],
426         outs    => [ "stack" ],
427         mode    => $mode_gp,
428 },
429
430 SubSP => {
431         reg_req   => { in => [ "sp", "gp", "none" ], out => [ "sp:I|S", "gp", "none" ] },
432         ins       => [ "stack", "size", "mem" ],
433         outs      => [ "stack", "addr", "M" ],
434         emit      => ". sub %S0, %S1, %D0\n",
435 },
436
437 AddSP => {
438         reg_req   => { in => [ "sp", "gp", "none" ], out => [ "sp:I|S", "none" ] },
439         ins       => [ "stack", "size", "mem" ],
440         outs      => [ "stack", "M" ],
441         emit      => ". add %S0, %S1, %D0\n",
442 },
443
444 FrameAddr => {
445         op_flags   => [ "constlike" ],
446         irn_flags  => [ "rematerializable" ],
447         attr       => "ir_entity *entity, int32_t offset",
448         reg_req    => { in => [ "gp" ], out => [ "gp" ] },
449         ins        => [ "base" ],
450         attr_type  => "sparc_attr_t",
451         custominit => "sparc_set_attr_imm(res, entity, offset);",
452         mode       => $mode_gp,
453 },
454
455 Bicc => {
456         op_flags  => [ "labeled", "cfopcode", "forking" ],
457         state     => "pinned",
458         mode      => "mode_T",
459         attr_type => "sparc_jmp_cond_attr_t",
460         attr      => "ir_relation relation, bool is_unsigned",
461         init_attr => "\tinit_sparc_jmp_cond_attr(res, relation, is_unsigned);",
462         reg_req   => { in => [ "flags" ], out => [ "none", "none" ] },
463 },
464
465 fbfcc => {
466         op_flags  => [ "labeled", "cfopcode", "forking" ],
467         state     => "pinned",
468         mode      => "mode_T",
469         attr_type => "sparc_jmp_cond_attr_t",
470         attr      => "ir_relation relation",
471         init_attr => "\tinit_sparc_jmp_cond_attr(res, relation, false);",
472         reg_req   => { in => [ "fpflags" ], out => [ "none", "none" ] },
473 },
474
475 Ba => {
476         state     => "pinned",
477         op_flags  => [ "cfopcode" ],
478         irn_flags => [ "simple_jump" ],
479         reg_req   => { out => [ "none" ] },
480         mode      => "mode_X",
481 },
482
483 Start => {
484         state     => "pinned",
485         out_arity => "variable",
486         ins       => [],
487 },
488
489 # This is a JumpLink instruction, but with the addition that you can add custom
490 # register constraints to model your calling conventions
491 Return => {
492         state     => "pinned",
493         op_flags  => [ "cfopcode" ],
494         arity     => "variable",
495         mode      => "mode_X",
496         constructors => {
497                 imm => {
498                         attr       => "ir_entity *entity, int32_t offset",
499                         custominit => "\tsparc_set_attr_imm(res, entity, offset);",
500                         arity     => "variable",
501                         reg_req   => { out => [ "none" ] },
502                 },
503                 reg => {
504                         arity     => "variable",
505                         reg_req   => { out => [ "none" ] },
506                 }
507         },
508 },
509
510 Call => {
511         irn_flags => [ "modifies_flags", "modifies_fp_flags" ],
512         state     => "exc_pinned",
513         arity     => "variable",
514         out_arity => "variable",
515         constructors => {
516                 imm => {
517                         attr       => "ir_entity *entity, int32_t offset",
518                         custominit => "\tsparc_set_attr_imm(res, entity, offset);",
519                         arity     => "variable",
520                         out_arity => "variable",
521                 },
522                 reg => {
523                         arity     => "variable",
524                         out_arity => "variable",
525                 }
526         },
527 },
528
529 Cmp => {  # aka SubccZero
530         irn_flags    => [ "rematerializable", "modifies_flags" ],
531         emit         => '. cmp %S0, %R1I',
532         mode         => $mode_flags,
533         constructors => \%binopcczero_operand_constructors,
534 },
535
536 SwitchJmp => {
537         op_flags     => [ "labeled", "cfopcode", "forking" ],
538         state        => "pinned",
539         mode         => "mode_T",
540         reg_req      => { in => [ "gp" ], out => [ ] },
541         attr_type    => "sparc_switch_jmp_attr_t",
542         attr         => "long default_pn, ir_entity *jump_table",
543         init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements
544 },
545
546 Sll => {
547         irn_flags    => [ "rematerializable" ],
548         mode         => $mode_gp,
549         emit         => '. sll %S0, %R1I, %D0',
550         constructors => \%binop_operand_constructors,
551 },
552
553 Srl => {
554         irn_flags    => [ "rematerializable" ],
555         mode         => $mode_gp,
556         emit         => '. srl %S0, %R1I, %D0',
557         constructors => \%binop_operand_constructors,
558 },
559
560 Sra => {
561         irn_flags    => [ "rematerializable" ],
562         mode         => $mode_gp,
563         emit         => '. sra %S0, %R1I, %D0',
564         constructors => \%binop_operand_constructors,
565 },
566
567 And => {
568         irn_flags    => [ "rematerializable" ],
569         mode         => $mode_gp,
570         emit         => '. and %S0, %R1I, %D0',
571         constructors => \%binop_operand_constructors,
572 },
573
574 AndCCZero => {
575         irn_flags    => [ "rematerializable", "modifies_flags" ],
576         emit         => '. andcc %S0, %R1I, %%g0',
577         mode         => $mode_flags,
578         constructors => \%binopcczero_operand_constructors,
579 },
580
581 AndN => {
582         irn_flags => [ "rematerializable" ],
583         mode      => $mode_gp,
584         emit      => '. andn %S0, %R1I, %D0',
585         constructors => \%binop_operand_constructors,
586 },
587
588 AndNCCZero => {
589         irn_flags    => [ "rematerializable", "modifies_flags" ],
590         emit         => '. andncc %S0, %R1I, %%g0',
591         mode         => $mode_flags,
592         constructors => \%binopcczero_operand_constructors,
593 },
594
595 Or => {
596         irn_flags    => [ "rematerializable" ],
597         mode         => $mode_gp,
598         emit         => '. or %S0, %R1I, %D0',
599         constructors => \%binop_operand_constructors,
600 },
601
602 OrCCZero => {
603         irn_flags    => [ "rematerializable", "modifies_flags" ],
604         emit         => '. orcc %S0, %R1I, %%g0',
605         mode         => $mode_flags,
606         constructors => \%binopcczero_operand_constructors,
607 },
608
609 OrN => {
610         irn_flags => [ "rematerializable" ],
611         mode      => $mode_gp,
612         emit      => '. orn %S0, %R1I, %D0',
613         constructors => \%binop_operand_constructors,
614 },
615
616 OrNCCZero => {
617         irn_flags    => [ "rematerializable", "modifies_flags" ],
618         emit         => '. orncc %S0, %R1I, %%g0',
619         mode         => $mode_flags,
620         constructors => \%binopcczero_operand_constructors,
621 },
622
623 Xor => {
624         irn_flags    => [ "rematerializable" ],
625         mode         => $mode_gp,
626         emit         => '. xor %S0, %R1I, %D0',
627         constructors => \%binop_operand_constructors,
628 },
629
630 XorCCZero => {
631         irn_flags    => [ "rematerializable", "modifies_flags" ],
632         emit         => '. xorcc %S0, %R1I, %%g0',
633         mode         => $mode_flags,
634         constructors => \%binopcczero_operand_constructors,
635 },
636
637 XNor => {
638         irn_flags => [ "rematerializable" ],
639         mode      => $mode_gp,
640         emit      => '. xnor %S0, %R1I, %D0',
641         constructors => \%binop_operand_constructors,
642 },
643
644 XNorCCZero => {
645         irn_flags    => [ "rematerializable", "modifies_flags" ],
646         emit         => '. xnorcc %S0, %R1I, %%g0',
647         mode         => $mode_flags,
648         constructors => \%binopcczero_operand_constructors,
649 },
650
651 Mul => {
652         irn_flags    => [ "rematerializable" ],
653         mode         => $mode_gp,
654         emit         => '. smul %S0, %R1I, %D0',
655         constructors => \%binop_operand_constructors,
656 },
657
658 Mulh => {
659         irn_flags    => [ "rematerializable" ],
660         outs         => [ "low", "high" ],
661         constructors => \%binop_operand_constructors,
662 },
663
664 SDiv => {
665         irn_flags    => [ "rematerializable" ],
666         state        => "exc_pinned",
667         ins          => [ "dividend_high", "dividend_low", "divisor" ],
668         outs         => [ "res", "M" ],
669         constructors => \%div_operand_constructors,
670 },
671
672 UDiv => {
673         irn_flags    => [ "rematerializable" ],
674         state        => "exc_pinned",
675         ins          => [ "dividend_high", "dividend_low", "divisor" ],
676         outs         => [ "res", "M" ],
677         constructors => \%div_operand_constructors,
678 },
679
680 fcmp => {
681         irn_flags => [ "rematerializable", "modifies_fp_flags" ],
682         emit      => '. fcmp%FPM %S0, %S1',
683         attr_type => "sparc_fp_attr_t",
684         attr      => "ir_mode *fp_mode",
685         mode      => $mode_fpflags,
686         constructors => {
687                 s => {
688                         reg_req => { in => [ "fp", "fp" ], out => [ "fpflags" ] },
689                 },
690                 d => {
691                         reg_req => { in => [ "fp:a|2", "fp:a|2" ], out => [ "fpflags" ] },
692                 },
693                 q => {
694                         reg_req => { in => [ "fp:a|4", "fp:a|4" ], out => [ "fpflags" ] },
695                 },
696         },
697 },
698
699 fadd => {
700         op_flags     => [ "commutative" ],
701         irn_flags    => [ "rematerializable" ],
702         emit         => '. fadd%FPM %S0, %S1, %D0',
703         attr_type    => "sparc_fp_attr_t",
704         attr         => "ir_mode *fp_mode",
705         ins          => [ "left", "right" ],
706         constructors => \%float_binop_constructors,
707 },
708
709 fsub => {
710         irn_flags    => [ "rematerializable" ],
711         emit         => '. fsub%FPM %S0, %S1, %D0',
712         attr_type    => "sparc_fp_attr_t",
713         attr         => "ir_mode *fp_mode",
714         ins          => [ "left", "right" ],
715         constructors => \%float_binop_constructors,
716 },
717
718 fmul => {
719         irn_flags    => [ "rematerializable" ],
720         op_flags     => [ "commutative" ],
721         emit         =>'. fmul%FPM %S0, %S1, %D0',
722         attr_type    => "sparc_fp_attr_t",
723         attr         => "ir_mode *fp_mode",
724         ins          => [ "left", "right" ],
725         constructors => \%float_binop_constructors,
726 },
727
728 fdiv => {
729         irn_flags    => [ "rematerializable" ],
730         emit         => '. fdiv%FPM %S0, %S1, %D0',
731         attr_type    => "sparc_fp_attr_t",
732         attr         => "ir_mode *fp_mode",
733         ins          => [ "left", "right" ],
734         outs         => [ "res", "M" ],
735         constructors => {
736                 s => {
737                         reg_req => { in => [ "fp", "fp" ], out => [ "fp", "none" ] },
738                 },
739                 d => {
740                         reg_req => { in => [ "fp:a|2", "fp:a|2" ], out => [ "fp:a|2", "none" ] },
741                 },
742                 q => {
743                         reg_req => { in => [ "fp:a|4", "fp:a|4" ], out => [ "fp:a|4", "none" ] },
744                 }
745         },
746 },
747
748 fneg => {
749         irn_flags => [ "rematerializable" ],
750         reg_req   => { in => [ "fp" ], out => [ "fp" ] },
751         # note that we only need the first register even for wide-values
752         emit      => '. fnegs %S0, %D0',
753         attr_type => "sparc_fp_attr_t",
754         attr      => "ir_mode *fp_mode",
755         ins          => [ "val" ],
756         constructors => \%float_unop_constructors,
757 },
758
759 "fabs" => {
760         irn_flags    => [ "rematerializable" ],
761         # note that we only need the first register even for wide-values
762         emit         => '. fabs %S0, %D0',
763         attr_type    => "sparc_fp_attr_t",
764         attr         => "ir_mode *fp_mode",
765         ins          => [ "val" ],
766         constructors => \%float_unop_constructors,
767 },
768
769 fftof => {
770         irn_flags => [ "rematerializable" ],
771         emit      => '. f%FCONVS%.to%FCONVD %S0, %D0',
772         attr_type => "sparc_fp_conv_attr_t",
773         attr      => "ir_mode *src_mode, ir_mode *dest_mode",
774         constructors => {
775                 s_d => {
776                         reg_req => { in => [ "fp" ], out => [ "fp:a|2" ] },
777                         mode    => $mode_fp2,
778                 },
779                 s_q => {
780                         reg_req => { in => [ "fp" ], out => [ "fp:a|2" ] },
781                         mode    => $mode_fp4,
782                 },
783                 d_s => {
784                         reg_req => { in => [ "fp:a|2" ], out => [ "fp" ] },
785                         mode    => $mode_fp,
786                 },
787                 d_q => {
788                         reg_req => { in => [ "fp:a|2" ], out => [ "fp:a|4" ] },
789                         mode    => $mode_fp4,
790                 },
791                 q_s => {
792                         reg_req => { in => [ "fp:a|4" ], out => [ "fp" ] },
793                         mode    => $mode_fp,
794                 },
795                 q_d => {
796                         reg_req => { in => [ "fp:a|4" ], out => [ "fp:a|2" ] },
797                         mode    => $mode_fp2,
798                 },
799         },
800 },
801
802 fitof => {
803         irn_flags => [ "rematerializable" ],
804         emit      => '. fito%FPM %S0, %D0',
805         attr_type => "sparc_fp_attr_t",
806         attr      => "ir_mode *fp_mode",
807         constructors => {
808                 s => {
809                         reg_req => { in => [ "fp" ], out => [ "fp" ] },
810                         mode    => $mode_fp,
811                 },
812                 d => {
813                         reg_req => { in => [ "fp" ], out => [ "fp:a|2" ] },
814                         mode    => $mode_fp2,
815                 },
816                 q => {
817                         reg_req => { in => [ "fp" ], out => [ "fp:a|4" ] },
818                         mode    => $mode_fp4,
819                 },
820         },
821 },
822
823 fftoi => {
824         irn_flags => [ "rematerializable" ],
825         emit      => '. f%FPM%.toi %S0, %D0',
826         attr_type => "sparc_fp_attr_t",
827         attr      => "ir_mode *fp_mode",
828         mode      => $mode_gp,
829         constructors => {
830                 s => {
831                         reg_req => { in => [ "fp" ], out => [ "fp" ] },
832                 },
833                 d => {
834                         reg_req => { in => [ "fp:a|2" ], out => [ "fp" ] },
835                 },
836                 q => {
837                         reg_req => { in => [ "fp:a|4" ], out => [ "fp" ] },
838                 },
839         },
840 },
841
842 Ldf => {
843         op_flags  => [ "labeled" ],
844         state     => "exc_pinned",
845         constructors => {
846                 s => {
847                         reg_req => { in => [ "gp", "none" ], out => [ "fp", "none" ] },
848                 },
849                 d => {
850                         reg_req => { in => [ "gp", "none" ], out => [ "fp:a|2", "none" ] },
851                 },
852                 q => {
853                         reg_req => { in => [ "gp", "none" ], out => [ "fp:a|4", "none" ] },
854                 },
855         },
856         ins       => [ "ptr", "mem" ],
857         outs      => [ "res", "M" ],
858         attr_type => "sparc_load_store_attr_t",
859         attr      => "ir_mode *ls_mode, ir_entity *entity, int32_t offset, bool is_frame_entity",
860         custominit => "init_sparc_load_store_attributes(res, ls_mode, entity, offset, is_frame_entity, false);",
861         emit      => '. ld%FLSM [%S0%O1], %D0'
862 },
863
864 Stf => {
865         op_flags  => [ "labeled" ],
866         state     => "exc_pinned",
867         constructors => {
868                 s => {
869                         reg_req => { in => [ "fp",     "gp", "none" ], out => [ "none" ] },
870                 },
871                 d => {
872                         reg_req => { in => [ "fp:a|2", "gp", "none" ], out => [ "none" ] },
873                 },
874                 q => {
875                         reg_req => { in => [ "fp:a|4", "gp", "none" ], out => [ "none" ] },
876                 },
877         },
878         ins       => [ "val", "ptr", "mem" ],
879         outs      => [ "M" ],
880         attr_type => "sparc_load_store_attr_t",
881         attr      => "ir_mode *ls_mode, ir_entity *entity, int32_t offset, bool is_frame_entity",
882         custominit => "init_sparc_load_store_attributes(res, ls_mode, entity, offset, is_frame_entity, false);",
883         emit      => '. st%FLSM %S0, [%S1%O2]',
884         mode      => 'mode_M',
885 },
886
887 ); # end of %nodes