23 KiB
;; GCC machine description for CRX. ;; Copyright (C) 1988, 1994, 1995, 1996, 1997, 1998, 1999, 2000, ;; 2001, 2002, 2003, 2004, 2007 ;; Free Software Foundation, Inc. ;; ;; This file is part of GCC. ;; ;; GCC is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation; either version 3, or (at your option) ;; any later version. ;; ;; GCC is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; ;; You should have received a copy of the GNU General Public License ;; along with GCC; see the file COPYING3. If not see ;; http://www.gnu.org/licenses/. */
;; Register numbers
(define_constants [(SP_REGNUM 15) ; Stack pointer (RA_REGNUM 14) ; Return address (LO_REGNUM 16) ; LO register (HI_REGNUM 17) ; HI register (CC_REGNUM 18) ; Condition code register ] )
(define_attr "length" "" ( const_int 6 ))
(define_asm_attributes [(set_attr "length" "6")] )
;; Predicates
(define_predicate "u4bits_operand" (match_code "const_int,const_double") { if (GET_CODE (op) == CONST_DOUBLE) return crx_const_double_ok (op); return (UNSIGNED_INT_FITS_N_BITS(INTVAL(op), 4)) ? 1 : 0; } )
(define_predicate "cst4_operand" (and (match_code "const_int") (match_test "INT_CST4(INTVAL(op))")))
(define_predicate "reg_or_u4bits_operand" (ior (match_operand 0 "u4bits_operand") (match_operand 0 "register_operand")))
(define_predicate "reg_or_cst4_operand" (ior (match_operand 0 "cst4_operand") (match_operand 0 "register_operand")))
(define_predicate "reg_or_sym_operand" (ior (match_code "symbol_ref") (match_operand 0 "register_operand")))
(define_predicate "cc_reg_operand" (and (match_code "reg") (match_test "REGNO (op) == CC_REGNUM")))
(define_predicate "nosp_reg_operand" (and (match_operand 0 "register_operand") (match_test "REGNO (op) != SP_REGNUM")))
(define_predicate "store_operand" (and (match_operand 0 "memory_operand") (not (match_operand 0 "push_operand"))))
;; Mode Macro Definitions
(define_mode_iterator ALLMT [QI HI SI SF DI DF]) (define_mode_iterator CRXMM [QI HI SI SF]) (define_mode_iterator CRXIM [QI HI SI]) (define_mode_iterator DIDFM [DI DF]) (define_mode_iterator SISFM [SI SF]) (define_mode_iterator SHORT [QI HI])
(define_mode_attr tIsa [(QI "b") (HI "w") (SI "d") (SF "d")]) (define_mode_attr lImmArith [(QI "4") (HI "4") (SI "6")]) (define_mode_attr lImmRotl [(QI "2") (HI "2") (SI "4")]) (define_mode_attr IJK [(QI "I") (HI "J") (SI "K")]) (define_mode_attr iF [(QI "i") (HI "i") (SI "i") (DI "i") (SF "F") (DF "F")]) (define_mode_attr JG [(QI "J") (HI "J") (SI "J") (DI "J") (SF "G") (DF "G")]) ; In HI or QI mode we push 4 bytes. (define_mode_attr pushCnstr [(QI "X") (HI "X") (SI "<") (SF "<") (DI "<") (DF "<")]) (define_mode_attr tpush [(QI "") (HI "") (SI "") (SF "") (DI "sp, ") (DF "sp, ")]) (define_mode_attr lpush [(QI "2") (HI "2") (SI "2") (SF "2") (DI "4") (DF "4")])
;; Code Macro Definitions
(define_code_iterator sz_xtnd [sign_extend zero_extend]) (define_code_attr sIsa [(sign_extend "") (zero_extend "u")]) (define_code_attr sPat [(sign_extend "s") (zero_extend "u")]) (define_code_attr szPat [(sign_extend "") (zero_extend "zero_")]) (define_code_attr szIsa [(sign_extend "s") (zero_extend "z")])
(define_code_iterator sh_oprnd [ashift ashiftrt lshiftrt]) (define_code_attr shIsa [(ashift "ll") (ashiftrt "ra") (lshiftrt "rl")]) (define_code_attr shPat [(ashift "ashl") (ashiftrt "ashr") (lshiftrt "lshr")])
(define_code_iterator mima_oprnd [smax umax smin umin]) (define_code_attr mimaIsa [(smax "maxs") (umax "maxu") (smin "mins") (umin "minu")])
;; Addition Instructions
(define_insn "adddi3" [(set (match_operand:DI 0 "register_operand" "=r,r") (plus:DI (match_operand:DI 1 "register_operand" "%0,0") (match_operand:DI 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "addd\t%L2, %L1;addcd\t%H2, %H1" [(set_attr "length" "4,12")] )
(define_insn "add3" [(set (match_operand:CRXIM 0 "register_operand" "=r,r") (plus:CRXIM (match_operand:CRXIM 1 "register_operand" "%0,0") (match_operand:CRXIM 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "add\t%2, %0" [(set_attr "length" "2,")] )
;; Subtract Instructions
(define_insn "subdi3" [(set (match_operand:DI 0 "register_operand" "=r,r") (minus:DI (match_operand:DI 1 "register_operand" "0,0") (match_operand:DI 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "subd\t%L2, %L1;subcd\t%H2, %H1" [(set_attr "length" "4,12")] )
(define_insn "sub3" [(set (match_operand:CRXIM 0 "register_operand" "=r,r") (minus:CRXIM (match_operand:CRXIM 1 "register_operand" "0,0") (match_operand:CRXIM 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "sub\t%2, %0" [(set_attr "length" "2,")] )
;; Multiply Instructions
(define_insn "mul3" [(set (match_operand:CRXIM 0 "register_operand" "=r,r") (mult:CRXIM (match_operand:CRXIM 1 "register_operand" "%0,0") (match_operand:CRXIM 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "mul\t%2, %0" [(set_attr "length" "2,")] )
;; Widening-multiplication Instructions
(define_insn "mulsidi3" [(set (match_operand:DI 0 "register_operand" "=k") (mult:DI (sz_xtnd:DI (match_operand:SI 1 "register_operand" "%r")) (sz_xtnd:DI (match_operand:SI 2 "register_operand" "r")))) (clobber (reg:CC CC_REGNUM))] "" "mulld\t%2, %1" [(set_attr "length" "4")] )
(define_insn "mulhisi3" [(set (match_operand:SI 0 "register_operand" "=r") (mult:SI (sz_xtnd:SI (match_operand:HI 1 "register_operand" "%0")) (sz_xtnd:SI (match_operand:HI 2 "register_operand" "r")))) (clobber (reg:CC CC_REGNUM))] "" "mulwd\t%2, %0" [(set_attr "length" "4")] )
(define_insn "mulqihi3" [(set (match_operand:HI 0 "register_operand" "=r") (mult:HI (sz_xtnd:HI (match_operand:QI 1 "register_operand" "%0")) (sz_xtnd:HI (match_operand:QI 2 "register_operand" "r")))) (clobber (reg:CC CC_REGNUM))] "" "mulbw\t%2, %0" [(set_attr "length" "4")] )
;; Logical Instructions - and
(define_insn "and3" [(set (match_operand:CRXIM 0 "register_operand" "=r,r") (and:CRXIM (match_operand:CRXIM 1 "register_operand" "%0,0") (match_operand:CRXIM 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "and\t%2, %0" [(set_attr "length" "2,")] )
;; Logical Instructions - or
(define_insn "ior3" [(set (match_operand:CRXIM 0 "register_operand" "=r,r") (ior:CRXIM (match_operand:CRXIM 1 "register_operand" "%0,0") (match_operand:CRXIM 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "or\t%2, %0" [(set_attr "length" "2,")] )
;; Logical Instructions - xor
(define_insn "xor3" [(set (match_operand:CRXIM 0 "register_operand" "=r,r") (xor:CRXIM (match_operand:CRXIM 1 "register_operand" "%0,0") (match_operand:CRXIM 2 "nonmemory_operand" "r,i"))) (clobber (reg:CC CC_REGNUM))] "" "xor\t%2, %0" [(set_attr "length" "2,")] )
;; Sign and Zero Extend Instructions
(define_insn "extendhisi2" [(set (match_operand:SI 0 "register_operand" "=r") (sz_xtnd:SI (match_operand:HI 1 "register_operand" "r"))) (clobber (reg:CC CC_REGNUM))] "" "extwd\t%1, %0" [(set_attr "length" "4")] )
(define_insn "extendqisi2" [(set (match_operand:SI 0 "register_operand" "=r") (sz_xtnd:SI (match_operand:QI 1 "register_operand" "r"))) (clobber (reg:CC CC_REGNUM))] "" "extbd\t%1, %0" [(set_attr "length" "4")] )
(define_insn "extendqihi2" [(set (match_operand:HI 0 "register_operand" "=r") (sz_xtnd:HI (match_operand:QI 1 "register_operand" "r"))) (clobber (reg:CC CC_REGNUM))] "" "extbw\t%1, %0" [(set_attr "length" "4")] )
;; Negation Instructions
(define_insn "neg2" [(set (match_operand:CRXIM 0 "register_operand" "=r") (neg:CRXIM (match_operand:CRXIM 1 "register_operand" "r"))) (clobber (reg:CC CC_REGNUM))] "" "neg\t%1, %0" [(set_attr "length" "4")] )
;; Absolute Instructions
(define_insn "abs2" [(set (match_operand:CRXIM 0 "register_operand" "=r") (abs:CRXIM (match_operand:CRXIM 1 "register_operand" "r"))) (clobber (reg:CC CC_REGNUM))] "" "abs\t%1, %0" [(set_attr "length" "4")] )
;; Max and Min Instructions
(define_insn "3"
[(set (match_operand:CRXIM 0 "register_operand" "=r")
(mima_oprnd:CRXIM (match_operand:CRXIM 1 "register_operand" "%0")
(match_operand:CRXIM 2 "register_operand" "r")))]
""
"\t%2, %0"
[(set_attr "length" "4")]
)
;; One's Complement
(define_insn "one_cmpl2"
[(set (match_operand:CRXIM 0 "register_operand" "=r")
(not:CRXIM (match_operand:CRXIM 1 "register_operand" "0")))
(clobber (reg:CC CC_REGNUM))]
""
"xor\t$-1, %0"
[(set_attr "length" "2")]
)
;; Rotate Instructions
(define_insn "rotl3"
[(set (match_operand:CRXIM 0 "register_operand" "=r,r")
(rotate:CRXIM (match_operand:CRXIM 1 "register_operand" "0,0")
(match_operand:CRXIM 2 "nonmemory_operand" "r,")))
(clobber (reg:CC CC_REGNUM))]
""
"@
rotl\t%2, %0
rot\t%2, %0"
[(set_attr "length" "4,")]
)
(define_insn "rotr3"
[(set (match_operand:CRXIM 0 "register_operand" "=r")
(rotatert:CRXIM (match_operand:CRXIM 1 "register_operand" "0")
(match_operand:CRXIM 2 "register_operand" "r")))
(clobber (reg:CC CC_REGNUM))]
""
"rotr\t%2, %0"
[(set_attr "length" "4")]
)
;; Arithmetic Left and Right Shift Instructions
(define_insn "3"
[(set (match_operand:CRXIM 0 "register_operand" "=r,r")
(sh_oprnd:CRXIM (match_operand:CRXIM 1 "register_operand" "0,0")
(match_operand:QI 2 "nonmemory_operand" "r,")))
(clobber (reg:CC CC_REGNUM))]
""
"s\t%2, %0"
[(set_attr "length" "2,2")]
)
;; Bit Set Instructions
(define_insn "extv"
[(set (match_operand:SI 0 "register_operand" "=r")
(sign_extract:SI (match_operand:SI 1 "register_operand" "r")
(match_operand:SI 2 "const_int_operand" "n")
(match_operand:SI 3 "const_int_operand" "n")))]
""
{
static char buf[100];
int strpntr;
int size = INTVAL (operands[2]);
int pos = INTVAL (operands[3]);
strpntr = sprintf (buf, "ram\t$%d, $31, $%d, %%1, %%0;",
BITS_PER_WORD - (size + pos), BITS_PER_WORD - size);
sprintf (buf + strpntr, "srad\t$%d, %%0", BITS_PER_WORD - size);
return buf;
}
[(set_attr "length" "6")]
)
(define_insn "extzv"
[(set (match_operand:SI 0 "register_operand" "=r")
(zero_extract:SI (match_operand:SI 1 "register_operand" "r")
(match_operand:SI 2 "const_int_operand" "n")
(match_operand:SI 3 "const_int_operand" "n")))]
""
{
static char buf[40];
int size = INTVAL (operands[2]);
int pos = INTVAL (operands[3]);
sprintf (buf, "ram\t$%d, $%d, $0, %%1, %%0",
(BITS_PER_WORD - pos) % BITS_PER_WORD, size - 1);
return buf;
}
[(set_attr "length" "4")]
)
(define_insn "insv"
[(set (zero_extract:SI (match_operand:SI 0 "register_operand" "+r")
(match_operand:SI 1 "const_int_operand" "n")
(match_operand:SI 2 "const_int_operand" "n"))
(match_operand:SI 3 "register_operand" "r"))]
""
{
static char buf[40];
int size = INTVAL (operands[1]);
int pos = INTVAL (operands[2]);
sprintf (buf, "rim\t$%d, $%d, $%d, %%3, %%0",
pos, size + pos - 1, pos);
return buf;
}
[(set_attr "length" "4")]
)
;; Move Instructions
(define_expand "mov"
[(set (match_operand:ALLMT 0 "nonimmediate_operand" "")
(match_operand:ALLMT 1 "general_operand" ""))]
""
{
if (!(reload_in_progress || reload_completed))
{
if (!register_operand (operands[0], mode))
{
if (push_operand (operands[0], mode) ?
!nosp_reg_operand (operands[1], mode) :
!reg_or_u4bits_operand (operands[1], mode))
{
operands[1] = copy_to_mode_reg (mode, operands[1]);
}
}
}
}
)
(define_insn "push_internal"
[(set (match_operand:ALLMT 0 "push_operand" "=")
(match_operand:ALLMT 1 "nosp_reg_operand" "b"))]
""
"push\t%p1"
[(set_attr "length" "")]
)
(define_insn "mov_regs"
[(set (match_operand:SISFM 0 "register_operand" "=r, r, r, k")
(match_operand:SISFM 1 "nonmemory_operand" "r, , k, r"))]
""
"@
movd\t%1, %0
movd\t%1, %0
mfpr\t%1, %0
mtpr\t%1, %0"
[(set_attr "length" "2,6,4,4")]
)
(define_insn "mov_regs"
[(set (match_operand:DIDFM 0 "register_operand" "=r, r, r, k")
(match_operand:DIDFM 1 "nonmemory_operand" "r, , k, r"))]
""
{
switch (which_alternative)
{
case 0: if (REGNO (operands[0]) > REGNO (operands[1]))
return "movd\t%H1, %H0;movd\t%L1, %L0";
else
return "movd\t%L1, %L0;movd\t%H1, %H0";
case 1: return "movd\t%H1, %H0;movd\t%L1, %L0";
case 2: return "mfpr\t%H1, %H0;mfpr\t%L1, %L0";
case 3: return "mtpr\t%H1, %H0;mtpr\t%L1, %L0";
default: gcc_unreachable ();
}
}
[(set_attr "length" "4,12,8,8")]
)
(define_insn "mov_regs" ; no HI/QI mode in HILO regs
[(set (match_operand:SHORT 0 "register_operand" "=r, r")
(match_operand:SHORT 1 "nonmemory_operand" "r, i"))]
""
"mov\t%1, %0"
[(set_attr "length" "2,")]
)
(define_insn "mov_load"
[(set (match_operand:CRXMM 0 "register_operand" "=r")
(match_operand:CRXMM 1 "memory_operand" "m"))]
""
"load\t%1, %0"
[(set_attr "length" "6")]
)
(define_insn "mov_load"
[(set (match_operand:DIDFM 0 "register_operand" "=r")
(match_operand:DIDFM 1 "memory_operand" "m"))]
""
{
rtx first_dest_reg = gen_rtx_REG (SImode, REGNO (operands[0]));
if (reg_overlap_mentioned_p (first_dest_reg, operands[1]))
return "loadd\t%H1, %H0;loadd\t%L1, %L0";
return "loadd\t%L1, %L0;loadd\t%H1, %H0";
}
[(set_attr "length" "12")]
)
(define_insn "mov_store"
[(set (match_operand:CRXMM 0 "store_operand" "=m, m")
(match_operand:CRXMM 1 "reg_or_u4bits_operand" "r, "))]
""
"stor\t%1, %0"
[(set_attr "length" "6")]
)
(define_insn "mov_store"
[(set (match_operand:DIDFM 0 "store_operand" "=m, m")
(match_operand:DIDFM 1 "reg_or_u4bits_operand" "r, "))]
""
"stord\t%H1, %H0;stord\t%L1, %L0"
[(set_attr "length" "12")]
)
;; Movmem Instruction
(define_expand "movmemsi"
[(use (match_operand:BLK 0 "memory_operand" ""))
(use (match_operand:BLK 1 "memory_operand" ""))
(use (match_operand:SI 2 "nonmemory_operand" ""))
(use (match_operand:SI 3 "const_int_operand" ""))]
""
{
if (crx_expand_movmem (operands[0], operands[1], operands[2], operands[3]))
DONE;
else
FAIL;
}
)
;; Compare and Branch Instructions
(define_insn "cbranchcc4"
[(set (pc)
(if_then_else (match_operator 0 "ordered_comparison_operator"
[(match_operand:CC 1 "cc_reg_operand" "r")
(match_operand 2 "cst4_operand" "L")])
(label_ref (match_operand 3 ""))
(pc)))]
""
"b%d0\t%l3"
[(set_attr "length" "6")]
)
(define_insn "cbranch4"
[(set (pc)
(if_then_else (match_operator 0 "ordered_comparison_operator"
[(match_operand:CRXIM 1 "register_operand" "r")
(match_operand:CRXIM 2 "reg_or_cst4_operand" "rL")])
(label_ref (match_operand 3 "" ""))
(pc)))
(clobber (reg:CC CC_REGNUM))]
""
"cmpb%d0\t%2, %1, %l3"
[(set_attr "length" "6")]
)
;; Scond Instructions
(define_expand "cstore4"
[(set (reg:CC CC_REGNUM)
(compare:CC (match_operand:CRXIM 2 "register_operand" "")
(match_operand:CRXIM 3 "nonmemory_operand" "")))
(set (match_operand:SI 0 "register_operand")
(match_operator:SI 1 "ordered_comparison_operator"
[(reg:CC CC_REGNUM) (const_int 0)]))]
""
""
)
(define_insn "cmp_internal"
[(set (reg:CC CC_REGNUM)
(compare:CC (match_operand:CRXIM 0 "register_operand" "r,r")
(match_operand:CRXIM 1 "nonmemory_operand" "r,i")))]
""
"cmp\t%1, %0"
[(set_attr "length" "2,")]
)
(define_insn "sCOND_internal"
[(set (match_operand:SI 0 "register_operand" "=r")
(match_operator:SI 1 "ordered_comparison_operator"
[(reg:CC CC_REGNUM) (const_int 0)]))]
""
"s%d1\t%0"
[(set_attr "length" "2")]
)
;; Jumps and Branches
(define_insn "indirect_jump_return"
[(parallel
[(set (pc)
(reg:SI RA_REGNUM))
(return)])
]
"reload_completed"
"jump\tra"
[(set_attr "length" "2")]
)
(define_insn "indirect_jump"
[(set (pc)
(match_operand:SI 0 "reg_or_sym_operand" "r,i"))]
""
"@
jump\t%0
br\t%a0"
[(set_attr "length" "2,6")]
)
(define_insn "interrupt_return"
[(parallel
[(unspec_volatile [(const_int 0)] 0)
(return)])]
""
{
return crx_prepare_push_pop_string (1);
}
[(set_attr "length" "14")]
)
(define_insn "jump_to_imm"
[(set (pc)
(match_operand 0 "immediate_operand" "i"))]
""
"br\t%c0"
[(set_attr "length" "6")]
)
(define_insn "jump"
[(set (pc)
(label_ref (match_operand 0 "" "")))]
""
"br\t%l0"
[(set_attr "length" "6")]
)
;; Function Prologue and Epilogue
(define_expand "prologue"
[(const_int 0)]
""
{
crx_expand_prologue ();
DONE;
}
)
(define_insn "push_for_prologue"
[(parallel
[(set (reg:SI SP_REGNUM)
(minus:SI (reg:SI SP_REGNUM)
(match_operand:SI 0 "immediate_operand" "i")))])]
"reload_completed"
{
return crx_prepare_push_pop_string (0);
}
[(set_attr "length" "4")]
)
(define_expand "epilogue"
[(return)]
""
{
crx_expand_epilogue ();
DONE;
}
)
(define_insn "pop_and_popret_return"
[(parallel
[(set (reg:SI SP_REGNUM)
(plus:SI (reg:SI SP_REGNUM)
(match_operand:SI 0 "immediate_operand" "i")))
(use (reg:SI RA_REGNUM))
(return)])
]
"reload_completed"
{
return crx_prepare_push_pop_string (1);
}
[(set_attr "length" "4")]
)
(define_insn "popret_RA_return"
[(parallel
[(use (reg:SI RA_REGNUM))
(return)])
]
"reload_completed"
"popret\tra"
[(set_attr "length" "2")]
)
;; Table Jump
(define_insn "tablejump"
[(set (pc)
(match_operand:SI 0 "register_operand" "r"))
(use (label_ref:SI (match_operand 1 "" "" )))]
""
"jump\t%0"
[(set_attr "length" "2")]
)
;; Call Instructions
(define_expand "call"
[(call (match_operand:QI 0 "memory_operand" "")
(match_operand 1 "" ""))]
""
{
emit_call_insn (gen_crx_call (operands[0], operands[1]));
DONE;
}
)
(define_expand "crx_call"
[(parallel
[(call (match_operand:QI 0 "memory_operand" "")
(match_operand 1 "" ""))
(clobber (reg:SI RA_REGNUM))])]
""
""
)
(define_insn "crx_call_insn_branch"
[(call (mem:QI (match_operand:SI 0 "immediate_operand" "i"))
(match_operand 1 "" ""))
(clobber (match_operand:SI 2 "register_operand" "+r"))]
""
"bal\tra, %a0"
[(set_attr "length" "6")]
)
(define_insn "crx_call_insn_jump"
[(call (mem:QI (match_operand:SI 0 "register_operand" "r"))
(match_operand 1 "" ""))
(clobber (match_operand:SI 2 "register_operand" "+r"))]
""
"jal\t%0"
[(set_attr "length" "2")]
)
(define_insn "crx_call_insn_jalid"
[(call (mem:QI (mem:SI (plus:SI
(match_operand:SI 0 "register_operand" "r")
(match_operand:SI 1 "register_operand" "r"))))
(match_operand 2 "" ""))
(clobber (match_operand:SI 3 "register_operand" "+r"))]
""
"jalid\t%0, %1"
[(set_attr "length" "4")]
)
;; Call Value Instructions
(define_expand "call_value"
[(set (match_operand 0 "general_operand" "")
(call (match_operand:QI 1 "memory_operand" "")
(match_operand 2 "" "")))]
""
{
emit_call_insn (gen_crx_call_value (operands[0], operands[1], operands[2]));
DONE;
}
)
(define_expand "crx_call_value"
[(parallel
[(set (match_operand 0 "general_operand" "")
(call (match_operand 1 "memory_operand" "")
(match_operand 2 "" "")))
(clobber (reg:SI RA_REGNUM))])]
""
""
)
(define_insn "crx_call_value_insn_branch"
[(set (match_operand 0 "" "=g")
(call (mem:QI (match_operand:SI 1 "immediate_operand" "i"))
(match_operand 2 "" "")))
(clobber (match_operand:SI 3 "register_operand" "+r"))]
""
"bal\tra, %a1"
[(set_attr "length" "6")]
)
(define_insn "crx_call_value_insn_jump"
[(set (match_operand 0 "" "=g")
(call (mem:QI (match_operand:SI 1 "register_operand" "r"))
(match_operand 2 "" "")))
(clobber (match_operand:SI 3 "register_operand" "+r"))]
""
"jal\t%1"
[(set_attr "length" "2")]
)
(define_insn "crx_call_value_insn_jalid"
[(set (match_operand 0 "" "=g")
(call (mem:QI (mem:SI (plus:SI
(match_operand:SI 1 "register_operand" "r")
(match_operand:SI 2 "register_operand" "r"))))
(match_operand 3 "" "")))
(clobber (match_operand:SI 4 "register_operand" "+r"))]
""
"jalid\t%0, %1"
[(set_attr "length" "4")]
)
;; Nop
(define_insn "nop"
[(const_int 0)]
""
""
)
;; Multiply and Accumulate Instructions
(define_insn "madsidi3"
[(set (match_operand:DI 0 "register_operand" "+k")
(plus:DI
(mult:DI (sz_xtnd:DI (match_operand:SI 1 "register_operand" "%r"))
(sz_xtnd:DI (match_operand:SI 2 "register_operand" "r")))
(match_dup 0)))
(clobber (reg:CC CC_REGNUM))]
"TARGET_MAC"
"macd\t%2, %1"
[(set_attr "length" "4")]
)
(define_insn "madhisi3"
[(set (match_operand:SI 0 "register_operand" "+l")
(plus:SI
(mult:SI (sz_xtnd:SI (match_operand:HI 1 "register_operand" "%r"))
(sz_xtnd:SI (match_operand:HI 2 "register_operand" "r")))
(match_dup 0)))
(clobber (reg:CC CC_REGNUM))]
"TARGET_MAC"
"macw\t%2, %1"
[(set_attr "length" "4")]
)
(define_insn "madqihi3"
[(set (match_operand:HI 0 "register_operand" "+l")
(plus:HI
(mult:HI (sz_xtnd:HI (match_operand:QI 1 "register_operand" "%r"))
(sz_xtnd:HI (match_operand:QI 2 "register_operand" "r")))
(match_dup 0)))
(clobber (reg:CC CC_REGNUM))]
"TARGET_MAC"
"macb\t%2, %1"
[(set_attr "length" "4")]
)
;; Loop Instructions
(define_expand "doloop_end"
[(use (match_operand 0 "" "")) ; loop pseudo
(use (match_operand 1 "" "")) ; iterations; zero if unknown
(use (match_operand 2 "" "")) ; max iterations
(use (match_operand 3 "" "")) ; loop level
(use (match_operand 4 "" ""))] ; label
""
{
if (INTVAL (operands[3]) > crx_loop_nesting)
FAIL;
switch (GET_MODE (operands[0]))
{
case SImode:
emit_jump_insn (gen_doloop_end_si (operands[4], operands[0]));
break;
case HImode:
emit_jump_insn (gen_doloop_end_hi (operands[4], operands[0]));
break;
case QImode:
emit_jump_insn (gen_doloop_end_qi (operands[4], operands[0]));
break;
default:
FAIL;
}
DONE;
}
)
; CRX dbnz[bwd] used explicitly (see above) but also by the combiner.
(define_insn "doloop_end_"
[(set (pc)
(if_then_else (ne (match_operand:CRXIM 1 "register_operand" "+r,!m")
(const_int 1))
(label_ref (match_operand 0 "" ""))
(pc)))
(set (match_dup 1) (plus:CRXIM (match_dup 1) (const_int -1)))
(clobber (match_scratch:CRXIM 2 "=X,r"))
(clobber (reg:CC CC_REGNUM))]
""
"@
dbnz\t%1, %l0
load\t%1, %2;add\t$-1, %2;stor\t%2, %1;bne\t%l0"
[(set_attr "length" "6, 12")]
)