gcc/config/iq2000/iq2000.md

   1 ;;  iq2000.md        Machine Description for Vitesse IQ2000 processors
   2 ;;  Copyright (C) 2003, 2004, 2005, 2007 Free Software Foundation, Inc.
   3
   4 ;; This file is part of GCC.
   5
   6 ;; GCC is free software; you can redistribute it and/or modify
   7 ;; it under the terms of the GNU General Public License as published by
   8 ;; the Free Software Foundation; either version 3, or (at your option)
   9 ;; any later version.
  10
  11 ;; GCC is distributed in the hope that it will be useful,
  12 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 ;; GNU General Public License for more details.
  15
  16 ;; You should have received a copy of the GNU General Public License
  17 ;; along with GCC; see the file COPYING3.  If not see
  18 ;; <http://www.gnu.org/licenses/>.
  19
  20 (define_constants
  21   [(UNSPEC_ADO16 0)
  22    (UNSPEC_RAM  1)
  23    (UNSPEC_CHKHDR 2)
  24    (UNSPEC_PKRL 3)
  25    (UNSPEC_CFC0 4)
  26    (UNSPEC_CFC1 5)
  27    (UNSPEC_CFC2 6)
  28    (UNSPEC_CFC3 7)
  29    (UNSPEC_CTC0 8)
  30    (UNSPEC_CTC1 9)
  31    (UNSPEC_CTC2 10)
  32    (UNSPEC_CTC3 11)
  33    (UNSPEC_MFC0 12)
  34    (UNSPEC_MFC1 13)
  35    (UNSPEC_MFC2 14)
  36    (UNSPEC_MFC3 15)
  37    (UNSPEC_MTC0 16)
  38    (UNSPEC_MTC1 17)
  39    (UNSPEC_MTC2 18)
  40    (UNSPEC_MTC3 19)
  41    (UNSPEC_LUR  20)
  42    (UNSPEC_RB   21)
  43    (UNSPEC_RX   22)
  44    (UNSPEC_SRRD 23)
  45    (UNSPEC_SRWR 24)
  46    (UNSPEC_WB   25)
  47    (UNSPEC_WX   26)
  48    (UNSPEC_LUC32 49)
  49    (UNSPEC_LUC32L 27)
  50    (UNSPEC_LUC64 28)
  51    (UNSPEC_LUC64L 29)
  52    (UNSPEC_LUK 30)
  53    (UNSPEC_LULCK 31)
  54    (UNSPEC_LUM32 32)
  55    (UNSPEC_LUM32L 33)
  56    (UNSPEC_LUM64 34)
  57    (UNSPEC_LUM64L 35)
  58    (UNSPEC_LURL 36)
  59    (UNSPEC_MRGB 37)
  60    (UNSPEC_SRRDL 38)
  61    (UNSPEC_SRULCK 39)
  62    (UNSPEC_SRWRU 40)
  63    (UNSPEC_TRAPQFL 41)
  64    (UNSPEC_TRAPQNE 42)
  65    (UNSPEC_TRAPREL 43)
  66    (UNSPEC_WBU 44)
  67    (UNSPEC_SYSCALL 45)]
  68 )
  69 ;; UNSPEC values used in iq2000.md
  70 ;; Number       USE
  71 ;; 0            movsi_ul
  72 ;; 1            movsi_us, get_fnaddr
  73 ;; 3            eh_set_return
  74 ;; 20           builtin_setjmp_setup
  75 ;;
  76 ;; UNSPEC_VOLATILE values
  77 ;; 0            blockage
  78 ;; 2            loadgp
  79 ;; 3            builtin_longjmp
  80 ;; 4            exception_receiver
  81 ;; 10           consttable_qi
  82 ;; 11           consttable_hi
  83 ;; 12           consttable_si
  84 ;; 13           consttable_di
  85 ;; 14           consttable_sf
  86 ;; 15           consttable_df
  87 ;; 16           align_2
  88 ;; 17           align_4
  89 ;; 18           align_8
  90 \f
  91
  92 ;; ....................
  93 ;;
  94 ;;      Attributes
  95 ;;
  96 ;; ....................
  97
  98 ;; Classification of each insn.
  99 ;; branch       conditional branch
 100 ;; jump         unconditional jump
 101 ;; call         unconditional call
 102 ;; load         load instruction(s)
 103 ;; store        store instruction(s)
 104 ;; move         data movement within same register set
 105 ;; xfer         transfer to/from coprocessor
 106 ;; arith        integer arithmetic instruction
 107 ;; darith       double precision integer arithmetic instructions
 108 ;; imul         integer multiply
 109 ;; idiv         integer divide
 110 ;; icmp         integer compare
 111 ;; fadd         floating point add/subtract
 112 ;; fmul         floating point multiply
 113 ;; fmadd        floating point multiply-add
 114 ;; fdiv         floating point divide
 115 ;; fabs         floating point absolute value
 116 ;; fneg         floating point negation
 117 ;; fcmp         floating point compare
 118 ;; fcvt         floating point convert
 119 ;; fsqrt        floating point square root
 120 ;; multi        multiword sequence (or user asm statements)
 121 ;; nop          no operation
 122
 123 (define_attr "type"
 124   "unknown,branch,jump,call,load,store,move,xfer,arith,darith,imul,idiv,icmp,fadd,fmul,fmadd,fdiv,fabs,fneg,fcmp,fcvt,fsqrt,multi,nop"
 125   (const_string "unknown"))
 126
 127 ;; Main data type used by the insn
 128 (define_attr "mode" "unknown,none,QI,HI,SI,DI,SF,DF,FPSW" (const_string "unknown"))
 129
 130 ;; Length (in # of bytes).  A conditional branch is allowed only to a
 131 ;; location within a signed 18-bit offset of the delay slot.  If that
 132 ;; provides too small a range, we use the `j' instruction.  This
 133 ;; instruction takes a 28-bit value, but that value is not an offset.
 134 ;; Instead, it's bitwise-ored with the high-order four bits of the
 135 ;; instruction in the delay slot, which means it cannot be used to
 136 ;; cross a 256MB boundary.  We could fall back back on the jr,
 137 ;; instruction which allows full access to the entire address space,
 138 ;; but we do not do so at present.
 139
 140 (define_attr "length" ""
 141    (cond [(eq_attr "type" "branch")
 142           (cond [(lt (abs (minus (match_dup 1) (plus (pc) (const_int 4))))
 143                      (const_int 131072))
 144                  (const_int 4)]
 145                  (const_int 12))]
 146           (const_int 4)))
 147
 148 (define_attr "cpu"
 149   "default,iq2000"
 150   (const (symbol_ref "iq2000_cpu_attr")))
 151
 152 ;; Does the instruction have a mandatory delay slot? has_dslot
 153 ;; Can the instruction be in a delay slot? ok_in_dslot
 154 ;; Can the instruction not be in a delay slot? not_in_dslot
 155 (define_attr "dslot" "has_dslot,ok_in_dslot,not_in_dslot"
 156   (if_then_else (eq_attr "type" "branch,jump,call,xfer,fcmp")
 157                 (const_string "has_dslot")
 158                 (const_string "ok_in_dslot")))
 159
 160 ;; Attribute defining whether or not we can use the branch-likely instructions
 161
 162 (define_attr "branch_likely" "no,yes"
 163   (const
 164    (if_then_else (ne (symbol_ref "GENERATE_BRANCHLIKELY") (const_int 0))
 165                  (const_string "yes")
 166                  (const_string "no"))))
 167
 168
 169 ;; Describe a user's asm statement.
 170 (define_asm_attributes
 171   [(set_attr "type" "multi")])
 172
 173 \f
 174
 175 ;; .........................
 176 ;;
 177 ;;      Delay slots, can't describe load/fcmp/xfer delay slots here
 178 ;;
 179 ;; .........................
 180
 181 (define_delay (eq_attr "type" "jump")
 182   [(and (eq_attr "dslot" "ok_in_dslot") (eq_attr "length" "4"))
 183    (nil)
 184    (nil)])
 185
 186 (define_delay (eq_attr "type" "branch")
 187   [(and (eq_attr "dslot" "ok_in_dslot") (eq_attr "length" "4"))
 188    (nil)
 189    (and (eq_attr "branch_likely" "yes") (and (eq_attr "dslot" "ok_in_dslot") (eq_attr "length" "4")))])
 190
 191 (define_delay (eq_attr "type" "call")
 192   [(and (eq_attr "dslot" "ok_in_dslot") (eq_attr "length" "4"))
 193    (nil)
 194    (nil)])
 195
 196 (include "predicates.md")
 197 \f
 198
 199 ;; .........................
 200 ;;
 201 ;;      Pipeline model
 202 ;;
 203 ;; .........................
 204
 205 (define_automaton "iq2000")
 206 (define_cpu_unit "core,memory" "iq2000")
 207
 208 (define_insn_reservation "nonmemory" 1
 209   (eq_attr "type" "!load,move,store,xfer")
 210   "core")
 211
 212 (define_insn_reservation "iq2000_load_move" 3
 213   (and (eq_attr "type" "load,move")
 214        (eq_attr "cpu" "iq2000"))
 215   "memory")
 216
 217 (define_insn_reservation "other_load_move" 1
 218   (and (eq_attr "type" "load,move")
 219        (eq_attr "cpu" "!iq2000"))
 220   "memory")
 221
 222 (define_insn_reservation "store" 1
 223   (eq_attr "type" "store")
 224   "memory")
 225
 226 (define_insn_reservation "xfer" 2
 227   (eq_attr "type" "xfer")
 228   "memory")
 229 \f
 230 ;;
 231 ;;  ....................
 232 ;;
 233 ;;      CONDITIONAL TRAPS
 234 ;;
 235 ;;  ....................
 236 ;;
 237
 238 (define_insn "trap"
 239   [(trap_if (const_int 1) (const_int 0))]
 240   ""
 241   "*
 242 {
 243   return \"break\";
 244 }")
 245 \f
 246 ;;
 247 ;;  ....................
 248 ;;
 249 ;;      ADDITION
 250 ;;
 251 ;;  ....................
 252 ;;
 253
 254 (define_expand "addsi3"
 255   [(set (match_operand:SI 0 "register_operand" "=d")
 256         (plus:SI (match_operand:SI 1 "reg_or_0_operand" "dJ")
 257                  (match_operand:SI 2 "arith_operand" "dI")))]
 258   ""
 259   "")
 260
 261 (define_insn "addsi3_internal"
 262   [(set (match_operand:SI 0 "register_operand" "=d,=d")
 263         (plus:SI (match_operand:SI 1 "reg_or_0_operand" "dJ,dJ")
 264                  (match_operand:SI 2 "arith_operand" "d,I")))]
 265   ""
 266   "@
 267    addu\\t%0,%z1,%2
 268    addiu\\t%0,%z1,%2"
 269   [(set_attr "type"     "arith")
 270    (set_attr "mode"     "SI")])
 271 \f
 272 ;;
 273 ;;  ....................
 274 ;;
 275 ;;      SUBTRACTION
 276 ;;
 277 ;;  ....................
 278 ;;
 279
 280 (define_expand "subsi3"
 281   [(set (match_operand:SI 0 "register_operand" "=d")
 282         (minus:SI (match_operand:SI 1 "reg_or_0_operand" "dJ")
 283                   (match_operand:SI 2 "arith_operand" "dI")))]
 284   ""
 285   "")
 286
 287 (define_insn "subsi3_internal"
 288   [(set (match_operand:SI 0 "register_operand" "=d,=d")
 289         (minus:SI (match_operand:SI 1 "reg_or_0_operand" "dJ,dJ")
 290                   (match_operand:SI 2 "arith_operand" "d,I")))]
 291   ""
 292   "@
 293    subu\\t%0,%z1,%2
 294    addiu\\t%0,%z1,%n2"
 295   [(set_attr "type"     "arith")
 296    (set_attr "mode"     "SI")])
 297 \f
 298 ;;
 299 ;;  ....................
 300 ;;
 301 ;;      NEGATION and ONE'S COMPLEMENT
 302 ;;
 303 ;;  ....................
 304
 305 (define_insn "negsi2"
 306   [(set (match_operand:SI 0 "register_operand" "=d")
 307         (neg:SI (match_operand:SI 1 "register_operand" "d")))]
 308   ""
 309   "*
 310 {
 311   operands[2] = const0_rtx;
 312   return \"subu\\t%0,%z2,%1\";
 313 }"
 314   [(set_attr "type"     "arith")
 315    (set_attr "mode"     "SI")])
 316
 317 (define_insn "one_cmplsi2"
 318   [(set (match_operand:SI 0 "register_operand" "=d")
 319         (not:SI (match_operand:SI 1 "register_operand" "d")))]
 320   ""
 321   "*
 322 {
 323   operands[2] = const0_rtx;
 324   return \"nor\\t%0,%z2,%1\";
 325 }"
 326   [(set_attr "type"     "arith")
 327    (set_attr "mode"     "SI")])
 328 \f
 329 ;;
 330 ;;  ....................
 331 ;;
 332 ;;      LOGICAL
 333 ;;
 334 ;;  ....................
 335 ;;
 336
 337 (define_expand "andsi3"
 338   [(set (match_operand:SI 0 "register_operand" "=d,d,d")
 339         (and:SI (match_operand:SI 1 "uns_arith_operand" "%d,d,d")
 340                 (match_operand:SI 2 "nonmemory_operand" "d,K,N")))]
 341   ""
 342   "")
 343
 344 (define_insn ""
 345   [(set (match_operand:SI 0 "register_operand" "=d,d,d")
 346         (and:SI (match_operand:SI 1 "uns_arith_operand" "%d,d,d")
 347                 (match_operand:SI 2 "nonmemory_operand" "d,K,N")))]
 348   ""
 349   "*
 350 {
 351   if (which_alternative == 0)
 352     return \"and\\t%0,%1,%2\";
 353   else if (which_alternative == 1)
 354     return \"andi\\t%0,%1,%x2\";
 355   else if (which_alternative == 2)
 356     {
 357       if ((INTVAL (operands[2]) & 0xffff) == 0xffff)
 358         {
 359           operands[2] = GEN_INT (INTVAL (operands[2]) >> 16);
 360           return \"andoui\\t%0,%1,%x2\";
 361         }
 362       else
 363         {
 364           operands[2] = GEN_INT (INTVAL (operands[2]) & 0xffff);
 365           return \"andoi\\t%0,%1,%x2\";
 366         }
 367     }
 368 }"
 369   [(set_attr "type"     "arith")
 370    (set_attr "mode"     "SI")])
 371
 372 (define_expand "iorsi3"
 373   [(set (match_operand:SI 0 "register_operand" "=d,d")
 374         (ior:SI (match_operand:SI 1 "uns_arith_operand" "%d,d")
 375                 (match_operand:SI 2 "uns_arith_operand" "d,K")))]
 376   ""
 377   "")
 378
 379 (define_insn ""
 380   [(set (match_operand:SI 0 "register_operand" "=d,d")
 381         (ior:SI (match_operand:SI 1 "uns_arith_operand" "%d,d")
 382                 (match_operand:SI 2 "uns_arith_operand" "d,K")))]
 383   ""
 384   "@
 385    or\\t%0,%1,%2
 386    ori\\t%0,%1,%x2"
 387   [(set_attr "type"     "arith")
 388    (set_attr "mode"     "SI")])
 389
 390 (define_expand "xorsi3"
 391   [(set (match_operand:SI 0 "register_operand" "=d,d")
 392         (xor:SI (match_operand:SI 1 "uns_arith_operand" "%d,d")
 393                 (match_operand:SI 2 "uns_arith_operand" "d,K")))]
 394   ""
 395   "")
 396
 397 (define_insn ""
 398   [(set (match_operand:SI 0 "register_operand" "=d,d")
 399         (xor:SI (match_operand:SI 1 "uns_arith_operand" "%d,d")
 400                 (match_operand:SI 2 "uns_arith_operand" "d,K")))]
 401   ""
 402   "@
 403    xor\\t%0,%1,%2
 404    xori\\t%0,%1,%x2"
 405   [(set_attr "type"     "arith")
 406    (set_attr "mode"     "SI")])
 407
 408 (define_insn "*norsi3"
 409   [(set (match_operand:SI 0 "register_operand" "=d")
 410         (and:SI (not:SI (match_operand:SI 1 "register_operand" "d"))
 411                 (not:SI (match_operand:SI 2 "register_operand" "d"))))]
 412   ""
 413   "nor\\t%0,%z1,%z2"
 414   [(set_attr "type"     "arith")
 415    (set_attr "mode"     "SI")])
 416 \f
 417 ;;
 418 ;;  ....................
 419 ;;
 420 ;;      ZERO EXTENSION
 421 ;;
 422 ;;  ....................
 423
 424 ;; Extension insns.
 425 ;; Those for integer source operand are ordered widest source type first.
 426
 427 (define_expand "zero_extendhisi2"
 428   [(set (match_operand:SI 0 "register_operand" "")
 429         (zero_extend:SI (match_operand:HI 1 "nonimmediate_operand" "")))]
 430   ""
 431   "")
 432
 433 (define_insn ""
 434   [(set (match_operand:SI 0 "register_operand" "=d,d,d")
 435         (zero_extend:SI (match_operand:HI 1 "nonimmediate_operand" "d,R,m")))]
 436   ""
 437   "*
 438 {
 439   if (which_alternative == 0)
 440     return \"andi\\t%0,%1,0xffff\";
 441   else
 442     return iq2000_move_1word (operands, insn, TRUE);
 443 }"
 444   [(set_attr "type"     "arith,load,load")
 445    (set_attr "mode"     "SI")
 446    (set_attr "length"   "4,4,8")])
 447
 448 (define_expand "zero_extendqihi2"
 449   [(set (match_operand:HI 0 "register_operand" "")
 450         (zero_extend:HI (match_operand:QI 1 "nonimmediate_operand" "")))]
 451   ""
 452   "")
 453
 454 (define_insn ""
 455   [(set (match_operand:HI 0 "register_operand" "=d,d,d")
 456         (zero_extend:HI (match_operand:QI 1 "nonimmediate_operand" "d,R,m")))]
 457   ""
 458   "*
 459 {
 460   if (which_alternative == 0)
 461     return \"andi\\t%0,%1,0x00ff\";
 462   else
 463     return iq2000_move_1word (operands, insn, TRUE);
 464 }"
 465   [(set_attr "type"     "arith,load,load")
 466    (set_attr "mode"     "HI")
 467    (set_attr "length"   "4,4,8")])
 468
 469 (define_expand "zero_extendqisi2"
 470   [(set (match_operand:SI 0 "register_operand" "")
 471         (zero_extend:SI (match_operand:QI 1 "nonimmediate_operand" "")))]
 472   ""
 473   "")
 474
 475 (define_insn ""
 476   [(set (match_operand:SI 0 "register_operand" "=d,d,d")
 477         (zero_extend:SI (match_operand:QI 1 "nonimmediate_operand" "d,R,m")))]
 478   ""
 479   "*
 480 {
 481   if (which_alternative == 0)
 482     return \"andi\\t%0,%1,0x00ff\";
 483   else
 484     return iq2000_move_1word (operands, insn, TRUE);
 485 }"
 486   [(set_attr "type"     "arith,load,load")
 487    (set_attr "mode"     "SI")
 488    (set_attr "length"   "4,4,8")])
 489
 490 ;;
 491 ;;  ....................
 492 ;;
 493 ;;      SIGN EXTENSION
 494 ;;
 495 ;;  ....................
 496
 497 ;; Extension insns.
 498 ;; Those for integer source operand are ordered widest source type first.
 499
 500 ;; These patterns originally accepted general_operands, however, slightly
 501 ;; better code is generated by only accepting register_operands, and then
 502 ;; letting combine generate the lh and lb insns.
 503
 504 (define_expand "extendhisi2"
 505   [(set (match_operand:SI 0 "register_operand" "")
 506         (sign_extend:SI (match_operand:HI 1 "nonimmediate_operand" "")))]
 507   ""
 508   "
 509 {
 510   if (optimize && GET_CODE (operands[1]) == MEM)
 511     operands[1] = force_not_mem (operands[1]);
 512
 513   if (GET_CODE (operands[1]) != MEM)
 514     {
 515       rtx op1   = gen_lowpart (SImode, operands[1]);
 516       rtx temp  = gen_reg_rtx (SImode);
 517       rtx shift = GEN_INT (16);
 518
 519       emit_insn (gen_ashlsi3 (temp, op1, shift));
 520       emit_insn (gen_ashrsi3 (operands[0], temp, shift));
 521       DONE;
 522     }
 523 }")
 524
 525 (define_insn "extendhisi2_internal"
 526   [(set (match_operand:SI 0 "register_operand" "=d,d")
 527         (sign_extend:SI (match_operand:HI 1 "memory_operand" "R,m")))]
 528   ""
 529   "* return iq2000_move_1word (operands, insn, FALSE);"
 530   [(set_attr "type"     "load")
 531    (set_attr "mode"     "SI")
 532    (set_attr "length"   "4,8")])
 533
 534 (define_expand "extendqihi2"
 535   [(set (match_operand:HI 0 "register_operand" "")
 536         (sign_extend:HI (match_operand:QI 1 "nonimmediate_operand" "")))]
 537   ""
 538   "
 539 {
 540   if (optimize && GET_CODE (operands[1]) == MEM)
 541     operands[1] = force_not_mem (operands[1]);
 542
 543   if (GET_CODE (operands[1]) != MEM)
 544     {
 545       rtx op0   = gen_lowpart (SImode, operands[0]);
 546       rtx op1   = gen_lowpart (SImode, operands[1]);
 547       rtx temp  = gen_reg_rtx (SImode);
 548       rtx shift = GEN_INT (24);
 549
 550       emit_insn (gen_ashlsi3 (temp, op1, shift));
 551       emit_insn (gen_ashrsi3 (op0, temp, shift));
 552       DONE;
 553     }
 554 }")
 555
 556 (define_insn "extendqihi2_internal"
 557   [(set (match_operand:HI 0 "register_operand" "=d,d")
 558         (sign_extend:HI (match_operand:QI 1 "memory_operand" "R,m")))]
 559   ""
 560   "* return iq2000_move_1word (operands, insn, FALSE);"
 561   [(set_attr "type"     "load")
 562    (set_attr "mode"     "SI")
 563    (set_attr "length"   "4,8")])
 564
 565
 566 (define_expand "extendqisi2"
 567   [(set (match_operand:SI 0 "register_operand" "")
 568         (sign_extend:SI (match_operand:QI 1 "nonimmediate_operand" "")))]
 569   ""
 570   "
 571 {
 572   if (optimize && GET_CODE (operands[1]) == MEM)
 573     operands[1] = force_not_mem (operands[1]);
 574
 575   if (GET_CODE (operands[1]) != MEM)
 576     {
 577       rtx op1   = gen_lowpart (SImode, operands[1]);
 578       rtx temp  = gen_reg_rtx (SImode);
 579       rtx shift = GEN_INT (24);
 580
 581       emit_insn (gen_ashlsi3 (temp, op1, shift));
 582       emit_insn (gen_ashrsi3 (operands[0], temp, shift));
 583       DONE;
 584     }
 585 }")
 586
 587 (define_insn "extendqisi2_insn"
 588   [(set (match_operand:SI 0 "register_operand" "=d,d")
 589         (sign_extend:SI (match_operand:QI 1 "memory_operand" "R,m")))]
 590   ""
 591   "* return iq2000_move_1word (operands, insn, FALSE);"
 592   [(set_attr "type"     "load")
 593    (set_attr "mode"     "SI")
 594    (set_attr "length"   "4,8")])
 595 \f
 596 ;;
 597 ;;  ........................
 598 ;;
 599 ;;      BIT FIELD EXTRACTION
 600 ;;
 601 ;;  ........................
 602
 603 (define_insn "extzv"
 604   [(set (match_operand:SI 0 "register_operand" "=r")
 605         (zero_extract:SI (match_operand:SI 1 "register_operand" "r")
 606                          (match_operand:SI 2 "const_int_operand" "O")
 607                          (match_operand:SI 3 "const_int_operand" "O")))]
 608   ""
 609   "*
 610 {
 611   int value[4];
 612   value[2] = INTVAL (operands[2]);
 613   value[3] = INTVAL (operands[3]);
 614   operands[2] = GEN_INT ((value[3]));
 615   operands[3] = GEN_INT ((32 - value[2]));
 616   return \"ram\\t%0,%1,%2,%3,0x0\";
 617 }"
 618   [(set_attr "type" "arith")])
 619 \f
 620 ;;
 621 ;;  ....................
 622 ;;
 623 ;;      DATA MOVEMENT
 624 ;;
 625 ;;  ....................
 626
 627 /* Take care of constants that don't fit in single instruction */
 628 (define_split
 629   [(set (match_operand:SI 0 "register_operand" "")
 630         (match_operand:SI 1 "general_operand" ""))]
 631   "(reload_in_progress || reload_completed)
 632    && large_int (operands[1], SImode)"
 633
 634   [(set (match_dup 0 )
 635         (high:SI (match_dup 1)))
 636    (set (match_dup 0 )
 637         (lo_sum:SI (match_dup 0)
 638                    (match_dup 1)))]
 639 )
 640
 641 ;; ??? iq2000_move_1word has support for HIGH, so this pattern may be
 642 ;; unnecessary.
 643
 644 (define_insn "high"
 645   [(set (match_operand:SI 0 "register_operand" "=r")
 646         (high:SI (match_operand:SI 1 "immediate_operand" "")))]
 647   ""
 648   "lui\\t%0,%%hi(%1) # high"
 649   [(set_attr "type"     "move")])
 650
 651 (define_insn "low"
 652   [(set (match_operand:SI 0 "register_operand" "=r")
 653         (lo_sum:SI (match_operand:SI 1 "register_operand" "r")
 654                    (match_operand:SI 2 "immediate_operand" "")))]
 655   ""
 656   "addiu\\t%0,%1,%%lo(%2) # low"
 657   [(set_attr "type"     "arith")
 658    (set_attr "mode"     "SI")])
 659
 660 ;; 32-bit Integer moves
 661
 662 (define_split
 663   [(set (match_operand:SI 0 "register_operand" "")
 664         (match_operand:SI 1 "large_int" ""))]
 665   "reload_in_progress | reload_completed"
 666   [(set (match_dup 0)
 667         (match_dup 2))
 668    (set (match_dup 0)
 669         (ior:SI (match_dup 0)
 670                 (match_dup 3)))]
 671   "
 672 {
 673   operands[2] = GEN_INT (trunc_int_for_mode (INTVAL (operands[1])
 674                                              & BITMASK_UPPER16,
 675                                              SImode));
 676   operands[3] = GEN_INT (INTVAL (operands[1]) & BITMASK_LOWER16);
 677 }")
 678
 679 ;; Unlike most other insns, the move insns can't be split with
 680 ;; different predicates, because register spilling and other parts of
 681 ;; the compiler, have memoized the insn number already.
 682
 683 (define_expand "movsi"
 684   [(set (match_operand:SI 0 "nonimmediate_operand" "")
 685         (match_operand:SI 1 "general_operand" ""))]
 686   ""
 687   "
 688 {
 689   if (iq2000_check_split (operands[1], SImode))
 690     {
 691       enum machine_mode mode = GET_MODE (operands[0]);
 692       rtx tem = ((reload_in_progress | reload_completed)
 693                  ? operands[0] : gen_reg_rtx (mode));
 694
 695       emit_insn (gen_rtx_SET (VOIDmode, tem,
 696                               gen_rtx_HIGH (mode, operands[1])));
 697
 698       operands[1] = gen_rtx_LO_SUM (mode, tem, operands[1]);
 699     }
 700
 701   if ((reload_in_progress | reload_completed) == 0
 702       && !register_operand (operands[0], SImode)
 703       && !register_operand (operands[1], SImode)
 704       && (GET_CODE (operands[1]) != CONST_INT
 705           || INTVAL (operands[1]) != 0))
 706     {
 707       rtx temp = force_reg (SImode, operands[1]);
 708       emit_move_insn (operands[0], temp);
 709       DONE;
 710     }
 711
 712   /* Take care of constants that don't fit in single instruction */
 713   if ((reload_in_progress || reload_completed)
 714       && CONSTANT_P (operands[1])
 715       && GET_CODE (operands[1]) != HIGH
 716       && GET_CODE (operands[1]) != LO_SUM
 717       && ! SMALL_INT_UNSIGNED (operands[1]))
 718     {
 719       rtx tem = ((reload_in_progress | reload_completed)
 720                  ? operands[0] : gen_reg_rtx (SImode));
 721
 722       emit_insn (gen_rtx_SET (VOIDmode, tem,
 723                               gen_rtx_HIGH (SImode, operands[1])));
 724       operands[1] = gen_rtx_LO_SUM (SImode, tem, operands[1]);
 725     }
 726 }")
 727
 728 ;; The difference between these two is whether or not ints are allowed
 729 ;; in FP registers (off by default, use -mdebugh to enable).
 730
 731 (define_insn "movsi_internal2"
 732   [(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,d,d,d,R,m,*d,*z,*x,*d,*x,*d")
 733         (match_operand:SI 1 "move_operand" "d,S,IKL,Mnis,R,m,dJ,dJ,*z,*d,J,*x,*d,*a"))]
 734   "(register_operand (operands[0], SImode)
 735        || register_operand (operands[1], SImode)
 736        || (GET_CODE (operands[1]) == CONST_INT && INTVAL (operands[1]) == 0))"
 737   "* return iq2000_move_1word (operands, insn, FALSE);"
 738   [(set_attr "type"     "move,load,arith,arith,load,load,store,store,xfer,xfer,move,move,move,move")
 739    (set_attr "mode"     "SI")
 740    (set_attr "length"   "4,8,4,8,4,8,4,8,4,4,4,4,4,4")])
 741
 742 ;; 16-bit Integer moves
 743
 744 ;; Unlike most other insns, the move insns can't be split with
 745 ;; different predicates, because register spilling and other parts of
 746 ;; the compiler, have memoized the insn number already.
 747 ;; Unsigned loads are used because BYTE_LOADS_ZERO_EXTEND is defined
 748
 749 (define_expand "movhi"
 750   [(set (match_operand:HI 0 "nonimmediate_operand" "")
 751         (match_operand:HI 1 "general_operand" ""))]
 752   ""
 753   "
 754 {
 755   if ((reload_in_progress | reload_completed) == 0
 756       && !register_operand (operands[0], HImode)
 757       && !register_operand (operands[1], HImode)
 758       && ((GET_CODE (operands[1]) != CONST_INT
 759           || INTVAL (operands[1]) != 0)))
 760     {
 761       rtx temp = force_reg (HImode, operands[1]);
 762       emit_move_insn (operands[0], temp);
 763       DONE;
 764     }
 765 }")
 766
 767 ;; The difference between these two is whether or not ints are allowed
 768 ;; in FP registers (off by default, use -mdebugh to enable).
 769
 770 (define_insn "movhi_internal2"
 771   [(set (match_operand:HI 0 "nonimmediate_operand" "=d,d,d,d,R,m,*d,*z,*x,*d")
 772         (match_operand:HI 1 "general_operand"       "d,IK,R,m,dJ,dJ,*z,*d,*d,*x"))]
 773   "(register_operand (operands[0], HImode)
 774        || register_operand (operands[1], HImode)
 775        || (GET_CODE (operands[1]) == CONST_INT && INTVAL (operands[1]) == 0))"
 776   "* return iq2000_move_1word (operands, insn, TRUE);"
 777   [(set_attr "type"     "move,arith,load,load,store,store,xfer,xfer,move,move")
 778    (set_attr "mode"     "HI")
 779    (set_attr "length"   "4,4,4,8,4,8,4,4,4,4")])
 780
 781 ;; 8-bit Integer moves
 782
 783 ;; Unlike most other insns, the move insns can't be split with
 784 ;; different predicates, because register spilling and other parts of
 785 ;; the compiler, have memoized the insn number already.
 786 ;; Unsigned loads are used because BYTE_LOADS_ZERO_EXTEND is defined
 787
 788 (define_expand "movqi"
 789   [(set (match_operand:QI 0 "nonimmediate_operand" "")
 790         (match_operand:QI 1 "general_operand" ""))]
 791   ""
 792   "
 793 {
 794   if ((reload_in_progress | reload_completed) == 0
 795       && !register_operand (operands[0], QImode)
 796       && !register_operand (operands[1], QImode)
 797       && (GET_CODE (operands[1]) != CONST_INT
 798           || INTVAL (operands[1]) != 0))
 799     {
 800       rtx temp = force_reg (QImode, operands[1]);
 801       emit_move_insn (operands[0], temp);
 802       DONE;
 803     }
 804 }")
 805
 806 ;; The difference between these two is whether or not ints are allowed
 807 ;; in FP registers (off by default, use -mdebugh to enable).
 808
 809 (define_insn "movqi_internal2"
 810   [(set (match_operand:QI 0 "nonimmediate_operand" "=d,d,d,d,R,m,*d,*z,*x,*d")
 811         (match_operand:QI 1 "general_operand"       "d,IK,R,m,dJ,dJ,*z,*d,*d,*x"))]
 812   "(register_operand (operands[0], QImode)
 813        || register_operand (operands[1], QImode)
 814        || (GET_CODE (operands[1]) == CONST_INT && INTVAL (operands[1]) == 0))"
 815   "* return iq2000_move_1word (operands, insn, TRUE);"
 816   [(set_attr "type"     "move,arith,load,load,store,store,xfer,xfer,move,move")
 817    (set_attr "mode"     "QI")
 818    (set_attr "length"   "4,4,4,8,4,8,4,4,4,4")])
 819
 820 ;; 32-bit floating point moves
 821
 822 (define_expand "movsf"
 823   [(set (match_operand:SF 0 "general_operand" "")
 824         (match_operand:SF 1 "general_operand" ""))]
 825   ""
 826   "
 827 {
 828   if (!reload_in_progress
 829       && !reload_completed
 830       && GET_CODE (operands[0]) == MEM
 831       && (GET_CODE (operands[1]) == MEM
 832          || GET_CODE (operands[1]) == CONST_DOUBLE))
 833     operands[1] = copy_to_mode_reg (SFmode, operands[1]);
 834
 835   /* Take care of reg <- SF constant */
 836   if ( const_double_operand (operands[1], GET_MODE (operands[1]) ) )
 837     {
 838       emit_insn (gen_movsf_high (operands[0], operands[1]));
 839       emit_insn (gen_movsf_lo_sum (operands[0], operands[0], operands[1]));
 840       DONE;
 841     }
 842 }")
 843
 844 (define_insn "movsf_lo_sum"
 845   [(set (match_operand:SF 0 "register_operand" "=r")
 846         (lo_sum:SF (match_operand:SF 1 "register_operand" "r")
 847                    (match_operand:SF 2 "const_double_operand" "")))]
 848   ""
 849   "*
 850 {
 851   REAL_VALUE_TYPE r;
 852   long i;
 853
 854   REAL_VALUE_FROM_CONST_DOUBLE (r, operands[2]);
 855   REAL_VALUE_TO_TARGET_SINGLE (r, i);
 856   operands[2] = GEN_INT (i);
 857   return \"addiu\\t%0,%1,%%lo(%2) # low\";
 858 }"
 859   [(set_attr "length" "4")
 860    (set_attr "type" "arith")])
 861
 862 (define_insn "movsf_high"
 863   [(set (match_operand:SF 0 "register_operand" "=r")
 864         (high:SF (match_operand:SF 1 "const_double_operand" "")))]
 865   ""
 866   "*
 867 {
 868   REAL_VALUE_TYPE r;
 869   long i;
 870
 871   REAL_VALUE_FROM_CONST_DOUBLE (r, operands[1]);
 872   REAL_VALUE_TO_TARGET_SINGLE (r, i);
 873   operands[1] = GEN_INT (i);
 874   return \"lui\\t%0,%%hi(%1) # high\";
 875 }"
 876   [(set_attr "length" "4")
 877    (set_attr "type" "arith")])
 878
 879 (define_insn "*movsf_internal"
 880   [(set (match_operand:SF 0 "nonimmediate_operand" "=r,r,m")
 881         (match_operand:SF 1 "nonimmediate_operand" "r,m,r"))]
 882   "!memory_operand (operands[0], SFmode) || !memory_operand (operands[1], SFmode)"
 883   "*
 884 {
 885   iq2000_fill_delay_slot (\"\", DELAY_LOAD, operands, insn);
 886   if (which_alternative == 0)
 887     return \"or\\t%0,%1,%1\";
 888   else if (which_alternative == 1)
 889     return \"lw\\t%0,%1\";
 890   else if (which_alternative == 2)
 891     return \"sw\\t%1,%0\";
 892 }"
 893   [(set_attr "length" "4,4,4")
 894    (set_attr "type" "arith,load,store")]
 895 )
 896 \f
 897 ;;
 898 ;;  ....................
 899 ;;
 900 ;;      SHIFTS
 901 ;;
 902 ;;  ....................
 903
 904 (define_expand "ashlsi3"
 905   [(set (match_operand:SI 0 "register_operand" "=d")
 906         (ashift:SI (match_operand:SI 1 "register_operand" "d")
 907                    (match_operand:SI 2 "arith_operand" "dI")))]
 908   ""
 909   "")
 910
 911 (define_insn "ashlsi3_internal1"
 912   [(set (match_operand:SI 0 "register_operand" "=d")
 913         (ashift:SI (match_operand:SI 1 "register_operand" "d")
 914                    (match_operand:SI 2 "arith_operand" "dI")))]
 915   ""
 916   "*
 917 {
 918   if (GET_CODE (operands[2]) == CONST_INT)
 919     {
 920       operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);
 921       return \"sll\\t%0,%1,%2\";
 922     }
 923   else
 924     return \"sllv\\t%0,%1,%2\";
 925 }"
 926   [(set_attr "type"     "arith")
 927    (set_attr "mode"     "SI")])
 928
 929 (define_expand "ashrsi3"
 930   [(set (match_operand:SI 0 "register_operand" "=d")
 931         (ashiftrt:SI (match_operand:SI 1 "register_operand" "d")
 932                      (match_operand:SI 2 "arith_operand" "dI")))]
 933   ""
 934   "")
 935
 936 (define_insn "ashrsi3_internal1"
 937   [(set (match_operand:SI 0 "register_operand" "=d")
 938         (ashiftrt:SI (match_operand:SI 1 "register_operand" "d")
 939                      (match_operand:SI 2 "arith_operand" "dI")))]
 940   ""
 941   "*
 942 {
 943   if (GET_CODE (operands[2]) == CONST_INT)
 944     {
 945       operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);
 946       return \"sra\\t%0,%1,%2\";
 947     }
 948   else
 949     return \"srav\\t%0,%1,%2\";
 950 }"
 951   [(set_attr "type"     "arith")
 952    (set_attr "mode"     "SI")])
 953
 954 (define_expand "lshrsi3"
 955   [(set (match_operand:SI 0 "register_operand" "=d")
 956         (lshiftrt:SI (match_operand:SI 1 "register_operand" "d")
 957                      (match_operand:SI 2 "arith_operand" "dI")))]
 958   ""
 959   "")
 960
 961 (define_insn "lshrsi3_internal1"
 962   [(set (match_operand:SI 0 "register_operand" "=d")
 963         (lshiftrt:SI (match_operand:SI 1 "register_operand" "d")
 964                      (match_operand:SI 2 "arith_operand" "dI")))]
 965   ""
 966   "*
 967 {
 968   if (GET_CODE (operands[2]) == CONST_INT)
 969     {
 970       operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);
 971       return \"srl\\t%0,%1,%2\";
 972     }
 973   else
 974     return \"srlv\\t%0,%1,%2\";
 975 }"
 976   [(set_attr "type"     "arith")
 977    (set_attr "mode"     "SI")])
 978
 979 ;; Rotate Right
 980 (define_insn "rotrsi3"
 981   [(set (match_operand:SI 0 "register_operand" "=r")
 982         (rotatert:SI (match_operand:SI 1 "register_operand" "r")
 983                      (match_operand:SI 2 "uns_arith_operand" "O")))]
 984   ""
 985   "ram %0,%1,%2,0x0,0x0"
 986   [(set_attr "type" "arith")])
 987
 988 \f
 989 ;;
 990 ;;  ....................
 991 ;;
 992 ;;      COMPARISONS
 993 ;;
 994 ;;  ....................
 995
 996 ;; Flow here is rather complex:
 997 ;;
 998 ;;  1)  The cmp{si,di,sf,df} routine is called.  It deposits the
 999 ;;      arguments into the branch_cmp array, and the type into
1000 ;;      branch_type.  No RTL is generated.
1001 ;;
1002 ;;  2)  The appropriate branch define_expand is called, which then
1003 ;;      creates the appropriate RTL for the comparison and branch.
1004 ;;      Different CC modes are used, based on what type of branch is
1005 ;;      done, so that we can constrain things appropriately.  There
1006 ;;      are assumptions in the rest of GCC that break if we fold the
1007 ;;      operands into the branches for integer operations, and use cc0
1008 ;;      for floating point, so we use the fp status register instead.
1009 ;;      If needed, an appropriate temporary is created to hold the
1010 ;;      of the integer compare.
1011
1012 (define_expand "cmpsi"
1013   [(set (cc0)
1014         (compare:CC (match_operand:SI 0 "register_operand" "")
1015                     (match_operand:SI 1 "arith_operand" "")))]
1016   ""
1017   "
1018 {
1019   if (operands[0])              /* avoid unused code message */
1020     {
1021       branch_cmp[0] = operands[0];
1022       branch_cmp[1] = operands[1];
1023       branch_type = CMP_SI;
1024       DONE;
1025     }
1026 }")
1027
1028 (define_expand "tstsi"
1029   [(set (cc0)
1030         (match_operand:SI 0 "register_operand" ""))]
1031   ""
1032   "
1033 {
1034   if (operands[0])              /* avoid unused code message */
1035     {
1036       branch_cmp[0] = operands[0];
1037       branch_cmp[1] = const0_rtx;
1038       branch_type = CMP_SI;
1039       DONE;
1040     }
1041 }")
1042 \f
1043 ;;
1044 ;;  ....................
1045 ;;
1046 ;;      CONDITIONAL BRANCHES
1047 ;;
1048 ;;  ....................
1049
1050 ;; Conditional branches on comparisons with zero.
1051
1052 (define_insn "branch_zero"
1053   [(set (pc)
1054         (if_then_else
1055          (match_operator:SI 0 "cmp_op"
1056                             [(match_operand:SI 2 "register_operand" "d")
1057                              (const_int 0)])
1058         (label_ref (match_operand 1 "" ""))
1059         (pc)))]
1060   ""
1061   "*
1062 {
1063   return iq2000_output_conditional_branch (insn,
1064                                          operands,
1065                                          /*two_operands_p=*/0,
1066                                          /*float_p=*/0,
1067                                          /*inverted_p=*/0,
1068                                          get_attr_length (insn));
1069 }"
1070   [(set_attr "type"     "branch")
1071    (set_attr "mode"     "none")])
1072
1073 (define_insn "branch_zero_inverted"
1074   [(set (pc)
1075         (if_then_else
1076          (match_operator:SI 0 "cmp_op"
1077                             [(match_operand:SI 2 "register_operand" "d")
1078                              (const_int 0)])
1079         (pc)
1080         (label_ref (match_operand 1 "" ""))))]
1081   ""
1082   "*
1083 {
1084   return iq2000_output_conditional_branch (insn,
1085                                          operands,
1086                                          /*two_operands_p=*/0,
1087                                          /*float_p=*/0,
1088                                          /*inverted_p=*/1,
1089                                          get_attr_length (insn));
1090 }"
1091   [(set_attr "type"     "branch")
1092    (set_attr "mode"     "none")])
1093
1094 ;; Conditional branch on equality comparison.
1095
1096 (define_insn "branch_equality"
1097   [(set (pc)
1098         (if_then_else
1099          (match_operator:SI 0 "equality_op"
1100                             [(match_operand:SI 2 "register_operand" "d")
1101                              (match_operand:SI 3 "register_operand" "d")])
1102          (label_ref (match_operand 1 "" ""))
1103          (pc)))]
1104   ""
1105   "*
1106 {
1107   return iq2000_output_conditional_branch (insn,
1108                                          operands,
1109                                          /*two_operands_p=*/1,
1110                                          /*float_p=*/0,
1111                                          /*inverted_p=*/0,
1112                                          get_attr_length (insn));
1113 }"
1114   [(set_attr "type"     "branch")
1115    (set_attr "mode"     "none")])
1116
1117 (define_insn "branch_equality_inverted"
1118   [(set (pc)
1119         (if_then_else
1120          (match_operator:SI 0 "equality_op"
1121                             [(match_operand:SI 2 "register_operand" "d")
1122                              (match_operand:SI 3 "register_operand" "d")])
1123          (pc)
1124          (label_ref (match_operand 1 "" ""))))]
1125   ""
1126   "*
1127 {
1128   return iq2000_output_conditional_branch (insn,
1129                                          operands,
1130                                          /*two_operands_p=*/1,
1131                                          /*float_p=*/0,
1132                                          /*inverted_p=*/1,
1133                                          get_attr_length (insn));
1134 }"
1135   [(set_attr "type"     "branch")
1136    (set_attr "mode"     "none")])
1137
1138 (define_expand "beq"
1139   [(set (pc)
1140         (if_then_else (eq:CC (cc0)
1141                              (const_int 0))
1142                       (label_ref (match_operand 0 "" ""))
1143                       (pc)))]
1144   ""
1145   "
1146 {
1147   if (operands[0])              /* avoid unused code warning */
1148     {
1149       gen_conditional_branch (operands, EQ);
1150       DONE;
1151     }
1152 }")
1153
1154 (define_expand "bne"
1155   [(set (pc)
1156         (if_then_else (ne:CC (cc0)
1157                              (const_int 0))
1158                       (label_ref (match_operand 0 "" ""))
1159                       (pc)))]
1160   ""
1161   "
1162 {
1163   if (operands[0])              /* avoid unused code warning */
1164     {
1165       gen_conditional_branch (operands, NE);
1166       DONE;
1167     }
1168 }")
1169
1170 (define_expand "bgt"
1171   [(set (pc)
1172         (if_then_else (gt:CC (cc0)
1173                              (const_int 0))
1174                       (label_ref (match_operand 0 "" ""))
1175                       (pc)))]
1176   ""
1177   "
1178 {
1179   if (operands[0])              /* avoid unused code warning */
1180     {
1181       gen_conditional_branch (operands, GT);
1182       DONE;
1183     }
1184 }")
1185
1186 (define_expand "bge"
1187   [(set (pc)
1188         (if_then_else (ge:CC (cc0)
1189                              (const_int 0))
1190                       (label_ref (match_operand 0 "" ""))
1191                       (pc)))]
1192   ""
1193   "
1194 {
1195   if (operands[0])              /* avoid unused code warning */
1196     {
1197       gen_conditional_branch (operands, GE);
1198       DONE;
1199     }
1200 }")
1201
1202 (define_expand "blt"
1203   [(set (pc)
1204         (if_then_else (lt:CC (cc0)
1205                              (const_int 0))
1206                       (label_ref (match_operand 0 "" ""))
1207                       (pc)))]
1208   ""
1209   "
1210 {
1211   if (operands[0])              /* avoid unused code warning */
1212     {
1213       gen_conditional_branch (operands, LT);
1214       DONE;
1215     }
1216 }")
1217
1218 (define_expand "ble"
1219   [(set (pc)
1220         (if_then_else (le:CC (cc0)
1221                              (const_int 0))
1222                       (label_ref (match_operand 0 "" ""))
1223                       (pc)))]
1224   ""
1225   "
1226 {
1227   if (operands[0])              /* avoid unused code warning */
1228     {
1229       gen_conditional_branch (operands, LE);
1230       DONE;
1231     }
1232 }")
1233
1234 (define_expand "bgtu"
1235   [(set (pc)
1236         (if_then_else (gtu:CC (cc0)
1237                               (const_int 0))
1238                       (label_ref (match_operand 0 "" ""))
1239                       (pc)))]
1240   ""
1241   "
1242 {
1243   if (operands[0])              /* avoid unused code warning */
1244     {
1245       gen_conditional_branch (operands, GTU);
1246       DONE;
1247     }
1248 }")
1249
1250 (define_expand "bgeu"
1251   [(set (pc)
1252         (if_then_else (geu:CC (cc0)
1253                               (const_int 0))
1254                       (label_ref (match_operand 0 "" ""))
1255                       (pc)))]
1256   ""
1257   "
1258 {
1259   if (operands[0])              /* avoid unused code warning */
1260     {
1261       gen_conditional_branch (operands, GEU);
1262       DONE;
1263     }
1264 }")
1265
1266
1267 (define_expand "bltu"
1268   [(set (pc)
1269         (if_then_else (ltu:CC (cc0)
1270                               (const_int 0))
1271                       (label_ref (match_operand 0 "" ""))
1272                       (pc)))]
1273   ""
1274   "
1275 {
1276   if (operands[0])              /* avoid unused code warning */
1277     {
1278       gen_conditional_branch (operands, LTU);
1279       DONE;
1280     }
1281 }")
1282
1283 (define_expand "bleu"
1284   [(set (pc)
1285         (if_then_else (leu:CC (cc0)
1286                               (const_int 0))
1287                       (label_ref (match_operand 0 "" ""))
1288                       (pc)))]
1289   ""
1290   "
1291 {
1292   if (operands[0])              /* avoid unused code warning */
1293     {
1294       gen_conditional_branch (operands, LEU);
1295       DONE;
1296     }
1297 }")
1298
1299 ;; Recognize bbi and bbin instructions.  These use two unusual template
1300 ;; patterns, %Ax and %Px.  %Ax outputs an 'i' if operand `x' is a LABEL_REF
1301 ;; otherwise it outputs an 'in'.  %Px does nothing if `x' is PC
1302 ;; and outputs the operand if `x' is a LABEL_REF.
1303
1304 (define_insn ""
1305   [(set (pc)
1306         (if_then_else
1307          (ne (sign_extract:SI (match_operand:SI 0 "register_operand" "r")
1308                               (const_int 1)
1309                               (match_operand:SI 1 "arith_operand" "I"))
1310              (const_int 0))
1311          (match_operand 2 "pc_or_label_operand" "")
1312          (match_operand 3 "pc_or_label_operand" "")))]
1313   ""
1314   "bb%A2\\t%0(31-%1),%P2%P3"
1315   [(set_attr "length" "4")
1316    (set_attr "type" "branch")])
1317
1318 (define_insn ""
1319   [(set (pc)
1320         (if_then_else
1321          (eq (sign_extract:SI (match_operand:SI 0 "register_operand" "r")
1322                               (const_int 1)
1323                               (match_operand:SI 1 "arith_operand" "I"))
1324              (const_int 0))
1325          (match_operand 2 "pc_or_label_operand" "")
1326          (match_operand 3 "pc_or_label_operand" "")))]
1327   ""
1328   "bb%A3\\t%0(31-%1),%P2%P3"
1329   [(set_attr "length" "4")
1330    (set_attr "type" "branch")])
1331
1332 (define_insn ""
1333   [(set (pc)
1334         (if_then_else
1335          (ne (zero_extract:SI (match_operand:SI 0 "register_operand" "r")
1336                               (const_int 1)
1337                               (match_operand:SI 1 "arith_operand" "I"))
1338              (const_int 0))
1339          (match_operand 2 "pc_or_label_operand" "")
1340          (match_operand 3 "pc_or_label_operand" "")))]
1341   ""
1342   "bb%A2\\t%0(31-%1),%P2%P3"
1343   [(set_attr "length" "4")
1344    (set_attr "type" "branch")])
1345
1346 (define_insn ""
1347   [(set (pc)
1348         (if_then_else
1349          (eq (zero_extract:SI (match_operand:SI 0 "register_operand" "r")
1350                               (const_int 1)
1351                               (match_operand:SI 1 "arith_operand" "I"))
1352              (const_int 0))
1353          (match_operand 2 "pc_or_label_operand" "")
1354          (match_operand 3 "pc_or_label_operand" "")))]
1355   ""
1356   "bb%A3\\t%0(31-%1),%P2%P3"
1357   [(set_attr "length" "4")
1358    (set_attr "type" "branch")])
1359
1360 (define_insn ""
1361   [(set (pc)
1362         (if_then_else
1363          (eq (and:SI (match_operand:SI 0 "register_operand" "r")
1364                      (match_operand:SI 1 "power_of_2_operand" "I"))
1365               (const_int 0))
1366          (match_operand 2 "pc_or_label_operand" "")
1367          (match_operand 3 "pc_or_label_operand" "")))]
1368   ""
1369   "bb%A3\\t%0(%p1),%P2%P3"
1370   [(set_attr "length" "4")
1371    (set_attr "type" "branch")])
1372
1373 (define_insn ""
1374   [(set (pc)
1375         (if_then_else
1376          (ne (and:SI (match_operand:SI 0 "register_operand" "r")
1377                      (match_operand:SI 1 "power_of_2_operand" "I"))
1378              (const_int 0))
1379          (match_operand 2 "pc_or_label_operand" "")
1380          (match_operand 3 "pc_or_label_operand" "")))]
1381   ""
1382   "bb%A2\\t%0(%p1),%P2%P3"
1383   [(set_attr "length" "4")
1384    (set_attr "type" "branch")])
1385 \f
1386 ;;
1387 ;;  ....................
1388 ;;
1389 ;;      SETTING A REGISTER FROM A COMPARISON
1390 ;;
1391 ;;  ....................
1392
1393 (define_expand "seq"
1394   [(set (match_operand:SI 0 "register_operand" "=d")
1395         (eq:SI (match_dup 1)
1396                (match_dup 2)))]
1397   ""
1398   "
1399 {
1400   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1401     FAIL;
1402
1403   /* Set up operands from compare.  */
1404   operands[1] = branch_cmp[0];
1405   operands[2] = branch_cmp[1];
1406
1407   gen_int_relational (EQ, operands[0], operands[1], operands[2], (int *)0);
1408   DONE;
1409 }")
1410
1411
1412 (define_insn "seq_si_zero"
1413   [(set (match_operand:SI 0 "register_operand" "=d")
1414         (eq:SI (match_operand:SI 1 "register_operand" "d")
1415                (const_int 0)))]
1416   ""
1417   "sltiu\\t%0,%1,1"
1418   [(set_attr "type"     "arith")
1419    (set_attr "mode"     "SI")])
1420
1421 (define_expand "sne"
1422   [(set (match_operand:SI 0 "register_operand" "=d")
1423         (ne:SI (match_dup 1)
1424                (match_dup 2)))]
1425   ""
1426   "
1427 {
1428   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1429     FAIL;
1430
1431   /* Set up operands from compare.  */
1432   operands[1] = branch_cmp[0];
1433   operands[2] = branch_cmp[1];
1434
1435   gen_int_relational (NE, operands[0], operands[1], operands[2], (int *)0);
1436   DONE;
1437 }")
1438
1439 (define_insn "sne_si_zero"
1440   [(set (match_operand:SI 0 "register_operand" "=d")
1441         (ne:SI (match_operand:SI 1 "register_operand" "d")
1442                (const_int 0)))]
1443   ""
1444   "sltu\\t%0,%.,%1"
1445   [(set_attr "type"     "arith")
1446    (set_attr "mode"     "SI")])
1447
1448 (define_expand "sgt"
1449   [(set (match_operand:SI 0 "register_operand" "=d")
1450         (gt:SI (match_dup 1)
1451                (match_dup 2)))]
1452   ""
1453   "
1454 {
1455   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1456     FAIL;
1457
1458   /* Set up operands from compare.  */
1459   operands[1] = branch_cmp[0];
1460   operands[2] = branch_cmp[1];
1461
1462   gen_int_relational (GT, operands[0], operands[1], operands[2], (int *)0);
1463   DONE;
1464 }")
1465
1466 (define_insn "sgt_si"
1467   [(set (match_operand:SI 0 "register_operand" "=d,=d")
1468         (gt:SI (match_operand:SI 1 "register_operand" "d,d")
1469                (match_operand:SI 2 "reg_or_0_operand" "d,J")))]
1470   ""
1471   "@
1472    slt\\t%0,%z2,%1
1473    slt\\t%0,%z2,%1"
1474   [(set_attr "type"     "arith,arith")
1475    (set_attr "mode"     "SI,SI")])
1476
1477 (define_expand "sge"
1478   [(set (match_operand:SI 0 "register_operand" "=d")
1479         (ge:SI (match_dup 1)
1480                (match_dup 2)))]
1481   ""
1482   "
1483 {
1484   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1485     FAIL;
1486
1487   /* Set up operands from compare.  */
1488   operands[1] = branch_cmp[0];
1489   operands[2] = branch_cmp[1];
1490
1491   gen_int_relational (GE, operands[0], operands[1], operands[2], (int *)0);
1492   DONE;
1493 }")
1494
1495 (define_expand "slt"
1496   [(set (match_operand:SI 0 "register_operand" "=d")
1497         (lt:SI (match_dup 1)
1498                (match_dup 2)))]
1499   ""
1500   "
1501 {
1502   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1503     FAIL;
1504
1505   /* Set up operands from compare.  */
1506   operands[1] = branch_cmp[0];
1507   operands[2] = branch_cmp[1];
1508
1509   gen_int_relational (LT, operands[0], operands[1], operands[2], (int *)0);
1510   DONE;
1511 }")
1512
1513 (define_insn "slt_si"
1514   [(set (match_operand:SI 0 "register_operand" "=d,=d")
1515         (lt:SI (match_operand:SI 1 "register_operand" "d,d")
1516                (match_operand:SI 2 "arith_operand" "d,I")))]
1517   ""
1518   "@
1519    slt\\t%0,%1,%2
1520    slti\\t%0,%1,%2"
1521   [(set_attr "type"     "arith,arith")
1522    (set_attr "mode"     "SI,SI")])
1523
1524 (define_expand "sle"
1525   [(set (match_operand:SI 0 "register_operand" "=d")
1526         (le:SI (match_dup 1)
1527                (match_dup 2)))]
1528   ""
1529   "
1530 {
1531   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1532     FAIL;
1533
1534   /* Set up operands from compare.  */
1535   operands[1] = branch_cmp[0];
1536   operands[2] = branch_cmp[1];
1537
1538   gen_int_relational (LE, operands[0], operands[1], operands[2], (int *)0);
1539   DONE;
1540 }")
1541
1542 (define_insn "sle_si_const"
1543   [(set (match_operand:SI 0 "register_operand" "=d")
1544         (le:SI (match_operand:SI 1 "register_operand" "d")
1545                (match_operand:SI 2 "small_int" "I")))]
1546   "INTVAL (operands[2]) < 32767"
1547   "*
1548 {
1549   operands[2] = GEN_INT (INTVAL (operands[2])+1);
1550   return \"slti\\t%0,%1,%2\";
1551 }"
1552   [(set_attr "type"     "arith")
1553    (set_attr "mode"     "SI")])
1554
1555 (define_expand "sgtu"
1556   [(set (match_operand:SI 0 "register_operand" "=d")
1557         (gtu:SI (match_dup 1)
1558                 (match_dup 2)))]
1559   ""
1560   "
1561 {
1562   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1563     FAIL;
1564
1565   /* Set up operands from compare.  */
1566   operands[1] = branch_cmp[0];
1567   operands[2] = branch_cmp[1];
1568
1569   gen_int_relational (GTU, operands[0], operands[1], operands[2], (int *)0);
1570   DONE;
1571 }")
1572
1573 (define_insn "sgtu_si"
1574   [(set (match_operand:SI 0 "register_operand" "=d")
1575         (gtu:SI (match_operand:SI 1 "register_operand" "d")
1576                 (match_operand:SI 2 "reg_or_0_operand" "dJ")))]
1577   ""
1578   "sltu\\t%0,%z2,%1"
1579   [(set_attr "type"     "arith")
1580    (set_attr "mode"     "SI")])
1581
1582 (define_insn ""
1583   [(set (match_operand:SI 0 "register_operand" "=t")
1584         (gtu:SI (match_operand:SI 1 "register_operand" "d")
1585                 (match_operand:SI 2 "register_operand" "d")))]
1586   ""
1587   "sltu\\t%2,%1"
1588   [(set_attr "type"     "arith")
1589    (set_attr "mode"     "SI")])
1590
1591 (define_expand "sgeu"
1592   [(set (match_operand:SI 0 "register_operand" "=d")
1593         (geu:SI (match_dup 1)
1594                 (match_dup 2)))]
1595   ""
1596   "
1597 {
1598   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1599     FAIL;
1600
1601   /* Set up operands from compare.  */
1602   operands[1] = branch_cmp[0];
1603   operands[2] = branch_cmp[1];
1604
1605   gen_int_relational (GEU, operands[0], operands[1], operands[2], (int *)0);
1606   DONE;
1607 }")
1608
1609 (define_expand "sltu"
1610   [(set (match_operand:SI 0 "register_operand" "=d")
1611         (ltu:SI (match_dup 1)
1612                 (match_dup 2)))]
1613   ""
1614   "
1615 {
1616   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1617     FAIL;
1618
1619   /* Set up operands from compare.  */
1620   operands[1] = branch_cmp[0];
1621   operands[2] = branch_cmp[1];
1622
1623   gen_int_relational (LTU, operands[0], operands[1], operands[2], (int *)0);
1624   DONE;
1625 }")
1626
1627 (define_insn "sltu_si"
1628   [(set (match_operand:SI 0 "register_operand" "=d,=d")
1629         (ltu:SI (match_operand:SI 1 "register_operand" "d,d")
1630                 (match_operand:SI 2 "arith_operand" "d,I")))]
1631   ""
1632   "@
1633    sltu\\t%0,%1,%2
1634    sltiu\\t%0,%1,%2"
1635   [(set_attr "type"     "arith,arith")
1636    (set_attr "mode"     "SI,SI")])
1637
1638 (define_expand "sleu"
1639   [(set (match_operand:SI 0 "register_operand" "=d")
1640         (leu:SI (match_dup 1)
1641                 (match_dup 2)))]
1642   ""
1643   "
1644 {
1645   if (branch_type != CMP_SI && (branch_type != CMP_DI))
1646     FAIL;
1647
1648   /* Set up operands from compare.  */
1649   operands[1] = branch_cmp[0];
1650   operands[2] = branch_cmp[1];
1651
1652   gen_int_relational (LEU, operands[0], operands[1], operands[2], (int *)0);
1653   DONE;
1654 }")
1655
1656 (define_insn "sleu_si_const"
1657   [(set (match_operand:SI 0 "register_operand" "=d")
1658         (leu:SI (match_operand:SI 1 "register_operand" "d")
1659                 (match_operand:SI 2 "small_int" "I")))]
1660   "INTVAL (operands[2]) < 32767"
1661   "*
1662 {
1663   operands[2] = GEN_INT (INTVAL (operands[2]) + 1);
1664   return \"sltiu\\t%0,%1,%2\";
1665 }"
1666   [(set_attr "type"     "arith")
1667    (set_attr "mode"     "SI")])
1668
1669 \f
1670 ;;
1671 ;;  ....................
1672 ;;
1673 ;;      UNCONDITIONAL BRANCHES
1674 ;;
1675 ;;  ....................
1676
1677 ;; Unconditional branches.
1678
1679 (define_insn "jump"
1680   [(set (pc)
1681         (label_ref (match_operand 0 "" "")))]
1682   ""
1683   "*
1684 {
1685   if (GET_CODE (operands[0]) == REG)
1686     return \"j\\t%0\";
1687   return \"j\\t%l0\";
1688   /* return \"b\\t%l0\";*/
1689 }"
1690   [(set_attr "type"     "jump")
1691    (set_attr "mode"     "none")])
1692
1693 (define_expand "indirect_jump"
1694   [(set (pc) (match_operand 0 "register_operand" "d"))]
1695   ""
1696   "
1697 {
1698   rtx dest;
1699
1700   if (operands[0])              /* eliminate unused code warnings */
1701     {
1702       dest = operands[0];
1703       if (GET_CODE (dest) != REG || GET_MODE (dest) != Pmode)
1704         operands[0] = copy_to_mode_reg (Pmode, dest);
1705
1706       if (!(Pmode == DImode))
1707         emit_jump_insn (gen_indirect_jump_internal1 (operands[0]));
1708       else
1709         emit_jump_insn (gen_indirect_jump_internal2 (operands[0]));
1710
1711       DONE;
1712     }
1713 }")
1714
1715 (define_insn "indirect_jump_internal1"
1716   [(set (pc) (match_operand:SI 0 "register_operand" "d"))]
1717   "!(Pmode == DImode)"
1718   "j\\t%0"
1719   [(set_attr "type"     "jump")
1720    (set_attr "mode"     "none")])
1721
1722 (define_expand "tablejump"
1723   [(set (pc)
1724         (match_operand 0 "register_operand" "d"))
1725    (use (label_ref (match_operand 1 "" "")))]
1726   ""
1727   "
1728 {
1729   if (operands[0])              /* eliminate unused code warnings */
1730     {
1731       gcc_assert (GET_MODE (operands[0]) == Pmode);
1732
1733       if (!(Pmode == DImode))
1734         emit_jump_insn (gen_tablejump_internal1 (operands[0], operands[1]));
1735       else
1736         emit_jump_insn (gen_tablejump_internal2 (operands[0], operands[1]));
1737
1738       DONE;
1739     }
1740 }")
1741
1742 (define_insn "tablejump_internal1"
1743   [(set (pc)
1744         (match_operand:SI 0 "register_operand" "d"))
1745    (use (label_ref (match_operand 1 "" "")))]
1746   "!(Pmode == DImode)"
1747   "j\\t%0"
1748   [(set_attr "type"     "jump")
1749    (set_attr "mode"     "none")])
1750
1751 (define_expand "tablejump_internal3"
1752   [(parallel [(set (pc)
1753                    (plus:SI (match_operand:SI 0 "register_operand" "d")
1754                             (label_ref:SI (match_operand 1 "" ""))))
1755               (use (label_ref:SI (match_dup 1)))])]
1756   ""
1757   "")
1758
1759 ;;; Make sure that this only matches the insn before ADDR_DIFF_VEC.  Otherwise
1760 ;;; it is not valid.  ??? With the USE, the condition tests may not be required
1761 ;;; any longer.
1762
1763 ;;; ??? The length depends on the ABI.  It is two for o32, and one for n32.
1764 ;;; We just use the conservative number here.
1765
1766 (define_insn ""
1767   [(set (pc)
1768         (plus:SI (match_operand:SI 0 "register_operand" "d")
1769                  (label_ref:SI (match_operand 1 "" ""))))
1770    (use (label_ref:SI (match_dup 1)))]
1771   "!(Pmode == DImode) && next_active_insn (insn) != 0
1772    && GET_CODE (PATTERN (next_active_insn (insn))) == ADDR_DIFF_VEC
1773    && PREV_INSN (next_active_insn (insn)) == operands[1]"
1774   "*
1775 {
1776   return \"j\\t%0\";
1777 }"
1778   [(set_attr "type"     "jump")
1779    (set_attr "mode"     "none")
1780    (set_attr "length"   "8")])
1781 \f
1782 ;;
1783 ;;  ....................
1784 ;;
1785 ;;      Function prologue/epilogue
1786 ;;
1787 ;;  ....................
1788 ;;
1789
1790 (define_expand "prologue"
1791   [(const_int 1)]
1792   ""
1793   "
1794 {
1795   if (iq2000_isa >= 0)          /* avoid unused code warnings */
1796     {
1797       iq2000_expand_prologue ();
1798       DONE;
1799     }
1800 }")
1801
1802 ;; Block any insns from being moved before this point, since the
1803 ;; profiling call to mcount can use various registers that aren't
1804 ;; saved or used to pass arguments.
1805
1806 (define_insn "blockage"
1807   [(unspec_volatile [(const_int 0)] 0)]
1808   ""
1809   ""
1810   [(set_attr "type"     "unknown")
1811    (set_attr "mode"     "none")
1812    (set_attr "length"   "0")])
1813
1814 (define_expand "epilogue"
1815   [(const_int 2)]
1816   ""
1817   "
1818 {
1819   if (iq2000_isa >= 0)            /* avoid unused code warnings */
1820     {
1821       iq2000_expand_epilogue ();
1822       DONE;
1823     }
1824 }")
1825
1826 ;; Trivial return.  Make it look like a normal return insn as that
1827 ;; allows jump optimizations to work better .
1828 (define_insn "return"
1829   [(return)]
1830   "iq2000_can_use_return_insn ()"
1831   "j\\t%%31"
1832   [(set_attr "type"     "jump")
1833    (set_attr "mode"     "none")])
1834
1835 ;; Normal return.
1836
1837 (define_insn "return_internal"
1838   [(use (match_operand 0 "pmode_register_operand" ""))
1839    (return)]
1840   ""
1841   "*
1842 {
1843   return \"j\\t%0\";
1844 }"
1845   [(set_attr "type"     "jump")
1846    (set_attr "mode"     "none")])
1847
1848 (define_insn "eh_return_internal"
1849   [(const_int 4)
1850    (return)
1851    (use (reg:SI 26))
1852    (use (reg:SI 31))]
1853   ""
1854   "j\\t%%26"
1855   [(set_attr "type"     "jump")
1856    (set_attr "mode"     "none")])
1857
1858 (define_expand "eh_return"
1859   [(use (match_operand:SI 0 "register_operand" "r"))]
1860   ""
1861   "
1862 {
1863   iq2000_expand_eh_return (operands[0]);
1864   DONE;
1865 }")
1866
1867 \f
1868 ;;
1869 ;;  ....................
1870 ;;
1871 ;;      FUNCTION CALLS
1872 ;;
1873 ;;  ....................
1874
1875 ;; calls.c now passes a third argument, make saber happy
1876
1877 (define_expand "call"
1878   [(parallel [(call (match_operand 0 "memory_operand" "m")
1879                     (match_operand 1 "" "i"))
1880               (clobber (reg:SI 31))
1881               (use (match_operand 2 "" ""))             ;; next_arg_reg
1882               (use (match_operand 3 "" ""))])]          ;; struct_value_size_rtx
1883   ""
1884   "
1885 {
1886   rtx addr;
1887
1888   if (operands[0])              /* eliminate unused code warnings */
1889     {
1890       addr = XEXP (operands[0], 0);
1891       if ((GET_CODE (addr) != REG && (!CONSTANT_ADDRESS_P (addr)))
1892           || ! call_insn_operand (addr, VOIDmode))
1893         XEXP (operands[0], 0) = copy_to_mode_reg (Pmode, addr);
1894
1895       /* In order to pass small structures by value in registers
1896          compatibly with the IQ2000 compiler, we need to shift the value
1897          into the high part of the register.  Function_arg has encoded
1898          a PARALLEL rtx, holding a vector of adjustments to be made
1899          as the next_arg_reg variable, so we split up the insns,
1900          and emit them separately.  */
1901
1902       if (operands[2] != (rtx)0 && GET_CODE (operands[2]) == PARALLEL)
1903         {
1904           rtvec adjust = XVEC (operands[2], 0);
1905           int num = GET_NUM_ELEM (adjust);
1906           int i;
1907
1908           for (i = 0; i < num; i++)
1909             emit_insn (RTVEC_ELT (adjust, i));
1910         }
1911
1912       emit_call_insn (gen_call_internal0 (operands[0], operands[1],
1913                                           gen_rtx_REG (SImode,
1914                                                        GP_REG_FIRST + 31)));
1915       DONE;
1916     }
1917 }")
1918
1919 (define_expand "call_internal0"
1920   [(parallel [(call (match_operand 0 "" "")
1921                     (match_operand 1 "" ""))
1922               (clobber (match_operand:SI 2 "" ""))])]
1923   ""
1924   "")
1925
1926 (define_insn "call_internal1"
1927   [(call (mem (match_operand 0 "call_insn_operand" "ri"))
1928          (match_operand 1 "" "i"))
1929    (clobber (match_operand:SI 2 "register_operand" "=d"))]
1930   ""
1931   "*
1932 {
1933   register rtx target = operands[0];
1934
1935   if (GET_CODE (target) == CONST_INT)
1936     return \"li\\t%@,%0\\n\\tjalr\\t%2,%@\";
1937   else if (CONSTANT_ADDRESS_P (target))
1938     return \"jal\\t%0\";
1939   else
1940     return \"jalr\\t%2,%0\";
1941 }"
1942   [(set_attr "type"     "call")
1943    (set_attr "mode"     "none")])
1944
1945 ;; calls.c now passes a fourth argument, make saber happy
1946
1947 (define_expand "call_value"
1948   [(parallel [(set (match_operand 0 "register_operand" "=df")
1949                    (call (match_operand 1 "memory_operand" "m")
1950                          (match_operand 2 "" "i")))
1951               (clobber (reg:SI 31))
1952               (use (match_operand 3 "" ""))])]          ;; next_arg_reg
1953   ""
1954   "
1955 {
1956   rtx addr;
1957
1958   if (operands[0])              /* eliminate unused code warning */
1959     {
1960       addr = XEXP (operands[1], 0);
1961       if ((GET_CODE (addr) != REG && (!CONSTANT_ADDRESS_P (addr)))
1962           || ! call_insn_operand (addr, VOIDmode))
1963         XEXP (operands[1], 0) = copy_to_mode_reg (Pmode, addr);
1964
1965       /* In order to pass small structures by value in registers
1966          compatibly with the IQ2000 compiler, we need to shift the value
1967          into the high part of the register.  Function_arg has encoded
1968          a PARALLEL rtx, holding a vector of adjustments to be made
1969          as the next_arg_reg variable, so we split up the insns,
1970          and emit them separately.  */
1971
1972       if (operands[3] != (rtx)0 && GET_CODE (operands[3]) == PARALLEL)
1973         {
1974           rtvec adjust = XVEC (operands[3], 0);
1975           int num = GET_NUM_ELEM (adjust);
1976           int i;
1977
1978           for (i = 0; i < num; i++)
1979             emit_insn (RTVEC_ELT (adjust, i));
1980         }
1981
1982       if (GET_CODE (operands[0]) == PARALLEL && XVECLEN (operands[0], 0) > 1)
1983         {
1984           emit_call_insn (gen_call_value_multiple_internal0
1985                           (XEXP (XVECEXP (operands[0], 0, 0), 0),
1986                            operands[1], operands[2],
1987                            XEXP (XVECEXP (operands[0], 0, 1), 0),
1988                            gen_rtx_REG (SImode, GP_REG_FIRST + 31)));
1989           DONE;
1990         }
1991
1992       /* We have a call returning a DImode structure in an FP reg.
1993          Strip off the now unnecessary PARALLEL.  */
1994       if (GET_CODE (operands[0]) == PARALLEL)
1995         operands[0] = XEXP (XVECEXP (operands[0], 0, 0), 0);
1996
1997       emit_call_insn (gen_call_value_internal0 (operands[0], operands[1], operands[2],
1998                                                 gen_rtx_REG (SImode,
1999                                                              GP_REG_FIRST + 31)));
2000
2001       DONE;
2002     }
2003 }")
2004
2005 (define_expand "call_value_internal0"
2006   [(parallel [(set (match_operand 0 "" "")
2007                    (call (match_operand 1 "" "")
2008                          (match_operand 2 "" "")))
2009               (clobber (match_operand:SI 3 "" ""))])]
2010   ""
2011   "")
2012
2013 (define_insn "call_value_internal1"
2014   [(set (match_operand 0 "register_operand" "=df")
2015         (call (mem (match_operand 1 "call_insn_operand" "ri"))
2016               (match_operand 2 "" "i")))
2017    (clobber (match_operand:SI 3 "register_operand" "=d"))]
2018   ""
2019   "*
2020 {
2021   register rtx target = operands[1];
2022
2023   if (GET_CODE (target) == CONST_INT)
2024     return \"li\\t%@,%1\\n\\tjalr\\t%3,%@\";
2025   else if (CONSTANT_ADDRESS_P (target))
2026     return \"jal\\t%1\";
2027   else
2028     return \"jalr\\t%3,%1\";
2029 }"
2030   [(set_attr "type"     "call")
2031    (set_attr "mode"     "none")])
2032
2033 (define_expand "call_value_multiple_internal0"
2034   [(parallel [(set (match_operand 0 "" "")
2035                    (call (match_operand 1 "" "")
2036                          (match_operand 2 "" "")))
2037               (set (match_operand 3 "" "")
2038                    (call (match_dup 1)
2039                          (match_dup 2)))
2040               (clobber (match_operand:SI 4 "" ""))])]
2041   ""
2042   "")
2043
2044 ;; ??? May eventually need all 6 versions of the call patterns with multiple
2045 ;; return values.
2046
2047 (define_insn "call_value_multiple_internal1"
2048   [(set (match_operand 0 "register_operand" "=df")
2049         (call (mem (match_operand 1 "call_insn_operand" "ri"))
2050               (match_operand 2 "" "i")))
2051    (set (match_operand 3 "register_operand" "=df")
2052         (call (mem (match_dup 1))
2053               (match_dup 2)))
2054   (clobber (match_operand:SI 4 "register_operand" "=d"))]
2055   ""
2056   "*
2057 {
2058   register rtx target = operands[1];
2059
2060   if (GET_CODE (target) == CONST_INT)
2061     return \"li\\t%@,%1\\n\\tjalr\\t%4,%@\";
2062   else if (CONSTANT_ADDRESS_P (target))
2063     return \"jal\\t%1\";
2064   else
2065     return \"jalr\\t%4,%1\";
2066 }"
2067   [(set_attr "type"     "call")
2068    (set_attr "mode"     "none")])
2069
2070 ;; Call subroutine returning any type.
2071
2072 (define_expand "untyped_call"
2073   [(parallel [(call (match_operand 0 "" "")
2074                     (const_int 0))
2075               (match_operand 1 "" "")
2076               (match_operand 2 "" "")])]
2077   ""
2078   "
2079 {
2080   if (operands[0])              /* silence statement not reached warnings */
2081     {
2082       int i;
2083
2084       emit_call_insn (GEN_CALL (operands[0], const0_rtx, NULL, const0_rtx));
2085
2086       for (i = 0; i < XVECLEN (operands[2], 0); i++)
2087         {
2088           rtx set = XVECEXP (operands[2], 0, i);
2089           emit_move_insn (SET_DEST (set), SET_SRC (set));
2090         }
2091
2092       emit_insn (gen_blockage ());
2093       DONE;
2094     }
2095 }")
2096 \f
2097 ;;
2098 ;;  ....................
2099 ;;
2100 ;;      MISC.
2101 ;;
2102 ;;  ....................
2103 ;;
2104
2105 (define_insn "nop"
2106   [(const_int 0)]
2107   ""
2108   "nop"
2109   [(set_attr "type"     "nop")
2110    (set_attr "mode"     "none")])
2111
2112 \f
2113 ;; For the rare case where we need to load an address into a register
2114 ;; that cannot be recognized by the normal movsi/addsi instructions.
2115 ;; I have no idea how many insns this can actually generate.  It should
2116 ;; be rare, so over-estimating as 10 instructions should not have any
2117 ;; real performance impact.
2118 (define_insn "leasi"
2119   [(set (match_operand:SI 0 "register_operand" "=d")
2120         (match_operand:SI 1 "address_operand" "p"))]
2121   "Pmode == SImode"
2122   "*
2123 {
2124   rtx xoperands [3];
2125
2126   xoperands[0] = operands[0];
2127   xoperands[1] = XEXP (operands[1], 0);
2128   xoperands[2] = XEXP (operands[1], 1);
2129   output_asm_insn (\"addiu\\t%0,%1,%2\", xoperands);
2130   return \"\";
2131 }"
2132   [(set_attr "type"     "arith")
2133    (set_attr "mode"     "SI")
2134    (set_attr "length"   "40")])
2135
2136 (define_insn "ado16"
2137   [(set (match_operand:SI             0 "register_operand" "=r")
2138         (unspec:SI [(match_operand:SI 1 "register_operand" "r")
2139                     (match_operand:SI 2 "register_operand" "r")]
2140                 UNSPEC_ADO16))]
2141   ""
2142   "ado16\\t%0, %1, %2"
2143 )
2144
2145 (define_insn "ram"
2146   [(set (match_operand:SI             0 "register_operand" "=r")
2147               (unspec:SI [(match_operand:SI 1 "register_operand" "r")
2148                                 (match_operand:SI 2 "const_int_operand" "I")
2149                                 (match_operand:SI 3 "const_int_operand" "I")
2150                                 (match_operand:SI 4 "const_int_operand" "I")]
2151                      UNSPEC_RAM))]
2152   ""
2153   "ram\\t%0, %1, %2, %3, %4"
2154 )
2155
2156 (define_insn "chkhdr"
2157   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "=r")
2158                 (match_operand:SI 1 "register_operand" "r")]
2159                 UNSPEC_CHKHDR)]
2160   ""
2161   "* return iq2000_fill_delay_slot (\"chkhdr\\t%0, %1\", DELAY_LOAD, operands, insn);"
2162   [(set_attr "dslot"    "not_in_dslot")]
2163 )
2164
2165 (define_insn "pkrl"
2166   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2167                 (match_operand:SI 1 "register_operand" "r")]
2168                 UNSPEC_PKRL)]
2169   ""
2170   "* return iq2000_fill_delay_slot (\"pkrl\\t%0, %1\", DELAY_NONE, operands, insn);"
2171   [(set_attr "dslot"    "not_in_dslot")]
2172 )
2173
2174 (define_insn "cfc0"
2175    [(set (match_operand:SI                0 "register_operand" "=r")
2176     (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2177                 UNSPEC_CFC0))]
2178   ""
2179   "* return iq2000_fill_delay_slot (\"cfc0\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2180   [(set_attr "dslot"    "ok_in_dslot")]
2181 )
2182
2183 (define_insn "cfc1"
2184    [(set (match_operand:SI                0 "register_operand" "=r")
2185    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2186                 UNSPEC_CFC1))]
2187   ""
2188   "* return iq2000_fill_delay_slot (\"cfc1\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2189   [(set_attr "dslot"    "ok_in_dslot")]
2190 )
2191
2192 (define_insn "cfc2"
2193    [(set (match_operand:SI                0 "register_operand" "=r")
2194    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2195                 UNSPEC_CFC2))]
2196   ""
2197   "* return iq2000_fill_delay_slot (\"cfc2\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2198   [(set_attr "dslot"    "not_in_dslot")]
2199 )
2200
2201 (define_insn "cfc3"
2202    [(set (match_operand:SI                0 "register_operand" "=r")
2203    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2204                 UNSPEC_CFC3))]
2205   ""
2206   "* return iq2000_fill_delay_slot (\"cfc3\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2207   [(set_attr "dslot"    "not_in_dslot")]
2208 )
2209
2210 (define_insn "ctc0"
2211   [(unspec_volatile:SI [(match_operand:SI 0 "reg_or_0_operand" "rJ")
2212                 (match_operand:SI 1 "const_int_operand" "I")]
2213                 UNSPEC_CTC0)]
2214   ""
2215   "* return iq2000_fill_delay_slot (\"ctc0\\t%z0, %%%1\", DELAY_NONE, operands, insn);"
2216   [(set_attr "dslot"    "ok_in_dslot")]
2217 )
2218
2219 (define_insn "ctc1"
2220   [(unspec_volatile:SI [(match_operand:SI 0 "reg_or_0_operand" "rJ")
2221                 (match_operand:SI 1 "const_int_operand" "I")]
2222                 UNSPEC_CTC1)]
2223   ""
2224   "* return iq2000_fill_delay_slot (\"ctc1\\t%z0, %%%1\", DELAY_NONE, operands, insn);"
2225   [(set_attr "dslot"    "ok_in_dslot")]
2226 )
2227
2228 (define_insn "ctc2"
2229   [(unspec_volatile:SI [(match_operand:SI 0 "reg_or_0_operand" "rJ")
2230                 (match_operand:SI 1 "const_int_operand" "I")]
2231                 UNSPEC_CTC2)]
2232   ""
2233   "* return iq2000_fill_delay_slot (\"ctc2\\t%z0, %%%1\", DELAY_NONE, operands, insn);"
2234   [(set_attr "dslot"    "ok_in_dslot")]
2235 )
2236
2237 (define_insn "ctc3"
2238   [(unspec_volatile:SI [(match_operand:SI 0 "reg_or_0_operand" "rJ")
2239                 (match_operand:SI 1 "const_int_operand" "I")]
2240                 UNSPEC_CTC3)]
2241   ""
2242   "* return iq2000_fill_delay_slot (\"ctc3\\t%z0, %%%1\", DELAY_NONE, operands, insn);"
2243   [(set_attr "dslot"    "ok_in_dslot")]
2244 )
2245
2246 (define_insn "mfc0"
2247    [(set (match_operand:SI                0 "register_operand" "=r")
2248    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2249                 UNSPEC_MFC0))]
2250   ""
2251   "* return iq2000_fill_delay_slot (\"mfc0\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2252   [(set_attr "dslot"    "ok_in_dslot")]
2253 )
2254
2255 (define_insn "mfc1"
2256    [(set (match_operand:SI                0 "register_operand" "=r")
2257    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2258                 UNSPEC_MFC1))]
2259   ""
2260   "* return iq2000_fill_delay_slot (\"mfc1\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2261   [(set_attr "dslot"    "ok_in_dslot")]
2262 )
2263
2264 (define_insn "mfc2"
2265    [(set (match_operand:SI                0 "register_operand" "=r")
2266    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2267                 UNSPEC_MFC2))]
2268   ""
2269   "* return iq2000_fill_delay_slot (\"mfc2\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2270   [(set_attr "dslot"    "not_in_dslot")]
2271 )
2272
2273 (define_insn "mfc3"
2274    [(set (match_operand:SI                0 "register_operand" "=r")
2275    (unspec_volatile:SI [(match_operand:SI 1 "const_int_operand" "I")]
2276                 UNSPEC_MFC3))]
2277   ""
2278   "* return iq2000_fill_delay_slot (\"mfc3\\t%0, %%%1\", DELAY_LOAD, operands, insn);"
2279   [(set_attr "dslot"    "not_in_dslot")]
2280 )
2281
2282 (define_insn "mtc0"
2283   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2284                 (match_operand:SI 1 "const_int_operand" "I")]
2285                 UNSPEC_MTC0)]
2286   ""
2287   "* return iq2000_fill_delay_slot (\"mtc0\\t%0, %%%1\", DELAY_NONE, operands, insn);"
2288   [(set_attr "dslot"    "ok_in_dslot")]
2289 )
2290
2291 (define_insn "mtc1"
2292   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2293                 (match_operand:SI 1 "const_int_operand" "I")]
2294                 UNSPEC_MTC1)]
2295   ""
2296   "* return iq2000_fill_delay_slot (\"mtc1\\t%0, %%%1\", DELAY_NONE, operands, insn);"
2297   [(set_attr "dslot"    "ok_in_dslot")]
2298 )
2299
2300 (define_insn "mtc2"
2301   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2302                 (match_operand:SI 1 "const_int_operand" "I")]
2303                 UNSPEC_MTC2)]
2304   ""
2305   "* return iq2000_fill_delay_slot (\"mtc2\\t%0, %%%1\", DELAY_NONE, operands, insn);"
2306   [(set_attr "dslot"    "ok_in_dslot")]
2307 )
2308
2309 (define_insn "mtc3"
2310   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2311                 (match_operand:SI 1 "const_int_operand" "I")]
2312                 UNSPEC_MTC3)]
2313   ""
2314   "* return iq2000_fill_delay_slot (\"mtc3\\t%0, %%%1\", DELAY_NONE, operands, insn);"
2315   [(set_attr "dslot"    "ok_in_dslot")]
2316 )
2317
2318 (define_insn "lur"
2319   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2320                 (match_operand:SI 1 "register_operand" "r")]
2321                 UNSPEC_LUR)]
2322   ""
2323   "* return iq2000_fill_delay_slot (\"lur\\t%0, %1\", DELAY_NONE, operands, insn);"
2324   [(set_attr "dslot"    "not_in_dslot")]
2325 )
2326
2327 (define_insn "rb"
2328   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2329                 (match_operand:SI 1 "register_operand" "r")]
2330                 UNSPEC_RB)]
2331   ""
2332   "* return iq2000_fill_delay_slot (\"rb\\t%0, %1\", DELAY_NONE, operands, insn);"
2333   [(set_attr "dslot"    "not_in_dslot")]
2334 )
2335
2336 (define_insn "rx"
2337   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2338                 (match_operand:SI 1 "register_operand" "r")]
2339                 UNSPEC_RX)]
2340   ""
2341   "* return iq2000_fill_delay_slot (\"rx\\t%0, %1\", DELAY_NONE, operands, insn);"
2342   [(set_attr "dslot"    "not_in_dslot")]
2343 )
2344
2345 (define_insn "srrd"
2346   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")]
2347                 UNSPEC_SRRD)]
2348   ""
2349   "* return iq2000_fill_delay_slot (\"srrd\\t%0\", DELAY_NONE, operands, insn);"
2350   [(set_attr "dslot"    "not_in_dslot")]
2351 )
2352
2353 (define_insn "srwr"
2354   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2355                 (match_operand:SI 1 "register_operand" "r")]
2356                 UNSPEC_SRWR)]
2357   ""
2358   "* return iq2000_fill_delay_slot (\"srwr\\t%0, %1\", DELAY_NONE, operands, insn);"
2359   [(set_attr "dslot"    "not_in_dslot")]
2360 )
2361
2362 (define_insn "wb"
2363   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2364                 (match_operand:SI 1 "register_operand" "r")]
2365                 UNSPEC_WB)]
2366   ""
2367   "* return iq2000_fill_delay_slot (\"wb\\t%0, %1\", DELAY_NONE, operands, insn);"
2368   [(set_attr "dslot"    "not_in_dslot")]
2369 )
2370
2371 (define_insn "wx"
2372   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2373                 (match_operand:SI 1 "register_operand" "r")]
2374                 UNSPEC_WX)]
2375   ""
2376   "* return iq2000_fill_delay_slot (\"wx\\t%0, %1\", DELAY_NONE, operands, insn);"
2377   [(set_attr "dslot"    "not_in_dslot")]
2378 )
2379
2380 (define_insn "luc32"
2381   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2382                 (match_operand:SI 1 "register_operand" "r")]
2383                 UNSPEC_LUC32)]
2384   ""
2385   "* return iq2000_fill_delay_slot (\"luc32\\t%0, %1\", DELAY_NONE, operands, insn);"
2386   [(set_attr "dslot"    "not_in_dslot")]
2387 )
2388
2389 (define_insn "luc32l"
2390   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2391                 (match_operand:SI 1 "register_operand" "r")]
2392                 UNSPEC_LUC32L)]
2393   ""
2394   "* return iq2000_fill_delay_slot (\"luc32l\\t%0, %1\", DELAY_NONE, operands, insn);"
2395   [(set_attr "dslot"    "not_in_dslot")]
2396 )
2397
2398 (define_insn "luc64"
2399   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2400                 (match_operand:SI 1 "register_operand" "r")]
2401                 UNSPEC_LUC64)]
2402   ""
2403   "* return iq2000_fill_delay_slot (\"luc64\\t%0, %1\", DELAY_NONE, operands, insn);"
2404   [(set_attr "dslot"    "not_in_dslot")]
2405 )
2406
2407 (define_insn "luc64l"
2408   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2409                 (match_operand:SI 1 "register_operand" "r")]
2410                 UNSPEC_LUC64L)]
2411   ""
2412   "* return iq2000_fill_delay_slot (\"luc64l\\t%0, %1\", DELAY_NONE, operands, insn);"
2413   [(set_attr "dslot"    "not_in_dslot")]
2414 )
2415
2416 (define_insn "luk"
2417   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2418                 (match_operand:SI 1 "register_operand" "r")]
2419                 UNSPEC_LUK)]
2420   ""
2421   "* return iq2000_fill_delay_slot (\"luk\\t%0, %1\", DELAY_NONE, operands, insn);"
2422   [(set_attr "dslot"    "ok_in_dslot")]
2423 )
2424
2425 (define_insn "lulck"
2426   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")]
2427                 UNSPEC_LULCK)]
2428   ""
2429   "* return iq2000_fill_delay_slot (\"lulck\\t%0\", DELAY_NONE, operands, insn);"
2430   [(set_attr "dslot"    "not_in_dslot")]
2431 )
2432
2433 (define_insn "lum32"
2434   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2435                 (match_operand:SI 1 "register_operand" "r")]
2436                 UNSPEC_LUM32)]
2437   ""
2438   "* return iq2000_fill_delay_slot (\"lum32\\t%0, %1\", DELAY_NONE, operands, insn);"
2439   [(set_attr "dslot"    "not_in_dslot")]
2440 )
2441
2442 (define_insn "lum32l"
2443   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2444                 (match_operand:SI 1 "register_operand" "r")]
2445                 UNSPEC_LUM32L)]
2446   ""
2447   "* return iq2000_fill_delay_slot (\"lum32l\\t%0, %1\", DELAY_NONE, operands, insn);"
2448   [(set_attr "dslot"    "not_in_dslot")]
2449 )
2450
2451 (define_insn "lum64"
2452   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2453                 (match_operand:SI 1 "register_operand" "r")]
2454                 UNSPEC_LUM64)]
2455   ""
2456   "* return iq2000_fill_delay_slot (\"lum64\\t%0, %1\", DELAY_NONE, operands, insn);"
2457   [(set_attr "dslot"    "not_in_dslot")]
2458 )
2459
2460 (define_insn "lum64l"
2461   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2462                 (match_operand:SI 1 "register_operand" "r")]
2463                 UNSPEC_LUM64L)]
2464   ""
2465   "* return iq2000_fill_delay_slot (\"lum64l\\t%0, %1\", DELAY_NONE, operands, insn);"
2466   [(set_attr "dslot"    "not_in_dslot")]
2467 )
2468
2469 (define_insn "lurl"
2470   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2471                 (match_operand:SI 1 "register_operand" "r")]
2472                 UNSPEC_LURL)]
2473   ""
2474   "* return iq2000_fill_delay_slot (\"lurl\\t%0, %1\", DELAY_NONE, operands, insn);"
2475   [(set_attr "dslot"    "not_in_dslot")]
2476 )
2477
2478 (define_insn "mrgb"
2479   [(set (match_operand:SI                 0 "register_operand" "=r")
2480         (unspec_volatile:SI [(match_operand:SI 1 "register_operand" "r")
2481                 (match_operand:SI 2 "register_operand" "r")
2482                 (match_operand:SI 3 "const_int_operand" "I")]
2483                 UNSPEC_MRGB))]
2484   ""
2485   "* return iq2000_fill_delay_slot (\"mrgb\\t%0, %1, %2, %3\", DELAY_LOAD, operands, insn);"
2486   [(set_attr "dslot"    "ok_in_dslot")]
2487 )
2488
2489 (define_insn "srrdl"
2490   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")]
2491                 UNSPEC_SRRDL)]
2492   ""
2493   "* return iq2000_fill_delay_slot (\"srrdl\\t%0\", DELAY_NONE, operands, insn);"
2494   [(set_attr "dslot"    "not_in_dslot")]
2495 )
2496
2497 (define_insn "srulck"
2498   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")]
2499                 UNSPEC_SRULCK)]
2500   ""
2501   "* return iq2000_fill_delay_slot (\"srulck\\t%0\", DELAY_NONE, operands, insn);"
2502   [(set_attr "dslot"    "not_in_dslot")]
2503 )
2504
2505 (define_insn "srwru"
2506   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2507                 (match_operand:SI 1 "register_operand" "r")]
2508                 UNSPEC_SRWRU)]
2509   ""
2510   "* return iq2000_fill_delay_slot (\"srwru\\t%0, %1\", DELAY_NONE, operands, insn);"
2511   [(set_attr "dslot"    "not_in_dslot")]
2512 )
2513
2514 (define_insn "trapqfl"
2515   [(unspec_volatile:SI [(const_int 1)] UNSPEC_TRAPQFL)]
2516   ""
2517   "* return iq2000_fill_delay_slot (\"trapqfl\", DELAY_NONE, operands, insn);"
2518   [(set_attr "dslot"    "not_in_dslot")]
2519 )
2520
2521 (define_insn "trapqne"
2522   [(unspec_volatile:SI [(const_int 2)] UNSPEC_TRAPQNE)]
2523   ""
2524   "* return iq2000_fill_delay_slot (\"trapqne\", DELAY_NONE, operands, insn);"
2525   [(set_attr "dslot"    "not_in_dslot")]
2526 )
2527
2528 (define_insn "traprel"
2529   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")]
2530                 UNSPEC_TRAPREL)]
2531   ""
2532   "* return iq2000_fill_delay_slot (\"traprel %0\", DELAY_NONE, operands, insn);"
2533   [(set_attr "dslot"    "not_in_dslot")]
2534 )
2535
2536 (define_insn "wbu"
2537   [(unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")
2538                 (match_operand:SI 1 "register_operand" "r")]
2539                 UNSPEC_WBU)]
2540   ""
2541   "* return iq2000_fill_delay_slot (\"wbu\\t%0, %1\", DELAY_NONE, operands, insn);"
2542   [(set_attr "dslot"    "not_in_dslot")]
2543 )
2544
2545 (define_insn "syscall"
2546   [(unspec_volatile:SI [(const_int 2)] UNSPEC_SYSCALL)]
2547   ""
2548   "syscall"
2549   [(set_attr "dslot"    "not_in_dslot")]
2550 )