factor out code for address of register param taken
[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, flags, in_reqs, exec_units, n_res);",
127         sparc_load_store_attr_t  => "\tinit_sparc_attributes(res, flags, in_reqs, exec_units, n_res);",
128         sparc_jmp_cond_attr_t    => "\tinit_sparc_attributes(res, flags, in_reqs, exec_units, n_res);",
129         sparc_switch_jmp_attr_t  => "\tinit_sparc_attributes(res, 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, 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, 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 # This is a JumpLink instruction, but with the addition that you can add custom
484 # register constraints to model your calling conventions
485 Return => {
486         arity     => "variable",
487         out_arity => "variable",
488         constructors => {
489                 imm => {
490                         attr       => "ir_entity *entity, int32_t offset",
491                         custominit => "\tsparc_set_attr_imm(res, entity, offset);",
492                         arity     => "variable",
493                         out_arity => "variable",
494                 },
495                 reg => {
496                         arity     => "variable",
497                         out_arity => "variable",
498                 }
499         },
500 },
501
502 Call => {
503         irn_flags => [ "modifies_flags", "modifies_fp_flags" ],
504         state     => "exc_pinned",
505         arity     => "variable",
506         out_arity => "variable",
507         constructors => {
508                 imm => {
509                         attr       => "ir_entity *entity, int32_t offset",
510                         custominit => "\tsparc_set_attr_imm(res, entity, offset);",
511                         arity     => "variable",
512                         out_arity => "variable",
513                 },
514                 reg => {
515                         arity     => "variable",
516                         out_arity => "variable",
517                 }
518         },
519 },
520
521 Cmp => {  # aka SubccZero
522         irn_flags    => [ "rematerializable", "modifies_flags" ],
523         emit         => '. cmp %S0, %R1I',
524         mode         => $mode_flags,
525         constructors => \%binopcczero_operand_constructors,
526 },
527
528 SwitchJmp => {
529         op_flags     => [ "labeled", "cfopcode", "forking" ],
530         state        => "pinned",
531         mode         => "mode_T",
532         reg_req      => { in => [ "gp" ], out => [ ] },
533         attr_type    => "sparc_switch_jmp_attr_t",
534         attr         => "long default_pn, ir_entity *jump_table",
535         init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements
536 },
537
538 Sll => {
539         irn_flags    => [ "rematerializable" ],
540         mode         => $mode_gp,
541         emit         => '. sll %S0, %R1I, %D0',
542         constructors => \%binop_operand_constructors,
543 },
544
545 Srl => {
546         irn_flags    => [ "rematerializable" ],
547         mode         => $mode_gp,
548         emit         => '. srl %S0, %R1I, %D0',
549         constructors => \%binop_operand_constructors,
550 },
551
552 Sra => {
553         irn_flags    => [ "rematerializable" ],
554         mode         => $mode_gp,
555         emit         => '. sra %S0, %R1I, %D0',
556         constructors => \%binop_operand_constructors,
557 },
558
559 And => {
560         irn_flags    => [ "rematerializable" ],
561         mode         => $mode_gp,
562         emit         => '. and %S0, %R1I, %D0',
563         constructors => \%binop_operand_constructors,
564 },
565
566 AndCCZero => {
567         irn_flags    => [ "rematerializable", "modifies_flags" ],
568         emit         => '. andcc %S0, %R1I, %%g0',
569         mode         => $mode_flags,
570         constructors => \%binopcczero_operand_constructors,
571 },
572
573 AndN => {
574         irn_flags => [ "rematerializable" ],
575         mode      => $mode_gp,
576         emit      => '. andn %S0, %R1I, %D0',
577         constructors => \%binop_operand_constructors,
578 },
579
580 AndNCCZero => {
581         irn_flags    => [ "rematerializable", "modifies_flags" ],
582         emit         => '. andncc %S0, %R1I, %%g0',
583         mode         => $mode_flags,
584         constructors => \%binopcczero_operand_constructors,
585 },
586
587 Or => {
588         irn_flags    => [ "rematerializable" ],
589         mode         => $mode_gp,
590         emit         => '. or %S0, %R1I, %D0',
591         constructors => \%binop_operand_constructors,
592 },
593
594 OrCCZero => {
595         irn_flags    => [ "rematerializable", "modifies_flags" ],
596         emit         => '. orcc %S0, %R1I, %%g0',
597         mode         => $mode_flags,
598         constructors => \%binopcczero_operand_constructors,
599 },
600
601 OrN => {
602         irn_flags => [ "rematerializable" ],
603         mode      => $mode_gp,
604         emit      => '. orn %S0, %R1I, %D0',
605         constructors => \%binop_operand_constructors,
606 },
607
608 OrNCCZero => {
609         irn_flags    => [ "rematerializable", "modifies_flags" ],
610         emit         => '. orncc %S0, %R1I, %%g0',
611         mode         => $mode_flags,
612         constructors => \%binopcczero_operand_constructors,
613 },
614
615 Xor => {
616         irn_flags    => [ "rematerializable" ],
617         mode         => $mode_gp,
618         emit         => '. xor %S0, %R1I, %D0',
619         constructors => \%binop_operand_constructors,
620 },
621
622 XorCCZero => {
623         irn_flags    => [ "rematerializable", "modifies_flags" ],
624         emit         => '. xorcc %S0, %R1I, %%g0',
625         mode         => $mode_flags,
626         constructors => \%binopcczero_operand_constructors,
627 },
628
629 XNor => {
630         irn_flags => [ "rematerializable" ],
631         mode      => $mode_gp,
632         emit      => '. xnor %S0, %R1I, %D0',
633         constructors => \%binop_operand_constructors,
634 },
635
636 XNorCCZero => {
637         irn_flags    => [ "rematerializable", "modifies_flags" ],
638         emit         => '. xnorcc %S0, %R1I, %%g0',
639         mode         => $mode_flags,
640         constructors => \%binopcczero_operand_constructors,
641 },
642
643 Mul => {
644         irn_flags    => [ "rematerializable" ],
645         mode         => $mode_gp,
646         emit         => '. smul %S0, %R1I, %D0',
647         constructors => \%binop_operand_constructors,
648 },
649
650 Mulh => {
651         irn_flags    => [ "rematerializable" ],
652         outs         => [ "low", "high" ],
653         constructors => \%binop_operand_constructors,
654 },
655
656 SDiv => {
657         irn_flags    => [ "rematerializable" ],
658         state        => "exc_pinned",
659         ins          => [ "dividend_high", "dividend_low", "divisor" ],
660         outs         => [ "res", "M" ],
661         constructors => \%div_operand_constructors,
662 },
663
664 UDiv => {
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 fcmp => {
673         irn_flags => [ "rematerializable", "modifies_fp_flags" ],
674         emit      => '. fcmp%FPM %S0, %S1',
675         attr_type => "sparc_fp_attr_t",
676         attr      => "ir_mode *fp_mode",
677         mode      => $mode_fpflags,
678         constructors => {
679                 s => {
680                         reg_req => { in => [ "fp", "fp" ], out => [ "fpflags" ] },
681                 },
682                 d => {
683                         reg_req => { in => [ "fp:a|2", "fp:a|2" ], out => [ "fpflags" ] },
684                 },
685                 q => {
686                         reg_req => { in => [ "fp:a|4", "fp:a|4" ], out => [ "fpflags" ] },
687                 },
688         },
689 },
690
691 fadd => {
692         op_flags     => [ "commutative" ],
693         irn_flags    => [ "rematerializable" ],
694         emit         => '. fadd%FPM %S0, %S1, %D0',
695         attr_type    => "sparc_fp_attr_t",
696         attr         => "ir_mode *fp_mode",
697         ins          => [ "left", "right" ],
698         constructors => \%float_binop_constructors,
699 },
700
701 fsub => {
702         irn_flags    => [ "rematerializable" ],
703         emit         => '. fsub%FPM %S0, %S1, %D0',
704         attr_type    => "sparc_fp_attr_t",
705         attr         => "ir_mode *fp_mode",
706         ins          => [ "left", "right" ],
707         constructors => \%float_binop_constructors,
708 },
709
710 fmul => {
711         irn_flags    => [ "rematerializable" ],
712         op_flags     => [ "commutative" ],
713         emit         =>'. fmul%FPM %S0, %S1, %D0',
714         attr_type    => "sparc_fp_attr_t",
715         attr         => "ir_mode *fp_mode",
716         ins          => [ "left", "right" ],
717         constructors => \%float_binop_constructors,
718 },
719
720 fdiv => {
721         irn_flags    => [ "rematerializable" ],
722         emit         => '. fdiv%FPM %S0, %S1, %D0',
723         attr_type    => "sparc_fp_attr_t",
724         attr         => "ir_mode *fp_mode",
725         ins          => [ "left", "right" ],
726         outs         => [ "res", "M" ],
727         constructors => {
728                 s => {
729                         reg_req => { in => [ "fp", "fp" ], out => [ "fp", "none" ] },
730                 },
731                 d => {
732                         reg_req => { in => [ "fp:a|2", "fp:a|2" ], out => [ "fp:a|2", "none" ] },
733                 },
734                 q => {
735                         reg_req => { in => [ "fp:a|4", "fp:a|4" ], out => [ "fp:a|4", "none" ] },
736                 }
737         },
738 },
739
740 fneg => {
741         irn_flags => [ "rematerializable" ],
742         reg_req   => { in => [ "fp" ], out => [ "fp" ] },
743         # note that we only need the first register even for wide-values
744         emit      => '. fneg %S0, %D0',
745         attr_type => "sparc_fp_attr_t",
746         attr      => "ir_mode *fp_mode",
747         ins          => [ "val" ],
748         constructors => \%float_unop_constructors,
749 },
750
751 "fabs" => {
752         irn_flags    => [ "rematerializable" ],
753         # note that we only need the first register even for wide-values
754         emit         => '. fabs %S0, %D0',
755         attr_type    => "sparc_fp_attr_t",
756         attr         => "ir_mode *fp_mode",
757         ins          => [ "val" ],
758         constructors => \%float_unop_constructors,
759 },
760
761 fftof => {
762         irn_flags => [ "rematerializable" ],
763         emit      => '. f%FCONVS%.to%FCONVD %S0, %D0',
764         attr_type => "sparc_fp_conv_attr_t",
765         attr      => "ir_mode *src_mode, ir_mode *dest_mode",
766         constructors => {
767                 s_d => {
768                         reg_req => { in => [ "fp" ], out => [ "fp:a|2" ] },
769                         mode    => $mode_fp2,
770                 },
771                 s_q => {
772                         reg_req => { in => [ "fp" ], out => [ "fp:a|2" ] },
773                         mode    => $mode_fp4,
774                 },
775                 d_s => {
776                         reg_req => { in => [ "fp:a|2" ], out => [ "fp" ] },
777                         mode    => $mode_fp,
778                 },
779                 d_q => {
780                         reg_req => { in => [ "fp:a|2" ], out => [ "fp:a|4" ] },
781                         mode    => $mode_fp4,
782                 },
783                 q_s => {
784                         reg_req => { in => [ "fp:a|4" ], out => [ "fp" ] },
785                         mode    => $mode_fp,
786                 },
787                 q_d => {
788                         reg_req => { in => [ "fp:a|4" ], out => [ "fp:a|2" ] },
789                         mode    => $mode_fp2,
790                 },
791         },
792 },
793
794 fitof => {
795         irn_flags => [ "rematerializable" ],
796         emit      => '. fito%FPM %S0, %D0',
797         attr_type => "sparc_fp_attr_t",
798         attr      => "ir_mode *fp_mode",
799         constructors => {
800                 s => {
801                         reg_req => { in => [ "fp" ], out => [ "fp" ] },
802                         mode    => $mode_fp,
803                 },
804                 d => {
805                         reg_req => { in => [ "fp" ], out => [ "fp:a|2" ] },
806                         mode    => $mode_fp2,
807                 },
808                 q => {
809                         reg_req => { in => [ "fp" ], out => [ "fp:a|4" ] },
810                         mode    => $mode_fp4,
811                 },
812         },
813 },
814
815 fftoi => {
816         irn_flags => [ "rematerializable" ],
817         emit      => '. f%FPM%.toi %S0, %D0',
818         attr_type => "sparc_fp_attr_t",
819         attr      => "ir_mode *fp_mode",
820         mode      => $mode_gp,
821         constructors => {
822                 s => {
823                         reg_req => { in => [ "fp" ], out => [ "fp" ] },
824                 },
825                 d => {
826                         reg_req => { in => [ "fp:a|2" ], out => [ "fp" ] },
827                 },
828                 q => {
829                         reg_req => { in => [ "fp:a|4" ], out => [ "fp" ] },
830                 },
831         },
832 },
833
834 Ldf => {
835         op_flags  => [ "labeled" ],
836         state     => "exc_pinned",
837         constructors => {
838                 s => {
839                         reg_req => { in => [ "gp", "none" ], out => [ "fp", "none" ] },
840                 },
841                 d => {
842                         reg_req => { in => [ "gp", "none" ], out => [ "fp:a|2", "none" ] },
843                 },
844                 q => {
845                         reg_req => { in => [ "gp", "none" ], out => [ "fp:a|4", "none" ] },
846                 },
847         },
848         ins       => [ "ptr", "mem" ],
849         outs      => [ "res", "M" ],
850         attr_type => "sparc_load_store_attr_t",
851         attr      => "ir_mode *ls_mode, ir_entity *entity, int32_t offset, bool is_frame_entity",
852         custominit => "init_sparc_load_store_attributes(res, ls_mode, entity, offset, is_frame_entity, false);",
853         emit      => '. ld%FLSM [%S0%O1], %D0'
854 },
855
856 Stf => {
857         op_flags  => [ "labeled" ],
858         state     => "exc_pinned",
859         constructors => {
860                 s => {
861                         reg_req => { in => [ "fp",     "gp", "none" ], out => [ "none" ] },
862                 },
863                 d => {
864                         reg_req => { in => [ "fp:a|2", "gp", "none" ], out => [ "none" ] },
865                 },
866                 q => {
867                         reg_req => { in => [ "fp:a|4", "gp", "none" ], out => [ "none" ] },
868                 },
869         },
870         ins       => [ "val", "ptr", "mem" ],
871         outs      => [ "M" ],
872         attr_type => "sparc_load_store_attr_t",
873         attr      => "ir_mode *ls_mode, ir_entity *entity, int32_t offset, bool is_frame_entity",
874         custominit => "init_sparc_load_store_attributes(res, ls_mode, entity, offset, is_frame_entity, false);",
875         emit      => '. st%FLSM %S0, [%S1%O2]',
876         mode      => 'mode_M',
877 },
878
879 ); # end of %nodes