Annotation of GNUtools/cc/config/sh/sh.md, revision 1.1.1.1

1.1       root        1: ;;- Machine description the Hitachi SH
                      2: ;;  Copyright (C) 1993 Free Software Foundation, Inc.
                      3: ;;  Contributed by Steve Chamberlain ([email protected])
                      4: 
                      5: ;; This file is part of GNU CC.
                      6: 
                      7: ;; GNU CC is free software; you can redistribute it and/or modify
                      8: ;; it under the terms of the GNU General Public License as published by
                      9: ;; the Free Software Foundation; either version 2, or (at your option)
                     10: ;; any later version.
                     11: 
                     12: ;; GNU CC is distributed in the hope that it will be useful,
                     13: ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
                     14: ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
                     15: ;; GNU General Public License for more details.
                     16: 
                     17: ;; You should have received a copy of the GNU General Public License
                     18: ;; along with GNU CC; see the file COPYING.  If not, write to
                     19: ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
                     20: 
                     21: ;;- See file "rtl.def" for documentation on define_insn, match_*, et. al.
                     22: 
                     23: 
                     24: 
                     25: ;; -------------------------------------------------------------------------
                     26: ;; Attributes
                     27: ;; -------------------------------------------------------------------------
                     28: 
                     29: ; Target CPU.
                     30: 
                     31: (define_attr "cpu" "sh0,sh1,sh2,sh3"
                     32:   (const (symbol_ref "sh_cpu")))
                     33: 
                     34: (define_attr "type" "cbranch,ctable,jump,arith,other,load,store,move,smpy,dmpy,return,pload"
                     35:   (const_string "other"))
                     36: 
                     37: ; If a conditional branch destination is within -100..100 bytes away 
                     38: ; from the instruction it can be 2 bytes long.  Something in the
                     39: ; range -4000..4000 bytes can be 6 bytes long, all other conditional
                     40: ; branches are 8 bytes long.
                     41: 
                     42: ; An unconditional jump which can reach forward or back 4k can be 
                     43: ; 6 bytes long (including the delay slot).  If it is too big, it
                     44: ; must be 8 bytes long.
                     45: 
                     46: ; All other instructions are two bytes long by default.
                     47: 
                     48: (define_attr "length" "" 
                     49:   (cond [(eq_attr "type" "cbranch")
                     50:          (if_then_else (and (ge (minus (pc) (match_dup 0))
                     51:                                 (const_int -100))
                     52:                             (le (minus (pc) (match_dup 0))
                     53:                                 (const_int 100)))
                     54:                        (const_int 2)
                     55:                        (if_then_else (and (ge (minus (pc) (match_dup 0))
                     56:                                               (const_int -4000))
                     57:                                           (le (minus (pc) (match_dup 0))
                     58:                                               (const_int 4000)))
                     59:                                      (const_int 6)
                     60:                                      (const_int 8)))
                     61: 
                     62:         (eq_attr "type" "jump")
                     63:                        (if_then_else (and (ge (minus (pc) (match_dup 0))
                     64:                                               (const_int -4000))
                     65:                                           (le (minus (pc) (match_dup 0))
                     66:                                               (const_int 4000)))
                     67:                                      (const_int 4)
                     68:                                      (const_int 6))
                     69:         ] (const_int 2)))
                     70: 
                     71: ;; (define_function_unit {name} {num-units} {n-users} {test}
                     72: ;;                       {ready-delay} {issue-delay} [{conflict-list}])
                     73:                                      
                     74: (define_function_unit "memory" 1 1 (eq_attr "type" "load") 1 0)
                     75: (define_function_unit "mpy"    1 1 (eq_attr "type" "smpy") 3 0)
                     76: (define_function_unit "mpy"    1 1 (eq_attr "type" "dmpy") 5 0)
                     77: 
                     78: (define_attr "needs_delay_slot" "yes,no"
                     79:   (cond [(eq_attr "type" "jump") (const_string "yes")
                     80:         (eq_attr "type" "return") (const_string "yes")]
                     81:        (const_string "no")))
                     82: 
                     83: (define_delay 
                     84:   (eq_attr "needs_delay_slot" "yes") 
                     85:   [(eq_attr "in_delay_slot" "yes") (nil) (nil)])
                     86: 
                     87: 
                     88: (define_attr "dump" "yes,no,must" (const_string "no"))
                     89: (define_attr "constneed" "yes,no" (const_string "no"))
                     90: (define_attr "smallestsize" "" (const_int 2))
                     91: (define_attr "largestsize" "" (const_int 8))
                     92: (define_attr "constantsize" "" (const_int 4))
                     93: 
                     94: (define_attr "in_delay_slot" "maybe,yes,no" 
                     95:   (cond [(eq_attr "type" "cbranch") (const_string "no")
                     96:         (eq_attr "type" "jump") (const_string "no")
                     97:         (eq_attr "type" "pload") (const_string "no")
                     98:         (eq_attr "type" "return") (const_string "no")
                     99:         (eq_attr "length" "2") (const_string "yes")
                    100:         (eq_attr "length" "4,6,8,10,12") (const_string "no")
                    101:         ] (const_string "yes")))
                    102: 
                    103: 
                    104: 
                    105: ;; -------------------------------------------------------------------------
                    106: ;; SImode signed integer comparisons
                    107: ;; -------------------------------------------------------------------------
                    108: 
                    109: (define_insn ""
                    110:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    111:        (eq:SI (reg:SI 18)
                    112:               (const_int 1)))]
                    113:   ""
                    114:   "movt        %0 !movt1")
                    115:   
                    116: (define_insn ""
                    117:   [(set (reg:SI 18) (gt (match_operand:SI 0 "arith_reg_operand" "r")
                    118:                  (const_int 0)))]
                    119:   ""
                    120:   "cmp/pl      %0")
                    121: 
                    122: (define_insn ""
                    123:   [(set (reg:SI 18) (ge (match_operand:SI 0 "arith_reg_operand" "r")
                    124:                  (const_int 0)))]
                    125:   ""
                    126:   "cmp/pz      %0")
                    127: 
                    128: (define_insn "cmpeqsi_t"
                    129:   [(set (reg:SI 18) (eq (match_operand:SI 0 "arith_reg_operand" "r,z")
                    130:                  (match_operand:SI 1 "arith_operand" "r,I")))]
                    131:   ""
                    132:   "cmp/eq      %1,%0")
                    133: 
                    134: 
                    135: (define_insn "cmpgtsi_t"
                    136:   [(set (reg:SI 18) (gt (match_operand:SI 0 "arith_reg_operand" "r")
                    137:                  (match_operand:SI 1 "arith_reg_operand" "r")))]
                    138:   ""
                    139:   "cmp/gt      %1,%0")
                    140: 
                    141: (define_insn "cmpgesi_t"
                    142:   [(set (reg:SI 18) (ge (match_operand:SI 0 "arith_reg_operand" "r")
                    143:                  (match_operand:SI 1 "arith_reg_operand" "r")))]
                    144:   ""
                    145:   "cmp/ge      %1,%0")
                    146: 
                    147: (define_insn "cmpltsi_t"
                    148:   [(set (reg:SI 18) (lt (match_operand:SI 0 "arith_reg_operand" "r")
                    149:                  (match_operand:SI 1 "arith_reg_operand" "r")))]
                    150:   ""
                    151:   "cmp/gt      %0,%1")
                    152: 
                    153: (define_insn "cmplesi_t"
                    154:   [(set (reg:SI 18) (le (match_operand:SI 0 "arith_reg_operand" "r")
                    155:                          (match_operand:SI 1 "arith_reg_operand" "r")))]
                    156:   ""
                    157:   "cmp/ge      %0,%1")
                    158: 
                    159: 
                    160: ;; -------------------------------------------------------------------------
                    161: ;; SImode unsigned integer comparisons
                    162: ;; -------------------------------------------------------------------------
                    163: 
                    164: (define_insn "cmpgeusi_t"
                    165:   [(set (reg:SI 18) (geu (match_operand:SI 0 "arith_reg_operand" "r")
                    166:                   (match_operand:SI 1 "arith_reg_operand" "r")))]
                    167:   ""
                    168:   "cmp/hs      %1,%0")
                    169: 
                    170: (define_insn "cmpgtusi_t"
                    171:   [(set (reg:SI 18) (gtu (match_operand:SI 0 "arith_reg_operand" "r")
                    172:                   (match_operand:SI 1 "arith_reg_operand" "r")))]
                    173:   ""
                    174:   "cmp/hi      %1,%0")
                    175: 
                    176: (define_insn "cmpleusi_t"
                    177:   [(set (reg:SI 18) (leu (match_operand:SI 0 "arith_reg_operand" "r")
                    178:                   (match_operand:SI 1 "arith_reg_operand" "r")))]
                    179:   ""
                    180:   "cmp/hs      %0,%1")
                    181: 
                    182: (define_insn "cmpltusi_t"
                    183:   [(set (reg:SI 18) (ltu (match_operand:SI 0 "arith_reg_operand" "r")
                    184:                   (match_operand:SI 1 "arith_reg_operand" "r")))]
                    185:   ""
                    186:   "cmp/hi      %0,%1")
                    187: 
                    188: ;; We save the compare operands in the cmpxx patterns and use them when
                    189: ;; we generate the branch.
                    190: 
                    191: (define_expand "cmpsi"
                    192:   [(set (reg:SI 18) (compare (match_operand:SI 0 "arith_reg_operand" "")
                    193:                             (match_operand:SI 1 "arith_reg_operand" "")))]
                    194:   ""
                    195:   "
                    196: { sh_compare_op0 = operands[0];
                    197:   sh_compare_op1 = operands[1];
                    198:   DONE;
                    199: }")
                    200: 
                    201: 
                    202: ;; -------------------------------------------------------------------------
                    203: ;; Addition instructions
                    204: ;; -------------------------------------------------------------------------
                    205: 
                    206: (define_insn "adddi3"
                    207:   [(set (match_operand:DI 0 "arith_reg_operand" "=&r")
                    208:        (plus:DI (match_operand:DI 1 "arith_reg_operand" "%0")
                    209:                 (match_operand:DI 2 "arith_reg_operand" "r")))
                    210:    (clobber (reg:SI 18))]
                    211:   ""
                    212:   "clrt\;addc  %R2,%R0\;addc   %2,%0"
                    213:   [(set_attr "length" "6")
                    214:    (set_attr "in_delay_slot" "no")
                    215:    (set_attr "type" "arith")])
                    216: 
                    217: 
                    218: (define_insn "addsi3_i"
                    219:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    220:        (plus:SI (match_operand:SI 1 "arith_reg_operand" "%0")
                    221:                 (match_operand:SI 2 "arith_operand" "rI")))]
                    222:   ""
                    223:   "add %2,%0"
                    224:   [(set_attr "length" "2")
                    225:    (set_attr "type" "arith")])
                    226: 
                    227: (define_expand "addsi3"
                    228:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    229:        (plus:SI (match_operand:SI 1 "arith_reg_operand" "%0")
                    230:                 (match_operand:SI 2 "arith_operand" "rI")))]
                    231:   ""
                    232:   "")
                    233: 
                    234: 
                    235: ;; -------------------------------------------------------------------------
                    236: ;; Subtraction instructions
                    237: ;; -------------------------------------------------------------------------
                    238: 
                    239: (define_insn "subdi3"
                    240:   [(set (match_operand:DI 0 "arith_reg_operand" "=&r")
                    241:        (minus:DI (match_operand:DI 1 "arith_reg_operand" "0")
                    242:                  (match_operand:DI 2 "arith_reg_operand" "r")))
                    243:    (clobber (reg:SI 18))]
                    244:   ""
                    245:   "clrt\;subc  %R2,%R0\;subc   %2,%0"
                    246:   [(set_attr "length" "6")
                    247:    (set_attr "in_delay_slot" "no")
                    248:    (set_attr "type" "arith")])
                    249: 
                    250: (define_insn "subsi3"
                    251:   [(set (match_operand:SI 0 "arith_reg_operand" "=r,r")
                    252:        (minus:SI (match_operand:SI 1 "arith_reg_operand" "0,0")
                    253:                  (match_operand:SI 2 "arith_operand" "r,I")))]
                    254:   ""
                    255:   "@
                    256:        sub     %2,%0
                    257:        add     %M2,%0"
                    258:   [(set_attr "type" "arith")])
                    259: 
                    260: 
                    261: ;; -------------------------------------------------------------------------
                    262: ;; Multiplication instructions
                    263: ;; -------------------------------------------------------------------------
                    264: 
                    265: 
                    266: (define_insn ""
                    267:   [(set (reg:SI 21)
                    268:        (mult:SI (zero_extend:SI
                    269:                  (match_operand:HI 1 "arith_reg_operand" "r"))
                    270:                 (zero_extend:SI
                    271:                  (match_operand:HI 2 "arith_reg_operand" "r"))))]
                    272:   ""
                    273:   "mulu        %2,%1"
                    274:   [(set_attr "type" "smpy")])
                    275: 
                    276: (define_insn ""
                    277:   [(set (reg:SI 21)
                    278:        (mult:SI (sign_extend:SI
                    279:                  (match_operand:HI 1 "arith_reg_operand" "r"))
                    280:                 (sign_extend:SI
                    281:                  (match_operand:HI 2 "arith_reg_operand" "r"))))]
                    282:   ""
                    283:   "muls        %2,%1"
                    284:   [(set_attr "type" "smpy")])
                    285: 
                    286: (define_expand "mulhisi3"
                    287:   [(set (reg:SI 21)
                    288:        (mult:SI (sign_extend:SI
                    289:                  (match_operand:HI 1 "arith_reg_operand" "r"))
                    290:                 (sign_extend:SI
                    291:                  (match_operand:HI 2 "arith_reg_operand" "r"))))
                    292:    (set (match_operand:SI 0 "arith_reg_operand" "=r")
                    293:        (reg:SI 21))]
                    294:   ""
                    295:   "")
                    296: 
                    297: (define_expand "umulhisi3"
                    298:   [(set (reg:SI 21)
                    299:        (mult:SI (zero_extend:SI
                    300:                  (match_operand:HI 1 "arith_reg_operand" "r"))
                    301:                 (zero_extend:SI
                    302:                  (match_operand:HI 2 "arith_reg_operand" "r"))))
                    303:    (set (match_operand:SI 0 "arith_reg_operand" "=r")
                    304:        (reg:SI 21))]
                    305:   ""
                    306:   "")
                    307: 
                    308: 
                    309: ;; -------------------------------------------------------------------------
                    310: ;; Logical operations
                    311: ;; -------------------------------------------------------------------------
                    312: 
                    313: (define_insn "andsi3"
                    314:   [(set (match_operand:SI 0 "arith_reg_operand" "=r,z")
                    315:        (and:SI (match_operand:SI 1 "arith_reg_operand" "%0,0")
                    316:                (match_operand:SI 2 "logical_operand" "r,L")))]
                    317:   ""
                    318:   "and %2,%0"
                    319:   [(set_attr "type" "arith")])
                    320: 
                    321: (define_insn "iorsi3"
                    322:   [(set (match_operand:SI 0 "arith_reg_operand" "=r,z")
                    323:        (ior:SI (match_operand:SI 1 "arith_reg_operand" "%0,0")
                    324:                (match_operand:SI 2 "logical_operand" "r,L")))]
                    325:   ""
                    326:   "or  %2,%0")
                    327: 
                    328: (define_insn "xorsi3"
                    329:   [(set (match_operand:SI 0 "arith_reg_operand" "=r,z")
                    330:        (xor:SI (match_operand:SI 1 "arith_reg_operand" "%0,0")
                    331:                (match_operand:SI 2 "logical_operand" "r,L")))]
                    332:   ""
                    333:   "xor %2,%0"
                    334:   [(set_attr "type" "arith")])
                    335: 
                    336: 
                    337: ;; -------------------------------------------------------------------------
                    338: ;; Shifts and rotates
                    339: ;; -------------------------------------------------------------------------
                    340: 
                    341: (define_insn "rotlsi3_k"
                    342:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    343:        (rotate:SI (match_operand:SI 1 "arith_reg_operand" "0")
                    344:                   (const_int 1)))
                    345:    (clobber (reg:SI 18))]
                    346:   ""
                    347:   "rotl        %0")
                    348: 
                    349: (define_expand "rotlsi3"
                    350:   [(parallel[(set (match_operand:SI 0 "arith_reg_operand" "")
                    351:                  (rotate:SI (match_operand:SI 1 "arith_reg_operand" "")
                    352:                             (match_operand:SI 2 "immediate_operand" "")))
                    353:             (clobber (reg:SI 18))])]
                    354:   ""
                    355:   "{ if (GET_CODE(operands[2]) != CONST_INT || INTVAL(operands[2]) != 1) FAIL;}")
                    356: 
                    357: (define_insn "rotrsi3_k"
                    358:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    359:        (rotatert:SI (match_operand:SI 1 "arith_reg_operand" "0")
                    360:                     (const_int 1)))
                    361:    (clobber (reg:SI 18))]
                    362:   ""
                    363:   "rotr        %0")
                    364: 
                    365: (define_expand "rotrsi3"
                    366:   [(parallel[(set (match_operand:SI 0 "arith_reg_operand" "")
                    367:                   (rotatert:SI (match_operand:SI 1 "arith_reg_operand" "")
                    368:                                (match_operand:SI 2 "immediate_operand" "")))
                    369:              (clobber (reg:SI 18))])]
                    370:   ""
                    371:   "{ if (GET_CODE(operands[2]) != CONST_INT || INTVAL(operands[2]) != 1) FAIL;}")
                    372: 
                    373: (define_insn "ashlsi3_k"
                    374:   [(set (match_operand:SI 0 "arith_reg_operand" "=r,r")
                    375:        (ashift:SI (match_operand:SI 1 "arith_reg_operand" "0,0")
                    376:                   (match_operand:SI 2 "immediate_operand" "K,n")))
                    377:    (clobber (reg:SI 18))]
                    378:   ""
                    379:   "*return output_shift(\"shll\", operands[0], operands[2], ASHIFT);"
                    380:   [(set_attr "length" "2,12")
                    381:    (set_attr "in_delay_slot" "yes,no")
                    382:    (set_attr "type" "arith")])
                    383: 
                    384: (define_expand "ashlsi3"
                    385:   [(parallel[(set (match_operand:SI 0 "arith_reg_operand" "")
                    386:                  (ashift:SI (match_operand:SI 1 "arith_reg_operand" "")
                    387:                             (match_operand:SI 2 "immediate_operand" "")))
                    388:             (clobber (reg:SI 18))])]
                    389:   ""
                    390:   "if (!ok_shift_value(operands[2], ASHIFT)) FAIL;")
                    391: 
                    392: (define_insn "ashrsi3_k"
                    393:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    394:        (ashiftrt:SI (match_operand:SI 1 "arith_reg_operand" "0")
                    395:                     (const_int 1)))
                    396:    (clobber (reg:SI 18))]
                    397:   ""
                    398:   "shar        %0"
                    399:   [(set_attr "type" "arith")])
                    400: 
                    401: (define_expand "ashrsi3"
                    402:   [(parallel[(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    403:                  (ashiftrt:SI (match_operand:SI 1 "arith_reg_operand" "r")
                    404:                               (match_operand:SI 2 "nonmemory_operand" "M")))
                    405:             (clobber (reg:SI 18))])]
                    406:   ""
                    407:   "
                    408: {
                    409:   if (GET_CODE (operands[2]) != CONST_INT ||
                    410:       INTVAL (operands[2]) != 1) FAIL;
                    411: }
                    412: ")
                    413: 
                    414: (define_insn "lshrsi3_k"
                    415:   [(set (match_operand:SI 0 "arith_reg_operand" "=r,r")
                    416:        (lshiftrt:SI (match_operand:SI 1 "arith_reg_operand" "0,0")
                    417:                     (match_operand:SI 2 "immediate_operand" "K,n")))
                    418:    (clobber (reg:SI 18))]
                    419:   ""
                    420:   "* return output_shift (\"shlr\", operands[0], operands[2], LSHIFTRT);"
                    421:   [(set_attr "length" "2,12")
                    422:    (set_attr "in_delay_slot" "yes,no")
                    423:    (set_attr "type" "arith")])
                    424: 
                    425: (define_expand "lshrsi3"
                    426:   [(parallel[(set (match_operand:SI 0 "arith_reg_operand" "")
                    427:                  (lshiftrt:SI (match_operand:SI 1 "arith_reg_operand" "")
                    428:                               (match_operand:SI 2 "nonmemory_operand" "")))
                    429:             (clobber (reg:SI 18))])]
                    430:   ""
                    431:   "if (!ok_shift_value (operands[2])) FAIL; ")
                    432: 
                    433: (define_insn "ashldi3_k"
                    434:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                    435:        (ashift:DI (match_operand:DI 1 "arith_reg_operand" "0")
                    436:                   (match_operand:DI 2 "immediate_operand" "I")))
                    437:    (clobber (reg:SI 18))]
                    438:   ""
                    439:   "shll        %R0\;rotcl      %0"
                    440:   [(set_attr "length" "4")])
                    441: 
                    442: (define_expand "ashldi3"
                    443:   [(parallel[(set (match_operand:DI 0 "arith_reg_operand" "")
                    444:                  (ashift:DI (match_operand:DI 1 "arith_reg_operand" "")
                    445:                             (match_operand:DI 2 "immediate_operand" "")))
                    446:             (clobber (reg:SI 18))])]
                    447:            
                    448:   ""
                    449:   "{ if (GET_CODE (operands[2]) != CONST_INT   
                    450:        || INTVAL (operands[2]) != 1) FAIL;} ")
                    451: 
                    452: (define_insn "lshrdi3_k"
                    453:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                    454:        (lshiftrt:DI (match_operand:DI 1 "arith_reg_operand" "0")
                    455:                     (match_operand:DI 2 "immediate_operand" "I")))
                    456:    (clobber (reg:SI 18))]
                    457:   ""
                    458:   "shlr        %0\;rotcr       %R0"
                    459:   [(set_attr "length" "4")])
                    460: 
                    461: (define_expand "lshrdi3"
                    462:   [(parallel[(set (match_operand:DI 0 "arith_reg_operand" "")
                    463:                  (lshiftrt:DI (match_operand:DI 1 "arith_reg_operand" "")
                    464:                               (match_operand:DI 2 "immediate_operand" "")))
                    465:             (clobber (reg:SI 18))])]
                    466:   ""
                    467:   "{ if (GET_CODE (operands[2]) != CONST_INT 
                    468:        || INTVAL (operands[2]) != 1) FAIL;} ")
                    469: 
                    470: (define_insn "ashrdi3_k"
                    471:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                    472:        (ashiftrt:DI (match_operand:DI 1 "arith_reg_operand" "0")
                    473:                     (match_operand:DI 2 "immediate_operand" "")))
                    474:    (clobber (reg:SI 18))]
                    475:   ""
                    476:   "shar        %0\;rotcr       %R0"
                    477:   [(set_attr "length" "4")])
                    478: 
                    479: (define_expand "ashrdi3"
                    480:   [(parallel[(set (match_operand:DI 0 "arith_reg_operand" "")
                    481:                  (ashiftrt:DI (match_operand:DI 1 "arith_reg_operand" "")
                    482:                               (match_operand:DI 2 "immediate_operand" "")))
                    483:             (clobber (reg:SI 18))])]
                    484:   ""
                    485:   "{ if (GET_CODE (operands[2]) != CONST_INT 
                    486:        || INTVAL (operands[2]) != 1) FAIL; } ")
                    487: 
                    488: 
                    489: 
                    490: ;; -------------------------------------------------------------------------
                    491: ;; Unary arithmetic
                    492: ;; -------------------------------------------------------------------------
                    493: 
                    494: (define_insn "negdi2"
                    495:   [(set (match_operand:DI 0 "arith_reg_operand" "=&r")
                    496:        (neg:DI (match_operand:DI 1 "arith_reg_operand" "0")))
                    497:    (clobber (reg:SI 18))]
                    498:   ""
                    499:   "clrt\;negc  %R1,%R0\;negc   %1,%0"
                    500:   [(set_attr "length" "6")
                    501:    (set_attr "type" "arith")])
                    502: 
                    503: (define_insn "negsi2"
                    504:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    505:        (neg:SI (match_operand:SI 1 "arith_reg_operand" "r")))]
                    506:   ""
                    507:   "neg %1,%0"
                    508:   [(set_attr "type" "arith")])
                    509: 
                    510: (define_insn "one_cmplsi2"
                    511:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    512:        (not:SI (match_operand:SI 1 "arith_reg_operand" "r")))]
                    513:   ""
                    514:   "not %1,%0"
                    515: [  (set_attr "type" "arith")])
                    516: 
                    517: 
                    518: ;; -------------------------------------------------------------------------
                    519: ;; Zero extension instructions
                    520: ;; -------------------------------------------------------------------------
                    521: 
                    522: (define_insn "zero_extendhisi2"
                    523:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    524:        (zero_extend:SI (match_operand:HI 1 "arith_reg_operand" "r")))]
                    525:   ""
                    526:   "extu.w      %1,%0"
                    527:   [(set_attr "type" "arith")])
                    528: 
                    529: (define_insn "zero_extendqisi2"
                    530:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    531:        (zero_extend:SI (match_operand:QI 1 "arith_reg_operand" "r")))]
                    532:   ""
                    533:   "extu.b      %1,%0"
                    534:   [(set_attr "type" "arith")]) 
                    535: 
                    536: (define_insn "zero_extendqihi2"
                    537:   [(set (match_operand:HI 0 "arith_reg_operand" "=r")
                    538:        (zero_extend:HI (match_operand:QI 1 "arith_reg_operand" "r")))]
                    539:   ""
                    540:   "extu.b      %1,%0"
                    541:   [(set_attr "type" "arith")]) 
                    542: 
                    543: 
                    544: ;; -------------------------------------------------------------------------
                    545: ;; Sign extension instructions
                    546: ;; -------------------------------------------------------------------------
                    547: 
                    548: (define_insn "extendsidi2"
                    549:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                    550:        (sign_extend:DI (match_operand:SI 1 "arith_reg_operand" "0")))]
                    551:   ""
                    552:   "mov %1,%0\;shll     %0\;subc        %0,%0"
                    553:   [(set_attr "length" "6")]) 
                    554: 
                    555: (define_insn "extendhisi2"
                    556:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    557:        (sign_extend:SI (match_operand:HI 1 "arith_reg_operand" "r")))]
                    558:   ""
                    559:   "exts.w      %1,%0")
                    560: 
                    561: (define_insn "extendqisi2"
                    562:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    563:        (sign_extend:SI (match_operand:QI 1 "arith_reg_operand" "r")))]
                    564:   ""
                    565:   "exts.b      %1,%0")
                    566: 
                    567: (define_insn "extendqihi2"
                    568:   [(set (match_operand:HI 0 "arith_reg_operand" "=r")
                    569:        (sign_extend:HI (match_operand:QI 1 "arith_reg_operand" "r")))]
                    570:   ""
                    571:   "exts.b      %1,%0")
                    572: 
                    573: 
                    574: ;; -------------------------------------------------------------------------
                    575: ;; Move instructions
                    576: ;; -------------------------------------------------------------------------
                    577: 
                    578: (define_insn ""
                    579:   [(set (match_operand:SI 0 "push_operand" "=<,<")
                    580:        (match_operand:SI 1 "arith_reg_operand" "r,l"))]
                    581:   ""
                    582:   "@
                    583:        mov.l   %1,%0
                    584:        sts.l   pr,%0"
                    585:   [(set_attr "type" "store")])
                    586: 
                    587: (define_insn ""
                    588:   [(set        (match_operand:SI 0 "arith_reg_operand" "=r,l")
                    589:        (match_operand:SI 1 "pop_operand" "=>,>"))]
                    590:   ""
                    591:   "@
                    592:        mov.l   %1,%0
                    593:        lds.l   %1,pr"
                    594:   [(set_attr "type" "load,pload")])
                    595: 
                    596: (define_insn "push"
                    597:   [(set (mem:SI (pre_dec:SI (reg:SI 15)))
                    598:        (match_operand:SI 0 "register_operand" "r,l"))]
                    599:   ""
                    600:   "@
                    601:        mov.l   %0,@-r15
                    602:        sts.l   pr,@-r15")
                    603: 
                    604: (define_insn "pop"
                    605:   [(set (match_operand:SI 0 "register_operand" "=r,l")
                    606:        (mem:SI (post_inc:SI (reg:SI 15))))]
                    607:   ""
                    608:   "@
                    609:        mov.l   @r15+,%0
                    610:        lds.l   @r15+,pr"
                    611:   [(set_attr "type" "load,pload")])
                    612: 
                    613: ; some constants are easier to generate with alu operations
                    614: ; rather than loading from memory
                    615: 
                    616: (define_split
                    617:   [(set (match_operand:SI 0 "register_operand" "=r")
                    618:        (match_operand:SI 1 "painful_immediate_operand" "i"))]
                    619:   ""
                    620:   [(set (match_dup 0) (const_int 127))
                    621:    (set (match_dup 0) (plus:SI (match_dup 0)
                    622:                               (match_dup 2)))]
                    623:   "operands[2] = GEN_INT (INTVAL(operands[1]) - 127);" )
                    624: 
                    625: (define_insn "movsi_i"
                    626:   [(set (match_operand:SI 0 "general_operand" "=r,r,r,m,l,r,r,r,t,x")
                    627:        (match_operand:SI 1 "general_movsrc_operand"  "r,I,m,r,r,l,t,x,r,r"))]
                    628:   ""
                    629:   "@
                    630:        mov     %1,%0
                    631:        mov     %1,%0
                    632:        mov.l   %1,%0
                    633:        mov.l   %1,%0
                    634:        lds     %1,%0
                    635:        sts     %1,%0
                    636:         movt   %0
                    637:        sts     %1,%0
                    638:        tst     %1,%1\;bt       T%*\;bra        F%*\;sett\;T%*:clrt\;F%*:%^
                    639:        lds     %1,%0"
                    640:   [(set_attr "length" "2,2,2,2,2,2,2,2,10,2")
                    641:    (set_attr "type" "move,move,load,pload,move,move,move,move,move,move")])
                    642: 
                    643: (define_insn "movsi_pcrel"
                    644:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                    645:        (match_operand:SI 1 "hard_immediate_operand" "i"))]
                    646:   ""
                    647:   "* return output_movepcrel (insn, operands, SImode);"
                    648:   [(set_attr "length" "2")
                    649:    (set_attr "in_delay_slot" "no")
                    650:    (set_attr "constneed" "yes")
                    651:    (set_attr "smallestsize" "2")
                    652:    (set_attr "largestsize" "8")
                    653:    (set_attr "type" "load")])
                    654: 
                    655: (define_expand "movsi"
                    656:   [(set (match_operand:SI 0 "general_operand" "")
                    657:        (match_operand:SI 1 "general_operand" ""))]
                    658:   ""
                    659:   "{ if(prepare_move_operands(operands, SImode)) DONE; } ")
                    660: 
                    661: (define_insn "movqi_i"
                    662:   [(set (match_operand:QI 0 "general_operand" "=r,r,r,m,r,m,r,r")
                    663:        (match_operand:QI 1 "general_operand"  "r,n,m,r,m,r,x,t"))]
                    664:   ""
                    665:   "@
                    666:        mov     %1,%0
                    667:        mov     %1,%0
                    668:        mov.b   %1,%0 
                    669:        mov.b   %1,%0 
                    670:        mov.b   %1,%0 
                    671:        mov.b   %1,%0 
                    672:        sts     %1,%0
                    673:        movt    %0")
                    674: 
                    675: (define_expand "movqi"
                    676:   [(set (match_operand:QI 0 "general_operand" "")
                    677:        (match_operand:QI 1 "general_operand"  ""))]
                    678:   ""
                    679:   "prepare_move_operands(operands, QImode);")
                    680:   
                    681: (define_insn "movhi_pcrel"
                    682:   [(set (match_operand:HI 0 "arith_reg_operand" "=r")
                    683:        (match_operand:HI 1 "hard_immediate_operand" "i"))]
                    684:   ""
                    685:   "* return output_movepcrel (insn, operands, SImode);"
                    686:   [(set_attr "length" "2")
                    687:    (set_attr "in_delay_slot" "no")
                    688:    (set_attr "constneed" "yes")
                    689:    (set_attr "smallestsize" "2")
                    690:    (set_attr "largestsize" "8")
                    691:    (set_attr "type" "load")])
                    692: 
                    693: (define_insn "movhi_i"
                    694:   [(set (match_operand:HI 0 "general_operand" "=r,r,m,z,m,r,r")
                    695:        (match_operand:HI 1 "general_operand"  "rI,m,r,m,z,x,t"))]
                    696:   ""
                    697:   "@
                    698:        mov     %1,%0
                    699:        mov.w   %1,%0
                    700:        mov.w   %1,%0
                    701:        mov.w   %1,%0
                    702:        mov.w   %1,%0
                    703:        sts     %1,%0
                    704:        movt    %0"
                    705:   [(set_attr "type" "move,load,store,load,store,move,move")])
                    706: 
                    707: (define_expand "movhi"
                    708:   [(set (match_operand:HI 0 "general_operand" "")
                    709:        (match_operand:HI 1 "general_operand"  ""))]
                    710:   ""
                    711:   "prepare_move_operands (operands, HImode);")
                    712:   
                    713: (define_insn ""
                    714:   [(set (match_operand:DI 0 "push_operand" "=<")
                    715:        (match_operand:DI 1 "arith_reg_operand" "r"))]
                    716:    ""
                    717:    "mov.l      %R1,%0\;mov.l   %1,%0"
                    718:    [(set_attr "length" "4")
                    719:     (set_attr "type" "store")])
                    720: 
                    721: (define_insn "movdi_pcrel"
                    722:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                    723:        (match_operand:DI 1 "hard_immediate_operand" "i"))]
                    724:   ""
                    725:   "* return output_movepcrel (insn, operands, DImode);"
                    726:   [(set_attr "length" "4")
                    727:    (set_attr "in_delay_slot" "no")
                    728:    (set_attr "constneed" "yes")
                    729:    (set_attr "smallestsize" "4")
                    730:    (set_attr "constantsize" "8")
                    731:    (set_attr "largestsize" "18")
                    732:    (set_attr "type" "load")])
                    733: 
                    734: (define_insn "movdi_k"
                    735:   [(set (match_operand:DI 0 "general_operand" "=r,r,m,r,r,m,r")
                    736:        (match_operand:DI 1 "general_operand" "r,m,r,I,m,r,x"))]
                    737:   ""
                    738:   "* return output_movedouble(operands, DImode);"
                    739:   [(set_attr "length" "4")
                    740:    (set_attr "type" "move,load,store,move,load,store,load")])
                    741: 
                    742: 
                    743: (define_expand "movdi"
                    744:   [(set (match_operand:DI 0 "general_operand" "")
                    745:        (match_operand:DI 1 "general_operand" ""))]
                    746:   ""
                    747:   "prepare_move_operands (operands, DImode);")
                    748: 
                    749: (define_insn ""
                    750:   [(set (match_operand:DF 0 "push_operand" "=<")
                    751:        (match_operand:DF 1 "arith_reg_operand" "r"))]
                    752:    ""
                    753:    "mov.l      %R1,%0\;mov.l   %1,%0"
                    754:    [(set_attr "length" "4")
                    755:     (set_attr "type" "store")])
                    756: 
                    757: (define_insn "movdf_pcrel"
                    758:   [(set (match_operand:DF 0 "arith_reg_operand" "=r")
                    759:        (match_operand:DF 1 "hard_immediate_operand" "i"))]
                    760:   ""
                    761:   "* return output_movepcrel  (insn, operands, DFmode);"
                    762:   [(set_attr "length" "4")
                    763:    (set_attr "in_delay_slot" "no")
                    764:    (set_attr "constneed" "yes")
                    765:    (set_attr "smallestsize" "4")
                    766:    (set_attr "constantsize" "8")
                    767:    (set_attr "largestsize" "18")
                    768:    (set_attr "type" "load")])
                    769: 
                    770: (define_insn "movdf_k"
                    771:   [(set (match_operand:DF 0 "general_operand" "=r,r,m")
                    772:        (match_operand:DF 1 "general_operand" "r,m,r"))]
                    773:   ""
                    774:   "* return output_movedouble(operands, DFmode);"
                    775:   [(set_attr "length" "4")
                    776:    (set_attr "type" "move,load,store")])
                    777: 
                    778: (define_expand "movdf"
                    779:   [(set (match_operand:DF 0 "general_operand" "")
                    780:        (match_operand:DF 1 "general_operand" ""))]
                    781:   ""
                    782:   "prepare_move_operands(operands, DFmode);")
                    783: 
                    784: (define_insn ""
                    785:   [(set (match_operand:SF 0 "push_operand" "=<")
                    786:        (match_operand:SF 1 "arith_reg_operand" "r"))]
                    787:    ""
                    788:    "mov.l      %1,%0"
                    789:   [(set_attr "type" "store")])
                    790: 
                    791: (define_insn "movsf_pcrel"
                    792:   [(set (match_operand:SF 0 "arith_reg_operand" "=r")
                    793:        (match_operand:SF 1 "hard_immediate_operand" "i"))]
                    794:   ""
                    795:   "* return output_movepcrel (insn, operands, SFmode);"
                    796:   [(set_attr "length" "2")
                    797:    (set_attr "in_delay_slot" "no")
                    798:    (set_attr "constneed" "yes")
                    799:    (set_attr "smallestsize" "2")
                    800:    (set_attr "largestsize" "8")
                    801:    (set_attr "type" "load")])
                    802:                
                    803: (define_insn "movsf_i"
                    804:   [(set (match_operand:SF 0 "general_operand" "=r,r,r,m,l,r,m,r")
                    805:        (match_operand:SF 1 "general_operand"  "r,I,m,r,r,l,r,m"))]
                    806:   ""
                    807:   "@
                    808:        mov     %1,%0
                    809:        mov     %1,%0
                    810:        mov.l   %1,%0
                    811:        mov.l   %1,%0
                    812:        lds     %1,%0
                    813:        sts     %1,%0
                    814:        mov     %1,%0
                    815:        mov     %1,%0"
                    816:   [(set_attr "type" "move,move,load,store,move,move,move,move")])
                    817: 
                    818: (define_expand "movsf"
                    819:   [(set (match_operand:SF 0 "general_operand" "")
                    820:        (match_operand:SF 1 "general_operand" ""))]
                    821:   ""
                    822:   "prepare_move_operands(operands, SFmode);")
                    823: 
                    824: 
                    825: ;; ------------------------------------------------------------------------
                    826: ;; Define the real conditional branch instructions.
                    827: ;; ------------------------------------------------------------------------
                    828: 
                    829: (define_insn "branch_true"
                    830:   [(set (pc) (if_then_else (eq (reg:SI 18) (const_int 1))
                    831:                           (label_ref (match_operand 0 "" ""))
                    832:                           (pc)))]
                    833:   ""
                    834:   "* return output_branch (1, insn);"
                    835:   [(set_attr "type" "cbranch")])
                    836: 
                    837: (define_insn "branch_false"
                    838:   [(set (pc) (if_then_else (ne (reg:SI 18) (const_int 1))
                    839:                           (label_ref (match_operand 0 "" ""))
                    840:                           (pc)))]
                    841:   ""
                    842:   "* return output_branch (0, insn);"
                    843:   [(set_attr "type" "cbranch")])
                    844: 
                    845: (define_insn "inverse_branch_true"
                    846:   [(set (pc) (if_then_else (eq (reg:SI 18) (const_int 1))
                    847:                           (pc)
                    848:                           (label_ref (match_operand 0 "" ""))))]
                    849:   ""
                    850:   "* return output_branch (0, insn);"
                    851:   [(set_attr "type" "cbranch")])
                    852: 
                    853: (define_insn "inverse_branch_false"
                    854:   [(set (pc) (if_then_else (ne (reg:SI 18) (const_int 1))
                    855:                           (pc)
                    856:                           (label_ref (match_operand 0 "" ""))))]
                    857:   ""
                    858:   "* return output_branch (1, insn);"
                    859:   [(set_attr "type" "cbranch")])
                    860: 
                    861: 
                    862: ;; Conditional branch insns
                    863: 
                    864: (define_expand "beq"
                    865:   [(set (reg:SI 18) (eq:SI (match_dup 1) (match_dup 2)))
                    866:    (set (pc)
                    867:        (if_then_else (eq (reg:SI 18)
                    868:                          (const_int 1))
                    869:                      (label_ref (match_operand 0 "" ""))
                    870:                      (pc)))]
                    871:   ""
                    872:   "
                    873: {
                    874:   operands[1] = sh_compare_op0;
                    875:   operands[2] = sh_compare_op1;
                    876: }")
                    877: 
                    878: 
                    879: ; There is no bne compare, so we reverse the branch arms.
                    880: 
                    881: (define_expand "bne"
                    882:   [(set (reg:SI 18) (eq:SI (match_dup 1) (match_dup 2)))
                    883:    (set (pc)
                    884:        (if_then_else (eq (reg:SI 18)
                    885:                          (const_int 1))
                    886:                      (pc)
                    887:                      (label_ref (match_operand 0 "" ""))))]
                    888:   ""
                    889:   "
                    890: {
                    891:   operands[1] = sh_compare_op0;
                    892:   operands[2] = sh_compare_op1;
                    893: }")
                    894: 
                    895: (define_expand "bgt"
                    896:   [(set (reg:SI 18) (gt:SI (match_dup 1) (match_dup 2)))
                    897:    (set (pc)
                    898:        (if_then_else (eq (reg:SI 18)
                    899:                          (const_int 1))
                    900:                      (label_ref (match_operand 0 "" ""))
                    901:                      (pc)))]
                    902:   ""
                    903:   "
                    904: {
                    905:   operands[1] = sh_compare_op0;
                    906:   operands[2] = sh_compare_op1;
                    907: }")
                    908: 
                    909: (define_expand "blt"
                    910:   [(set (reg:SI 18) (lt:SI (match_dup 1) (match_dup 2)))
                    911:    (set (pc)
                    912:        (if_then_else (eq (reg:SI 18)
                    913:                          (const_int 1))
                    914:                      (label_ref (match_operand 0 "" ""))
                    915:                      (pc)))]
                    916:   ""
                    917:   "
                    918: {
                    919:   operands[1] = sh_compare_op0;
                    920:   operands[2] = sh_compare_op1;
                    921: }")
                    922: 
                    923: (define_expand "ble"
                    924:   [(set (reg:SI 18) (le:SI (match_dup 1) (match_dup 2)))
                    925:    (set (pc)                           
                    926:        (if_then_else (eq (reg:SI 18)
                    927:                          (const_int 1))
                    928:                      (label_ref (match_operand 0 "" ""))
                    929:                      (pc)))]
                    930:   ""
                    931:   "
                    932: {
                    933:   operands[1] = sh_compare_op0;
                    934:   operands[2] = sh_compare_op1;
                    935: }")
                    936: 
                    937: (define_expand "bge"
                    938:   [(set (reg:SI 18) (ge:SI (match_dup 1) (match_dup 2)))
                    939:    (set (pc)
                    940:        (if_then_else (eq (reg:SI 18)
                    941:                          (const_int 1))
                    942:                      (label_ref (match_operand 0 "" ""))
                    943:                      (pc)))]
                    944:   ""
                    945:   "
                    946: {
                    947:   operands[1] = sh_compare_op0;
                    948:   operands[2] = sh_compare_op1;
                    949: }")
                    950: 
                    951: (define_expand "bgtu"
                    952:   [(set (reg:SI 18) (gtu:SI (match_dup 1) (match_dup 2)))
                    953:    (set (pc)
                    954:        (if_then_else (eq (reg:SI 18)
                    955:                           (const_int 1))
                    956:                      (label_ref (match_operand 0 "" ""))
                    957:                      (pc)))]
                    958:   ""
                    959:   "
                    960: {
                    961:   operands[1] = sh_compare_op0;
                    962:   operands[2] = sh_compare_op1;
                    963: }")
                    964: 
                    965: (define_expand "bltu"
                    966:   [(set (reg:SI 18) (ltu:SI (match_dup 1) (match_dup 2)))
                    967:    (set (pc)
                    968:        (if_then_else (eq (reg:SI 18)
                    969:                           (const_int 1))
                    970:                      (label_ref (match_operand 0 "" ""))
                    971:                      (pc)))]
                    972:   ""
                    973:   "
                    974: {
                    975:   operands[1] = sh_compare_op0;
                    976:   operands[2] = sh_compare_op1;
                    977: }")
                    978: 
                    979: (define_expand "bgeu"
                    980:   [(set (reg:SI 18) (geu:SI (match_dup 1) (match_dup 2)))
                    981:    (set (pc)
                    982:        (if_then_else (eq (reg:SI 18)
                    983:                           (const_int 1))
                    984:                      (label_ref (match_operand 0 "" ""))
                    985:                      (pc)))]
                    986:   ""
                    987:   "
                    988: {
                    989:   operands[1] = sh_compare_op0;
                    990:   operands[2] = sh_compare_op1;
                    991: }")
                    992: 
                    993: (define_expand "bleu"
                    994:   [(set (reg:SI 18) (leu:SI (match_dup 1) (match_dup 2)))
                    995:    (set (pc)
                    996:        (if_then_else (eq (reg:SI 18)
                    997:                           (const_int 1))
                    998:                      (label_ref (match_operand 0 "" ""))
                    999:                      (pc)))]
                   1000:   ""
                   1001:   "
                   1002: {
                   1003:   operands[1] = sh_compare_op0;
                   1004:   operands[2] = sh_compare_op1;
                   1005: }")
                   1006: 
                   1007: 
                   1008: ;; ------------------------------------------------------------------------
                   1009: ;; Jump and linkage insns
                   1010: ;; ------------------------------------------------------------------------
                   1011: 
                   1012: (define_insn "jump_real"
                   1013:   [(set (pc)
                   1014:        (label_ref (match_operand 0 "" "")))]
                   1015:   ""
                   1016:   "*
                   1017: {
                   1018:   if (get_attr_length(insn) == 6) 
                   1019:     {
                   1020:       return \"mov.l   %I0,r13\;jmp    @r13%#\";
                   1021:     }
                   1022:   else
                   1023:     {
                   1024:       return   \"bra   %l0%#\";
                   1025:     }
                   1026: }"
                   1027:   [(set_attr "type" "jump")
                   1028:    (set_attr "needs_delay_slot" "yes")])
                   1029: 
                   1030: (define_expand "jump"
                   1031:  [(set (pc) (label_ref (match_operand 0 "" "")))]
                   1032:  ""
                   1033:  "
                   1034: {
                   1035:   emit_insn(gen_jump_real(operand0));
                   1036:   DONE;
                   1037: }
                   1038: ")
                   1039: 
                   1040: (define_insn "calli"
                   1041:   [(call (mem:SI (match_operand:SI 0 "arith_reg_operand" "r"))
                   1042:         (match_operand 1 "" ""))
                   1043:    (clobber (reg:SI 17))]
                   1044:   ""
                   1045:   "jsr @%0%#"
                   1046:   [(set_attr "needs_delay_slot" "yes")
                   1047:    (set_attr "in_delay_slot" "no")
                   1048:    (set_attr "length" "4")])
                   1049: 
                   1050: (define_insn "call_valuei"
                   1051:   [(set (match_operand 0 "" "=rf")
                   1052:        (call (mem:SI (match_operand:SI 1 "arith_reg_operand" "r"))
                   1053:              (match_operand 2 "" "")))
                   1054:    (clobber (reg:SI 17))]
                   1055:   ""
                   1056:   "jsr @%1%#"
                   1057:   [(set_attr "needs_delay_slot" "yes")
                   1058:    (set_attr "in_delay_slot" "no")
                   1059:    (set_attr "length" "4")])
                   1060: 
                   1061: (define_expand "call"
                   1062:   [(parallel[(call (match_operand 0 "arith_reg_operand" "o")
                   1063:                   (match_operand 1 "" ""))
                   1064:             (clobber (reg:SI 17))])]
                   1065:   ""
                   1066:   "
                   1067: {
                   1068:   if (GET_CODE (operands[0]) == MEM) 
                   1069:     {
                   1070:       operands[0] 
                   1071:        = gen_rtx(MEM,GET_MODE (operands[0]),
                   1072:                  force_reg (Pmode,
                   1073:                            XEXP (operands[0], 0)));
                   1074:     }
                   1075: }")
                   1076: 
                   1077: (define_expand "call_value"
                   1078:   [(parallel[(set (match_operand 0 "" "=rf")
                   1079:                  (call (match_operand 1 "arith_reg_operand" "o")
                   1080:                        (match_operand 2 "" "")))
                   1081:             (clobber (reg:SI 17))])]
                   1082:   ""
                   1083:   "
                   1084: {
                   1085:   if (GET_CODE (operands[1]) == MEM) 
                   1086:     {
                   1087:       operands[1] 
                   1088:        = gen_rtx (MEM, GET_MODE (operands[1]),
                   1089:                   force_reg (Pmode,
                   1090:                              XEXP (operands[1], 0)));
                   1091:     }
                   1092: }")
                   1093: 
                   1094: (define_insn "indirect_jump"
                   1095:   [(set (pc)
                   1096:        (match_operand:SI 0 "arith_reg_operand" "r"))]
                   1097:   ""
                   1098:   "jmp @%0%#"
                   1099:   [(set_attr "needs_delay_slot" "yes")
                   1100:    (set_attr "in_delay_slot" "no")
                   1101:    (set_attr "length" "4")])
                   1102: 
                   1103: 
                   1104: 
                   1105: ;; ------------------------------------------------------------------------
                   1106: ;; Misc insns
                   1107: ;; ------------------------------------------------------------------------
                   1108: 
                   1109: 
                   1110: (define_insn "nop"
                   1111:   [(const_int 0)]
                   1112:   ""
                   1113:   "or  r0,r0")
                   1114: 
                   1115: (define_insn "tablejump"
                   1116:   [(set (pc)
                   1117:        (match_operand:SI 0 "arith_reg_operand" "r"))
                   1118:    (use (label_ref (match_operand 1 "" "")))]
                   1119:   ""
                   1120:   "!table jump\;jmp    @%0\;or r0,r0\;%!"
                   1121:   [(set_attr "needs_delay_slot" "no")
                   1122:    (set_attr "in_delay_slot" "no")
                   1123:    (set_attr "type" "jump")
                   1124:    (set_attr "dump" "no")])
                   1125: 
                   1126: (define_insn "return"
                   1127:  [(return)]
                   1128:  "reload_completed"
                   1129:  "rts  %#"
                   1130:  [(set_attr "type" "return")
                   1131:   (set_attr "needs_delay_slot" "yes")
                   1132:   (set_attr "dump" "yes")])
                   1133: 
                   1134: (define_expand "prologue"
                   1135:   [(const_int 0)]
                   1136:   ""
                   1137:   "sh_expand_prologue (); DONE;")
                   1138: 
                   1139: (define_expand "epilogue"
                   1140:   [(return)]
                   1141:   ""
                   1142:   "sh_expand_epilogue ();")
                   1143: 
                   1144: (define_insn "blockage"
                   1145:   [(unspec_volatile [(const_int 0)] 0)]
                   1146:   ""
                   1147:   ""
                   1148:   [(set_attr "length" "0")])
                   1149: 
                   1150: 
                   1151: ;; ------------------------------------------------------------------------
                   1152: ;; Scc instructions
                   1153: ;; ------------------------------------------------------------------------
                   1154: 
                   1155: (define_insn ""
                   1156:   [(set (match_operand:SI 0 "arith_reg_operand" "=r")
                   1157:        (eq (reg:SI 18) (const_int 1)))]
                   1158:   ""
                   1159:   "movt        %0 ! ")
                   1160: 
                   1161: (define_expand "seq"
                   1162:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1163:        (match_dup 1))]
                   1164:   ""
                   1165:   "operands[1] = prepare_scc_operands (EQ);")
                   1166: 
                   1167: (define_expand "slt"
                   1168:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1169:        (match_dup 1))]
                   1170:   ""
                   1171:   "operands[1] = prepare_scc_operands (LT);")
                   1172: 
                   1173: (define_expand "sle"
                   1174:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1175:        (match_dup 1))]
                   1176:   ""
                   1177:   "operands[1] = prepare_scc_operands (LE);")
                   1178: 
                   1179: (define_expand "sgt"
                   1180:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1181:        (match_dup 1))]
                   1182:   ""
                   1183:   "operands[1] = prepare_scc_operands (GT);")
                   1184: 
                   1185: (define_expand "sge"
                   1186:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1187:        (match_dup 1))]
                   1188:   ""
                   1189:   "operands[1] = prepare_scc_operands (GE);")
                   1190: 
                   1191: (define_expand "sgtu"
                   1192:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1193:        (match_dup 1))]
                   1194:   ""
                   1195:   "operands[1] = prepare_scc_operands (GTU);")
                   1196: 
                   1197: (define_expand "sltu"
                   1198:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1199:        (match_dup 1))]
                   1200:   ""
                   1201:   "operands[1] = prepare_scc_operands (LTU);")
                   1202: 
                   1203: (define_expand "sleu"
                   1204:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1205:        (match_dup 1))]
                   1206:   ""
                   1207:   "operands[1] = prepare_scc_operands (LEU);")
                   1208: 
                   1209: (define_expand "sgeu"
                   1210:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1211:        (match_dup 1))]
                   1212:   ""
                   1213:   "operands[1] = prepare_scc_operands (GEU);")
                   1214: 
                   1215: (define_expand "sne"
                   1216:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1217:        (match_dup 1))
                   1218:    (set (match_dup 0) (xor:SI (match_dup 0) (const_int 1)))]
                   1219:   ""
                   1220:   "operands[1] = prepare_scc_operands (EQ);")
                   1221: 
                   1222: ; these patterns give better code then gcc invents if
                   1223: ; left to its own devices
                   1224: 
                   1225: (define_insn "anddi3"
                   1226:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                   1227:        (and:DI (match_operand:DI 1 "arith_reg_operand" "%0")
                   1228:                (match_operand:DI 2 "arith_reg_operand" "r")))]
                   1229:   ""
                   1230:   "and %2,%0\;and      %R2,%R0"
                   1231:   [(set_attr "length" "4")])
                   1232: 
                   1233: (define_insn "iordi3"
                   1234:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                   1235:        (ior:DI (match_operand:DI 1 "arith_reg_operand" "%0")
                   1236:                (match_operand:DI 2 "arith_reg_operand" "r")))]
                   1237:   ""
                   1238:   "or  %2,%0\;or       %R2,%R0"
                   1239:   [(set_attr "length" "4")])
                   1240: 
                   1241: (define_insn "xordi3"
                   1242:   [(set (match_operand:DI 0 "arith_reg_operand" "=r")
                   1243:        (xor:DI (match_operand:DI 1 "arith_reg_operand" "%0")
                   1244:                (match_operand:DI 2 "arith_reg_operand" "r")))]
                   1245:   ""
                   1246:   "xor %2,%0\;xor      %R2,%R0"
                   1247:   [(set_attr "length" "4")])
                   1248: 
                   1249: 
                   1250: ;; ------------------------------------------------------------------------
                   1251: ;; Block move
                   1252: ;; ------------------------------------------------------------------------
                   1253: 
                   1254: (define_expand "movstrsi"
                   1255:   [(parallel [(set (mem:BLK (match_operand:BLK 0 "general_operand" ""))
                   1256:                   (mem:BLK (match_operand:BLK 1 "general_operand" "")))
                   1257:             (use (match_operand:SI 2 "general_operand" ""))
                   1258:             (use (match_operand:SI 3 "immediate_operand" ""))
                   1259:   ])]
                   1260:   ""
                   1261:   "
                   1262: {
                   1263:   rtx dest_mem = operands[0];
                   1264:   rtx src_mem = operands[1];
                   1265:   operands[0] = copy_to_mode_reg (SImode, XEXP (operands[0], 0));
                   1266:   operands[1] = copy_to_mode_reg (SImode, XEXP (operands[1], 0));
                   1267:   expand_block_move (dest_mem, src_mem, operands);
                   1268:   DONE;
                   1269: }")
                   1270: 
                   1271: 
                   1272: 
                   1273: 
                   1274:    
                   1275: ;; -------------------------------------------------------------------------
                   1276: ;; Peepholes
                   1277: ;; -------------------------------------------------------------------------
                   1278: 
                   1279: 
                   1280: (define_peephole 
                   1281:   [(set (match_operand:QI 0 "arith_reg_operand" "")
                   1282:        (mem:QI (match_operand:SI 1 "arith_reg_operand" "")))
                   1283:    (set (match_dup 1) (plus:SI (match_dup 1) (const_int 1)))]
                   1284:   "REGNO(operands[1]) != REGNO(operands[0])"
                   1285:   "mov.b       @%1+,%0")
                   1286: 
                   1287: (define_peephole 
                   1288:   [(set (match_operand:HI 0 "arith_reg_operand" "")
                   1289:        (mem:HI (match_operand:SI 1 "arith_reg_operand" "")))
                   1290:    (set (match_dup 1) (plus:SI (match_dup 1) (const_int 2)))]
                   1291:   "REGNO(operands[1]) != REGNO(operands[0])"
                   1292:   "mov.w       @%1+,%0")
                   1293: 
                   1294: (define_peephole 
                   1295:   [(set (match_operand:SI 0 "arith_reg_operand" "")
                   1296:        (mem:SI (match_operand:SI 1 "arith_reg_operand" "")))
                   1297:    (set (match_dup 1) (plus:SI (match_dup 1) (const_int 4)))]
                   1298:   "REGNO(operands[1]) != REGNO(operands[0])"
                   1299:   "mov.l       @%1+,%0")
                   1300: 
                   1301: (define_peephole
                   1302:   [(set (match_operand:QI 0 "register_operand" "=r")
                   1303:        (match_operand:QI 1 "general_operand" "g"))
                   1304:    (set (match_operand:SI 2 "register_operand" "=r")
                   1305:        (sign_extend:SI (match_dup 0)))]
                   1306:   "REGNO(operands[0]) == REGNO(operands[2])"
                   1307:   "mov.b       %1,%0")
                   1308: 
                   1309: (define_peephole 
                   1310:   [(set (match_operand:QI 0 "register_operand" "=r")
                   1311:        (match_operand:QI 1 "general_operand" "g"))
                   1312:    (set (match_operand:SI 2 "register_operand" "=r")
                   1313:        (sign_extend:SI (match_dup 0)))]
                   1314:   "REGNO(operands[0]) != REGNO(operands[2]) 
                   1315:    && dead_or_set_p (insn, operands[0])"
                   1316:   "mov.b       %1,%2")
                   1317: 
                   1318: ; notice when a mov.b could be done with a displacement
                   1319: 
                   1320: (define_peephole
                   1321:   [(set (match_operand:SI 0 "register_operand" "=r")
                   1322:        (plus:SI (match_dup 0)
                   1323:                 (match_operand:SI 1 "byte_index_operand" "i")))
                   1324:    (set (mem:QI (match_dup 0)) (reg:QI 0))]
                   1325:   "dead_or_set_p(insn, operands[0])"
                   1326:   "mov.b       r0,@(%O1,%0)")
                   1327: 
                   1328: (define_peephole
                   1329:   [(set (match_operand:SI 0 "register_operand" "=r")
                   1330:        (plus:SI (match_dup 0)
                   1331:                 (match_operand:SI 1 "byte_index_operand" "i")))
                   1332:    (set (reg:QI 0) (mem:QI (match_dup 0)))]
                   1333:   "dead_or_set_p(insn, operands[0])"
                   1334:   "mov.b       @(%O1,%0),r0")
                   1335:   
                   1336: 
                   1337: 
                   1338: 

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.