1178596Sraj;; MIPS Paired-Single Floating and MIPS-3D Instructions.
2178596Sraj;; Copyright (C) 2004 Free Software Foundation, Inc.
3178596Sraj;;
4178596Sraj;; This file is part of GCC.
5178596Sraj;;
6178596Sraj;; GCC is free software; you can redistribute it and/or modify
7178596Sraj;; it under the terms of the GNU General Public License as published by
8178596Sraj;; the Free Software Foundation; either version 2, or (at your option)
9178596Sraj;; any later version.
10178596Sraj;;
11178596Sraj;; GCC is distributed in the hope that it will be useful,
12178596Sraj;; but WITHOUT ANY WARRANTY; without even the implied warranty of
13178596Sraj;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14178596Sraj;; GNU General Public License for more details.
15178596Sraj;;
16178596Sraj;; You should have received a copy of the GNU General Public License
17178596Sraj;; along with GCC; see the file COPYING.  If not, write to
18178596Sraj;; the Free Software Foundation, 51 Franklin Street, Fifth Floor,
19178596Sraj;; Boston, MA 02110-1301, USA.
20178596Sraj
21178596Sraj(define_insn "*movcc_v2sf_<mode>"
22178596Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f,f")
23178596Sraj	(if_then_else:V2SF
24178596Sraj	 (match_operator:GPR 4 "equality_operator"
25178596Sraj			 [(match_operand:GPR 1 "register_operand" "d,d")
26178596Sraj			  (const_int 0)])
27178596Sraj	 (match_operand:V2SF 2 "register_operand" "f,0")
28178596Sraj	 (match_operand:V2SF 3 "register_operand" "0,f")))]
29178596Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
30178596Sraj  "@
31178596Sraj    mov%T4.ps\t%0,%2,%1
32209908Sraj    mov%t4.ps\t%0,%3,%1"
33209908Sraj  [(set_attr "type" "condmove")
34209908Sraj   (set_attr "mode" "SF")])
35178596Sraj
36178597Sraj(define_insn "mips_cond_move_tf_ps"
37178597Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f,f")
38178597Sraj	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f,0")
39178596Sraj		      (match_operand:V2SF 2 "register_operand" "0,f")
40178596Sraj		      (match_operand:CCV2 3 "register_operand" "z,z")]
41178596Sraj		     UNSPEC_MOVE_TF_PS))]
42178596Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
43186227Sraj  "@
44178597Sraj    movt.ps\t%0,%1,%3
45178596Sraj    movf.ps\t%0,%2,%3"
46178596Sraj  [(set_attr "type" "condmove")
47178596Sraj   (set_attr "mode" "SF")])
48178596Sraj
49186227Sraj(define_expand "movv2sfcc"
50186227Sraj  [(set (match_dup 4) (match_operand 1 "comparison_operator"))
51186227Sraj   (set (match_operand:V2SF 0 "register_operand")
52186227Sraj	(if_then_else:V2SF (match_dup 5)
53186227Sraj			   (match_operand:V2SF 2 "register_operand")
54186227Sraj			   (match_operand:V2SF 3 "register_operand")))]
55186227Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
56186227Sraj{
57178596Sraj  /* We can only support MOVN.PS and MOVZ.PS.
58186227Sraj     NOTE: MOVT.PS and MOVF.PS have different semantics from MOVN.PS and 
59178596Sraj	   MOVZ.PS.  MOVT.PS and MOVF.PS depend on two CC values and move 
60186227Sraj	   each item independently.  */
61178596Sraj
62186227Sraj  if (GET_MODE_CLASS (GET_MODE (cmp_operands[0])) != MODE_INT)
63186227Sraj    FAIL;
64186227Sraj
65186227Sraj  gen_conditional_move (operands);
66189757Sraj  DONE;
67186288Sraj})
68186288Sraj
69186288Sraj; pul.ps - Pair Upper Lower
70186288Sraj(define_insn "mips_pul_ps"
71186288Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f")
72186288Sraj	(vec_merge:V2SF
73186288Sraj	 (match_operand:V2SF 1 "register_operand" "f")
74189757Sraj	 (match_operand:V2SF 2 "register_operand" "f")
75189757Sraj	 (const_int 2)))]
76186288Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
77186288Sraj  "pul.ps\t%0,%1,%2"
78186288Sraj  [(set_attr "type" "fmove")
79186288Sraj   (set_attr "mode" "SF")])
80186288Sraj
81186288Sraj; puu.ps - Pair upper upper
82186288Sraj(define_insn "mips_puu_ps"
83186288Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f")
84186288Sraj	(vec_merge:V2SF
85186288Sraj	 (match_operand:V2SF 1 "register_operand" "f")
86186288Sraj	 (vec_select:V2SF (match_operand:V2SF 2 "register_operand" "f")
87186288Sraj			  (parallel [(const_int 1)
88186288Sraj				     (const_int 0)]))
89186288Sraj	 (const_int 2)))]
90186288Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
91186288Sraj  "puu.ps\t%0,%1,%2"
92186288Sraj  [(set_attr "type" "fmove")
93186288Sraj   (set_attr "mode" "SF")])
94186288Sraj
95186288Sraj; pll.ps - Pair Lower Lower
96186288Sraj(define_insn "mips_pll_ps"
97186288Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f")
98186288Sraj	(vec_merge:V2SF
99186288Sraj	 (vec_select:V2SF (match_operand:V2SF 1 "register_operand" "f")
100186288Sraj			  (parallel [(const_int 1)
101186288Sraj				     (const_int 0)]))
102186288Sraj	 (match_operand:V2SF 2 "register_operand" "f")
103186288Sraj	 (const_int 2)))]
104186288Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
105186288Sraj  "pll.ps\t%0,%1,%2"
106186288Sraj  [(set_attr "type" "fmove")
107186288Sraj   (set_attr "mode" "SF")])
108186288Sraj
109186288Sraj; plu.ps - Pair Lower Upper
110186288Sraj(define_insn "mips_plu_ps"
111186288Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f")
112186288Sraj	(vec_merge:V2SF
113186288Sraj	 (vec_select:V2SF (match_operand:V2SF 1 "register_operand" "f")
114186288Sraj			  (parallel [(const_int 1)
115186288Sraj				     (const_int 0)]))
116186288Sraj	 (vec_select:V2SF (match_operand:V2SF 2 "register_operand" "f")
117186288Sraj			  (parallel [(const_int 1)
118186288Sraj				     (const_int 0)]))
119186288Sraj	 (const_int 2)))]
120186288Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
121186288Sraj  "plu.ps\t%0,%1,%2"
122186288Sraj  [(set_attr "type" "fmove")
123186288Sraj   (set_attr "mode" "SF")])
124186288Sraj
125186288Sraj; vec_init
126186288Sraj(define_expand "vec_initv2sf"
127186288Sraj  [(match_operand:V2SF 0 "register_operand")
128186288Sraj   (match_operand:V2SF 1 "")]
129186288Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
130186288Sraj{
131186288Sraj  rtx op0 = force_reg (SFmode, XVECEXP (operands[1], 0, 0));
132186288Sraj  rtx op1 = force_reg (SFmode, XVECEXP (operands[1], 0, 1));
133186288Sraj  emit_insn (gen_vec_initv2sf_internal (operands[0], op0, op1));
134209908Sraj  DONE;
135209908Sraj})
136209908Sraj
137209908Sraj(define_insn "vec_initv2sf_internal"
138209908Sraj  [(set (match_operand:V2SF 0 "register_operand" "=f")
139209908Sraj	(vec_concat:V2SF
140209908Sraj	 (match_operand:SF 1 "register_operand" "f")
141209908Sraj	 (match_operand:SF 2 "register_operand" "f")))]
142209908Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
143209908Sraj{
144209908Sraj  if (BYTES_BIG_ENDIAN)
145209908Sraj    return "cvt.ps.s\t%0,%1,%2";
146209908Sraj  else
147209908Sraj    return "cvt.ps.s\t%0,%2,%1";
148209908Sraj}
149209908Sraj  [(set_attr "type" "fcvt")
150209908Sraj   (set_attr "mode" "SF")])
151209908Sraj
152209908Sraj;; ??? This is only generated if we perform a vector operation that has to be
153209908Sraj;; emulated.  There is no other way to get a vector mode bitfield extract
154209908Sraj;; currently.
155209908Sraj
156209908Sraj(define_insn "vec_extractv2sf"
157209908Sraj  [(set (match_operand:SF 0 "register_operand" "=f")
158209908Sraj	(vec_select:SF (match_operand:V2SF 1 "register_operand" "f")
159209908Sraj		       (parallel
160209908Sraj			[(match_operand 2 "const_0_or_1_operand" "")])))]
161209908Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
162209908Sraj{
163209908Sraj  if (INTVAL (operands[2]) == !BYTES_BIG_ENDIAN)
164209908Sraj    return "cvt.s.pu\t%0,%1";
165209908Sraj  else
166209908Sraj    return "cvt.s.pl\t%0,%1";
167186227Sraj}
168186227Sraj  [(set_attr "type" "fcvt")
169186227Sraj   (set_attr "mode" "SF")])
170186227Sraj
171186227Sraj;; ??? This is only generated if we disable the vec_init pattern.  There is
172189757Sraj;; no other way to get a vector mode bitfield store currently.
173189757Sraj
174178597Sraj(define_expand "vec_setv2sf"
175186227Sraj  [(match_operand:V2SF 0 "register_operand")
176178597Sraj   (match_operand:SF 1 "register_operand")
177178597Sraj   (match_operand 2 "const_0_or_1_operand")]
178178597Sraj  "TARGET_PAIRED_SINGLE_FLOAT"
179186227Sraj{
180178596Sraj  rtx temp;
181178597Sraj
182178597Sraj  /* We don't have an insert instruction, so we duplicate the float, and
183178596Sraj     then use a PUL instruction.  */
184178597Sraj  temp = gen_reg_rtx (V2SFmode);
185186227Sraj  emit_insn (gen_mips_cvt_ps_s (temp, operands[1], operands[1]));
186186227Sraj  if (INTVAL (operands[2]) == !BYTES_BIG_ENDIAN)
187178597Sraj    emit_insn (gen_mips_pul_ps (operands[0], temp, operands[0]));
188178597Sraj  else
189178596Sraj    emit_insn (gen_mips_pul_ps (operands[0], operands[0], temp));
190178596Sraj  DONE;
191178596Sraj})
192
193; cvt.ps.s - Floating Point Convert Pair to Paired Single
194(define_expand "mips_cvt_ps_s"
195  [(match_operand:V2SF 0 "register_operand")
196   (match_operand:SF 1 "register_operand")
197   (match_operand:SF 2 "register_operand")]
198  "TARGET_PAIRED_SINGLE_FLOAT"
199{
200  if (BYTES_BIG_ENDIAN)
201    emit_insn (gen_vec_initv2sf_internal (operands[0], operands[1],
202	       operands[2]));
203  else
204    emit_insn (gen_vec_initv2sf_internal (operands[0], operands[2],
205	       operands[1]));
206  DONE;
207})
208
209; cvt.s.pl - Floating Point Convert Pair Lower to Single Floating Point
210(define_expand "mips_cvt_s_pl"
211  [(set (match_operand:SF 0 "register_operand")
212	(vec_select:SF (match_operand:V2SF 1 "register_operand")
213		       (parallel [(match_dup 2)])))]
214  "TARGET_PAIRED_SINGLE_FLOAT"
215  { operands[2] = GEN_INT (BYTES_BIG_ENDIAN); })
216
217; cvt.s.pu - Floating Point Convert Pair Upper to Single Floating Point
218(define_expand "mips_cvt_s_pu"
219  [(set (match_operand:SF 0 "register_operand")
220	(vec_select:SF (match_operand:V2SF 1 "register_operand")
221		       (parallel [(match_dup 2)])))]
222  "TARGET_PAIRED_SINGLE_FLOAT"
223  { operands[2] = GEN_INT (!BYTES_BIG_ENDIAN); })
224
225; alnv.ps - Floating Point Align Variable
226(define_insn "mips_alnv_ps"
227  [(set (match_operand:V2SF 0 "register_operand" "=f")
228	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f")
229		      (match_operand:V2SF 2 "register_operand" "f")
230		      (match_operand:SI 3 "register_operand" "d")]
231		     UNSPEC_ALNV_PS))]
232  "TARGET_PAIRED_SINGLE_FLOAT"
233  "alnv.ps\t%0,%1,%2,%3"
234  [(set_attr "type" "fmove")
235   (set_attr "mode" "SF")])
236
237; addr.ps - Floating Point Reduction Add
238(define_insn "mips_addr_ps"
239  [(set (match_operand:V2SF 0 "register_operand" "=f")
240	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f")
241		      (match_operand:V2SF 2 "register_operand" "f")]
242		     UNSPEC_ADDR_PS))]
243  "TARGET_MIPS3D"
244  "addr.ps\t%0,%1,%2"
245  [(set_attr "type" "fadd")
246   (set_attr "mode" "SF")])
247
248; cvt.pw.ps - Floating Point Convert Paired Single to Paired Word
249(define_insn "mips_cvt_pw_ps"
250  [(set (match_operand:V2SF 0 "register_operand" "=f")
251	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f")]
252		     UNSPEC_CVT_PW_PS))]
253  "TARGET_MIPS3D"
254  "cvt.pw.ps\t%0,%1"
255  [(set_attr "type" "fcvt")
256   (set_attr "mode" "SF")])
257
258; cvt.ps.pw - Floating Point Convert Paired Word to Paired Single
259(define_insn "mips_cvt_ps_pw"
260  [(set (match_operand:V2SF 0 "register_operand" "=f")
261	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f")]
262		     UNSPEC_CVT_PS_PW))]
263  "TARGET_MIPS3D"
264  "cvt.ps.pw\t%0,%1"
265  [(set_attr "type" "fcvt")
266   (set_attr "mode" "SF")])
267
268; mulr.ps - Floating Point Reduction Multiply
269(define_insn "mips_mulr_ps"
270  [(set (match_operand:V2SF 0 "register_operand" "=f")
271	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f")
272		      (match_operand:V2SF 2 "register_operand" "f")]
273		     UNSPEC_MULR_PS))]
274  "TARGET_MIPS3D"
275  "mulr.ps\t%0,%1,%2"
276  [(set_attr "type" "fmul")
277   (set_attr "mode" "SF")])
278
279; abs.ps
280(define_expand "mips_abs_ps"
281  [(set (match_operand:V2SF 0 "register_operand")
282	(unspec:V2SF [(match_operand:V2SF 1 "register_operand")]
283		     UNSPEC_ABS_PS))]
284  "TARGET_PAIRED_SINGLE_FLOAT"
285{
286  /* If we can ignore NaNs, this operation is equivalent to the
287     rtl ABS code.  */
288  if (!HONOR_NANS (V2SFmode))
289    {
290      emit_insn (gen_absv2sf2 (operands[0], operands[1]));
291      DONE;
292    }
293})
294
295(define_insn "*mips_abs_ps"
296  [(set (match_operand:V2SF 0 "register_operand" "=f")
297	(unspec:V2SF [(match_operand:V2SF 1 "register_operand" "f")]
298		     UNSPEC_ABS_PS))]
299  "TARGET_PAIRED_SINGLE_FLOAT"
300  "abs.ps\t%0,%1"
301  [(set_attr "type" "fabs")
302   (set_attr "mode" "SF")])
303
304;----------------------------------------------------------------------------
305; Floating Point Comparisons for Scalars
306;----------------------------------------------------------------------------
307
308(define_insn "mips_cabs_cond_<fmt>"
309  [(set (match_operand:CC 0 "register_operand" "=z")
310	(unspec:CC [(match_operand:SCALARF 1 "register_operand" "f")
311		    (match_operand:SCALARF 2 "register_operand" "f")
312		    (match_operand 3 "const_int_operand" "")]
313		   UNSPEC_CABS))]
314  "TARGET_MIPS3D"
315  "cabs.%Y3.<fmt>\t%0,%1,%2"
316  [(set_attr "type" "fcmp")
317   (set_attr "mode" "FPSW")])
318
319
320;----------------------------------------------------------------------------
321; Floating Point Comparisons for Four Singles
322;----------------------------------------------------------------------------
323
324(define_insn_and_split "mips_c_cond_4s"
325  [(set (match_operand:CCV4 0 "register_operand" "=z")
326	(unspec:CCV4 [(match_operand:V2SF 1 "register_operand" "f")
327		      (match_operand:V2SF 2 "register_operand" "f")
328		      (match_operand:V2SF 3 "register_operand" "f")
329		      (match_operand:V2SF 4 "register_operand" "f")
330		      (match_operand 5 "const_int_operand" "")]
331		     UNSPEC_C))]
332  "TARGET_PAIRED_SINGLE_FLOAT"
333  "#"
334  "&& reload_completed"
335  [(set (match_dup 6)
336	(unspec:CCV2 [(match_dup 1)
337		      (match_dup 2)
338		      (match_dup 5)]
339		     UNSPEC_C))
340   (set (match_dup 7)
341	(unspec:CCV2 [(match_dup 3)
342		      (match_dup 4)
343		      (match_dup 5)]
344		     UNSPEC_C))]
345{
346  operands[6] = simplify_gen_subreg (CCV2mode, operands[0], CCV4mode, 0);
347  operands[7] = simplify_gen_subreg (CCV2mode, operands[0], CCV4mode, 8);
348}
349  [(set_attr "type" "fcmp")
350   (set_attr "length" "8")
351   (set_attr "mode" "FPSW")])
352
353(define_insn_and_split "mips_cabs_cond_4s"
354  [(set (match_operand:CCV4 0 "register_operand" "=z")
355	(unspec:CCV4 [(match_operand:V2SF 1 "register_operand" "f")
356		      (match_operand:V2SF 2 "register_operand" "f")
357		      (match_operand:V2SF 3 "register_operand" "f")
358		      (match_operand:V2SF 4 "register_operand" "f")
359		      (match_operand 5 "const_int_operand" "")]
360		     UNSPEC_CABS))]
361  "TARGET_MIPS3D"
362  "#"
363  "&& reload_completed"
364  [(set (match_dup 6)
365	(unspec:CCV2 [(match_dup 1)
366		      (match_dup 2)
367		      (match_dup 5)]
368		     UNSPEC_CABS))
369   (set (match_dup 7)
370	(unspec:CCV2 [(match_dup 3)
371		      (match_dup 4)
372		      (match_dup 5)]
373		     UNSPEC_CABS))]
374{
375  operands[6] = simplify_gen_subreg (CCV2mode, operands[0], CCV4mode, 0);
376  operands[7] = simplify_gen_subreg (CCV2mode, operands[0], CCV4mode, 8);
377}
378  [(set_attr "type" "fcmp")
379   (set_attr "length" "8")
380   (set_attr "mode" "FPSW")])
381
382
383;----------------------------------------------------------------------------
384; Floating Point Comparisons for Paired Singles
385;----------------------------------------------------------------------------
386
387(define_insn "mips_c_cond_ps"
388  [(set (match_operand:CCV2 0 "register_operand" "=z")
389	(unspec:CCV2 [(match_operand:V2SF 1 "register_operand" "f")
390		      (match_operand:V2SF 2 "register_operand" "f")
391		      (match_operand 3 "const_int_operand" "")]
392		     UNSPEC_C))]
393  "TARGET_PAIRED_SINGLE_FLOAT"
394  "c.%Y3.ps\t%0,%1,%2"
395  [(set_attr "type" "fcmp")
396   (set_attr "mode" "FPSW")])
397
398(define_insn "mips_cabs_cond_ps"
399  [(set (match_operand:CCV2 0 "register_operand" "=z")
400	(unspec:CCV2 [(match_operand:V2SF 1 "register_operand" "f")
401		      (match_operand:V2SF 2 "register_operand" "f")
402		      (match_operand 3 "const_int_operand" "")]
403		     UNSPEC_CABS))]
404  "TARGET_MIPS3D"
405  "cabs.%Y3.ps\t%0,%1,%2"
406  [(set_attr "type" "fcmp")
407   (set_attr "mode" "FPSW")])
408
409;; An expander for generating an scc operation.
410(define_expand "scc_ps"
411  [(set (match_operand:CCV2 0)
412	(unspec:CCV2 [(match_operand 1)] UNSPEC_SCC))])
413
414(define_insn "s<code>_ps"
415  [(set (match_operand:CCV2 0 "register_operand" "=z")
416	(unspec:CCV2
417	   [(fcond (match_operand:V2SF 1 "register_operand" "f")
418		   (match_operand:V2SF 2 "register_operand" "f"))]
419	   UNSPEC_SCC))]
420  "TARGET_PAIRED_SINGLE_FLOAT"
421  "c.<fcond>.ps\t%0,%1,%2"
422  [(set_attr "type" "fcmp")
423   (set_attr "mode" "FPSW")])
424
425(define_insn "s<code>_ps"
426  [(set (match_operand:CCV2 0 "register_operand" "=z")
427	(unspec:CCV2
428	   [(swapped_fcond (match_operand:V2SF 1 "register_operand" "f")
429			   (match_operand:V2SF 2 "register_operand" "f"))]
430	   UNSPEC_SCC))]
431  "TARGET_PAIRED_SINGLE_FLOAT"
432  "c.<swapped_fcond>.ps\t%0,%2,%1"
433  [(set_attr "type" "fcmp")
434   (set_attr "mode" "FPSW")])
435
436;----------------------------------------------------------------------------
437; Floating Point Branch Instructions.
438;----------------------------------------------------------------------------
439
440; Branch on Any of Four Floating Point Condition Codes True
441(define_insn "bc1any4t"
442  [(set (pc)
443	(if_then_else (ne (match_operand:CCV4 0 "register_operand" "z")
444			  (const_int 0))
445		      (label_ref (match_operand 1 "" ""))
446		      (pc)))]
447  "TARGET_MIPS3D"
448  "%*bc1any4t\t%0,%1%/"
449  [(set_attr "type" "branch")
450   (set_attr "mode" "none")])
451
452; Branch on Any of Four Floating Point Condition Codes False
453(define_insn "bc1any4f"
454  [(set (pc)
455	(if_then_else (ne (match_operand:CCV4 0 "register_operand" "z")
456			  (const_int -1))
457		      (label_ref (match_operand 1 "" ""))
458		      (pc)))]
459  "TARGET_MIPS3D"
460  "%*bc1any4f\t%0,%1%/"
461  [(set_attr "type" "branch")
462   (set_attr "mode" "none")])
463
464; Branch on Any of Two Floating Point Condition Codes True
465(define_insn "bc1any2t"
466  [(set (pc)
467	(if_then_else (ne (match_operand:CCV2 0 "register_operand" "z")
468			  (const_int 0))
469		      (label_ref (match_operand 1 "" ""))
470		      (pc)))]
471  "TARGET_MIPS3D"
472  "%*bc1any2t\t%0,%1%/"
473  [(set_attr "type" "branch")
474   (set_attr "mode" "none")])
475
476; Branch on Any of Two Floating Point Condition Codes False
477(define_insn "bc1any2f"
478  [(set (pc)
479	(if_then_else (ne (match_operand:CCV2 0 "register_operand" "z")
480			  (const_int -1))
481		      (label_ref (match_operand 1 "" ""))
482		      (pc)))]
483  "TARGET_MIPS3D"
484  "%*bc1any2f\t%0,%1%/"
485  [(set_attr "type" "branch")
486   (set_attr "mode" "none")])
487
488; Used to access one register in a CCV2 pair.  Operand 0 is the register
489; pair and operand 1 is the index of the register we want (a CONST_INT).
490(define_expand "single_cc"
491  [(ne (unspec:CC [(match_operand 0) (match_operand 1)] UNSPEC_SINGLE_CC)
492       (const_int 0))])
493
494; This is a normal floating-point branch pattern, but rather than check
495; a single CCmode register, it checks one register in a CCV2 pair.
496; Operand 2 is the register pair and operand 3 is the index of the
497; register we want.
498(define_insn "*branch_upper_lower"
499  [(set (pc)
500        (if_then_else
501	 (match_operator 0 "equality_operator"
502	    [(unspec:CC [(match_operand:CCV2 2 "register_operand" "z")
503			 (match_operand 3 "const_int_operand")]
504			UNSPEC_SINGLE_CC)
505	     (const_int 0)])
506	 (label_ref (match_operand 1 "" ""))
507	 (pc)))]
508  "TARGET_HARD_FLOAT"
509{
510  operands[2]
511    = gen_rtx_REG (CCmode, REGNO (operands[2]) + INTVAL (operands[3]));
512  return mips_output_conditional_branch (insn, operands,
513					 MIPS_BRANCH ("b%F0", "%2,%1"),
514					 MIPS_BRANCH ("b%W0", "%2,%1"));
515}
516  [(set_attr "type" "branch")
517   (set_attr "mode" "none")])
518
519; As above, but with the sense of the condition reversed.
520(define_insn "*branch_upper_lower_inverted"
521  [(set (pc)
522        (if_then_else
523	 (match_operator 0 "equality_operator"
524	    [(unspec:CC [(match_operand:CCV2 2 "register_operand" "z")
525			 (match_operand 3 "const_int_operand")]
526			UNSPEC_SINGLE_CC)
527	     (const_int 0)])
528	 (pc)
529	 (label_ref (match_operand 1 "" ""))))]
530  "TARGET_HARD_FLOAT"
531{
532  operands[2]
533    = gen_rtx_REG (CCmode, REGNO (operands[2]) + INTVAL (operands[3]));
534  return mips_output_conditional_branch (insn, operands,
535					 MIPS_BRANCH ("b%W0", "%2,%1"),
536					 MIPS_BRANCH ("b%F0", "%2,%1"));
537}
538  [(set_attr "type" "branch")
539   (set_attr "mode" "none")])
540
541;----------------------------------------------------------------------------
542; Floating Point Reduced Precision Reciprocal Square Root Instructions.
543;----------------------------------------------------------------------------
544
545(define_insn "mips_rsqrt1_<fmt>"
546  [(set (match_operand:ANYF 0 "register_operand" "=f")
547	(unspec:ANYF [(match_operand:ANYF 1 "register_operand" "f")]
548		     UNSPEC_RSQRT1))]
549  "TARGET_MIPS3D"
550  "rsqrt1.<fmt>\t%0,%1"
551  [(set_attr "type" "frsqrt1")
552   (set_attr "mode" "<UNITMODE>")])
553
554(define_insn "mips_rsqrt2_<fmt>"
555  [(set (match_operand:ANYF 0 "register_operand" "=f")
556	(unspec:ANYF [(match_operand:ANYF 1 "register_operand" "f")
557		      (match_operand:ANYF 2 "register_operand" "f")]
558		     UNSPEC_RSQRT2))]
559  "TARGET_MIPS3D"
560  "rsqrt2.<fmt>\t%0,%1,%2"
561  [(set_attr "type" "frsqrt2")
562   (set_attr "mode" "<UNITMODE>")])
563
564(define_insn "mips_recip1_<fmt>"
565  [(set (match_operand:ANYF 0 "register_operand" "=f")
566	(unspec:ANYF [(match_operand:ANYF 1 "register_operand" "f")]
567		     UNSPEC_RECIP1))]
568  "TARGET_MIPS3D"
569  "recip1.<fmt>\t%0,%1"
570  [(set_attr "type" "frdiv1")
571   (set_attr "mode" "<UNITMODE>")])
572
573(define_insn "mips_recip2_<fmt>"
574  [(set (match_operand:ANYF 0 "register_operand" "=f")
575	(unspec:ANYF [(match_operand:ANYF 1 "register_operand" "f")
576		      (match_operand:ANYF 2 "register_operand" "f")]
577		     UNSPEC_RECIP2))]
578  "TARGET_MIPS3D"
579  "recip2.<fmt>\t%0,%1,%2"
580  [(set_attr "type" "frdiv2")
581   (set_attr "mode" "<UNITMODE>")])
582
583(define_expand "vcondv2sf"
584  [(set (match_operand:V2SF 0 "register_operand")
585	(if_then_else:V2SF
586	  (match_operator 3 ""
587	    [(match_operand:V2SF 4 "register_operand")
588	     (match_operand:V2SF 5 "register_operand")])
589	  (match_operand:V2SF 1 "register_operand")
590	  (match_operand:V2SF 2 "register_operand")))]
591  "TARGET_PAIRED_SINGLE_FLOAT"
592{
593  mips_expand_vcondv2sf (operands[0], operands[1], operands[2],
594			 GET_CODE (operands[3]), operands[4], operands[5]);
595  DONE;
596})
597
598(define_expand "sminv2sf3"
599  [(set (match_operand:V2SF 0 "register_operand")
600	(smin:V2SF (match_operand:V2SF 1 "register_operand")
601		   (match_operand:V2SF 2 "register_operand")))]
602  "TARGET_PAIRED_SINGLE_FLOAT"
603{
604  mips_expand_vcondv2sf (operands[0], operands[1], operands[2],
605			 LE, operands[1], operands[2]);
606  DONE;
607})
608
609(define_expand "smaxv2sf3"
610  [(set (match_operand:V2SF 0 "register_operand")
611	(smax:V2SF (match_operand:V2SF 1 "register_operand")
612		   (match_operand:V2SF 2 "register_operand")))]
613  "TARGET_PAIRED_SINGLE_FLOAT"
614{
615  mips_expand_vcondv2sf (operands[0], operands[1], operands[2],
616			 LE, operands[2], operands[1]);
617  DONE;
618})
619