URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [config/] [sparc/] [sparc.md] - Rev 709
Compare with Previous | Blame | View Log
;; Machine description for SPARC chip for GCC;; Copyright (C) 1987, 1988, 1989, 1992, 1993, 1994, 1995, 1996, 1997, 1998,;; 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010,;; 2011 Free Software Foundation, Inc.;; Contributed by Michael Tiemann (tiemann@cygnus.com);; 64-bit SPARC-V9 support by Michael Tiemann, Jim Wilson, and Doug Evans,;; at Cygnus Support.;; 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/>.;;- See file "rtl.def" for documentation on define_insn, match_*, et. al.(define_constants[(UNSPEC_MOVE_PIC 0)(UNSPEC_UPDATE_RETURN 1)(UNSPEC_LOAD_PCREL_SYM 2)(UNSPEC_FRAME_BLOCKAGE 3)(UNSPEC_MOVE_PIC_LABEL 5)(UNSPEC_SETH44 6)(UNSPEC_SETM44 7)(UNSPEC_SETHH 9)(UNSPEC_SETLM 10)(UNSPEC_EMB_HISUM 11)(UNSPEC_EMB_TEXTUHI 13)(UNSPEC_EMB_TEXTHI 14)(UNSPEC_EMB_TEXTULO 15)(UNSPEC_EMB_SETHM 18)(UNSPEC_MOVE_GOTDATA 19)(UNSPEC_MEMBAR 20)(UNSPEC_ATOMIC 21)(UNSPEC_TLSGD 30)(UNSPEC_TLSLDM 31)(UNSPEC_TLSLDO 32)(UNSPEC_TLSIE 33)(UNSPEC_TLSLE 34)(UNSPEC_TLSLD_BASE 35)(UNSPEC_FPACK16 40)(UNSPEC_FPACK32 41)(UNSPEC_FPACKFIX 42)(UNSPEC_FEXPAND 43)(UNSPEC_MUL16AU 44)(UNSPEC_MUL16AL 45)(UNSPEC_MUL8UL 46)(UNSPEC_MULDUL 47)(UNSPEC_ALIGNDATA 48)(UNSPEC_FCMP 49)(UNSPEC_PDIST 50)(UNSPEC_EDGE8 51)(UNSPEC_EDGE8L 52)(UNSPEC_EDGE16 53)(UNSPEC_EDGE16L 54)(UNSPEC_EDGE32 55)(UNSPEC_EDGE32L 56)(UNSPEC_ARRAY8 57)(UNSPEC_ARRAY16 58)(UNSPEC_ARRAY32 59)(UNSPEC_SP_SET 60)(UNSPEC_SP_TEST 61)(UNSPEC_EDGE8N 70)(UNSPEC_EDGE8LN 71)(UNSPEC_EDGE16N 72)(UNSPEC_EDGE16LN 73)(UNSPEC_EDGE32N 74)(UNSPEC_EDGE32LN 75)(UNSPEC_BSHUFFLE 76)(UNSPEC_CMASK8 77)(UNSPEC_CMASK16 78)(UNSPEC_CMASK32 79)(UNSPEC_FCHKSM16 80)(UNSPEC_PDISTN 81)(UNSPEC_FUCMP 82)(UNSPEC_FHADD 83)(UNSPEC_FHSUB 84)(UNSPEC_XMUL 85)(UNSPEC_MUL8 86)(UNSPEC_MUL8SU 87)(UNSPEC_MULDSU 88)])(define_constants[(UNSPECV_BLOCKAGE 0)(UNSPECV_FLUSHW 1)(UNSPECV_FLUSH 4)(UNSPECV_SAVEW 6)(UNSPECV_CAS 8)(UNSPECV_SWAP 9)(UNSPECV_LDSTUB 10)(UNSPECV_PROBE_STACK_RANGE 11)])(define_constants[(G0_REG 0)(G1_REG 1)(G2_REG 2)(G3_REG 3)(G4_REG 4)(G5_REG 5)(G6_REG 6)(G7_REG 7)(O0_REG 8)(O1_REG 9)(O2_REG 10)(O3_REG 11)(O4_REG 12)(O5_REG 13)(O6_REG 14)(O7_REG 15)(L0_REG 16)(L1_REG 17)(L2_REG 18)(L3_REG 19)(L4_REG 20)(L5_REG 21)(L6_REG 22)(L7_REG 23)(I0_REG 24)(I1_REG 25)(I2_REG 26)(I3_REG 27)(I4_REG 28)(I5_REG 29)(I6_REG 30)(I7_REG 31)(F0_REG 32)(F1_REG 33)(F2_REG 34)(F3_REG 35)(F4_REG 36)(F5_REG 37)(F6_REG 38)(F7_REG 39)(F8_REG 40)(F9_REG 41)(F10_REG 42)(F11_REG 43)(F12_REG 44)(F13_REG 45)(F14_REG 46)(F15_REG 47)(F16_REG 48)(F17_REG 49)(F18_REG 50)(F19_REG 51)(F20_REG 52)(F21_REG 53)(F22_REG 54)(F23_REG 55)(F24_REG 56)(F25_REG 57)(F26_REG 58)(F27_REG 59)(F28_REG 60)(F29_REG 61)(F30_REG 62)(F31_REG 63)(F32_REG 64)(F34_REG 66)(F36_REG 68)(F38_REG 70)(F40_REG 72)(F42_REG 74)(F44_REG 76)(F46_REG 78)(F48_REG 80)(F50_REG 82)(F52_REG 84)(F54_REG 86)(F56_REG 88)(F58_REG 90)(F60_REG 92)(F62_REG 94)(FCC0_REG 96)(FCC1_REG 97)(FCC2_REG 98)(FCC3_REG 99)(CC_REG 100)(SFP_REG 101)(GSR_REG 102)])(define_mode_iterator P [(SI "Pmode == SImode") (DI "Pmode == DImode")])(define_mode_iterator I [QI HI SI DI])(define_mode_iterator F [SF DF TF]);; The upper 32 fp regs on the v9 can't hold SFmode values. To deal with this;; a second register class, EXTRA_FP_REGS, exists for the v9 chip. The name;; is a bit of a misnomer as it covers all 64 fp regs. The corresponding;; constraint letter is 'e'. To avoid any confusion, 'e' is used instead of;; 'f' for all DF/TFmode values, including those that are specific to the v8.;; Attribute for cpu type.;; These must match the values for enum processor_type in sparc.h.(define_attr "cpu""v7,cypress,v8,supersparc,hypersparc,leon,sparclite,f930,f934,sparclite86x,sparclet,tsc701,v9,ultrasparc,ultrasparc3,niagara,niagara2,niagara3,niagara4"(const (symbol_ref "sparc_cpu_attr")));; Attribute for the instruction set.;; At present we only need to distinguish v9/!v9, but for clarity we;; test TARGET_V8 too.(define_attr "isa" "v7,v8,v9,sparclet"(const(cond [(symbol_ref "TARGET_V9") (const_string "v9")(symbol_ref "TARGET_V8") (const_string "v8")(symbol_ref "TARGET_SPARCLET") (const_string "sparclet")](const_string "v7"))))(define_attr "cpu_feature" "none,fpu,fpunotv9,v9,vis,vis3" (const_string "none"))(define_attr "enabled" ""(cond [(eq_attr "cpu_feature" "none") (const_int 1)(eq_attr "cpu_feature" "fpu") (symbol_ref "TARGET_FPU")(eq_attr "cpu_feature" "fpunotv9") (symbol_ref "TARGET_FPU && ! TARGET_V9")(eq_attr "cpu_feature" "v9") (symbol_ref "TARGET_V9")(eq_attr "cpu_feature" "vis") (symbol_ref "TARGET_VIS")(eq_attr "cpu_feature" "vis3") (symbol_ref "TARGET_VIS3")](const_int 0)));; Insn type.(define_attr "type""ialu,compare,shift,load,sload,store,uncond_branch,branch,call,sibcall,call_no_delay_slot,return,imul,idiv,fpload,fpstore,fp,fpmove,fpcmove,fpcrmove,fpcmp,fpmul,fpdivs,fpdivd,fpsqrts,fpsqrtd,fga,fgm_pack,fgm_mul,fgm_pdist,fgm_cmp,edge,edgen,gsr,array,cmove,ialuX,multi,savew,flushw,iflush,trap"(const_string "ialu"));; True if branch/call has empty delay slot and will emit a nop in it(define_attr "empty_delay_slot" "false,true"(symbol_ref "(empty_delay_slot (insn)? EMPTY_DELAY_SLOT_TRUE : EMPTY_DELAY_SLOT_FALSE)"))(define_attr "branch_type" "none,icc,fcc,reg"(const_string "none"))(define_attr "pic" "false,true"(symbol_ref "(flag_pic != 0 ? PIC_TRUE : PIC_FALSE)"))(define_attr "calls_alloca" "false,true"(symbol_ref "(cfun->calls_alloca != 0? CALLS_ALLOCA_TRUE : CALLS_ALLOCA_FALSE)"))(define_attr "calls_eh_return" "false,true"(symbol_ref "(crtl->calls_eh_return != 0? CALLS_EH_RETURN_TRUE : CALLS_EH_RETURN_FALSE)"))(define_attr "leaf_function" "false,true"(symbol_ref "(current_function_uses_only_leaf_regs != 0? LEAF_FUNCTION_TRUE : LEAF_FUNCTION_FALSE)"))(define_attr "delayed_branch" "false,true"(symbol_ref "(flag_delayed_branch != 0? DELAYED_BRANCH_TRUE : DELAYED_BRANCH_FALSE)"))(define_attr "flat" "false,true"(symbol_ref "(TARGET_FLAT != 0? FLAT_TRUE : FLAT_FALSE)"));; Length (in # of insns).;; Beware that setting a length greater or equal to 3 for conditional branches;; has a side-effect (see output_cbranch and output_v9branch).(define_attr "length" ""(cond [(eq_attr "type" "uncond_branch,call")(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(eq_attr "type" "sibcall")(if_then_else (eq_attr "leaf_function" "true")(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 3)(const_int 2))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1)))(eq_attr "branch_type" "icc")(if_then_else (match_operand 0 "noov_compare64_operator" "")(if_then_else (lt (pc) (match_dup 1))(if_then_else (lt (minus (match_dup 1) (pc)) (const_int 260000))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 4)(const_int 3)))(if_then_else (lt (minus (pc) (match_dup 1)) (const_int 260000))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 4)(const_int 3))))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1)))(eq_attr "branch_type" "fcc")(if_then_else (match_operand 0 "fcc0_register_operand" "")(if_then_else (eq_attr "empty_delay_slot" "true")(if_then_else (not (match_test "TARGET_V9"))(const_int 3)(const_int 2))(if_then_else (not (match_test "TARGET_V9"))(const_int 2)(const_int 1)))(if_then_else (lt (pc) (match_dup 2))(if_then_else (lt (minus (match_dup 2) (pc)) (const_int 260000))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 4)(const_int 3)))(if_then_else (lt (minus (pc) (match_dup 2)) (const_int 260000))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 4)(const_int 3)))))(eq_attr "branch_type" "reg")(if_then_else (lt (pc) (match_dup 2))(if_then_else (lt (minus (match_dup 2) (pc)) (const_int 32000))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 4)(const_int 3)))(if_then_else (lt (minus (pc) (match_dup 2)) (const_int 32000))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 4)(const_int 3))))] (const_int 1)));; FP precision.(define_attr "fptype" "single,double"(const_string "single"));; UltraSPARC-III integer load type.(define_attr "us3load_type" "2cycle,3cycle"(const_string "2cycle"))(define_asm_attributes[(set_attr "length" "2")(set_attr "type" "multi")]);; Attributes for instruction and branch scheduling(define_attr "tls_call_delay" "false,true"(symbol_ref "(tls_call_delay (insn)? TLS_CALL_DELAY_TRUE : TLS_CALL_DELAY_FALSE)"))(define_attr "in_call_delay" "false,true"(cond [(eq_attr "type" "uncond_branch,branch,call,sibcall,call_no_delay_slot,multi")(const_string "false")(eq_attr "type" "load,fpload,store,fpstore")(if_then_else (eq_attr "length" "1")(const_string "true")(const_string "false"))](if_then_else (and (eq_attr "length" "1")(eq_attr "tls_call_delay" "true"))(const_string "true")(const_string "false"))))(define_attr "eligible_for_sibcall_delay" "false,true"(symbol_ref "(eligible_for_sibcall_delay (insn)? ELIGIBLE_FOR_SIBCALL_DELAY_TRUE: ELIGIBLE_FOR_SIBCALL_DELAY_FALSE)"))(define_attr "eligible_for_return_delay" "false,true"(symbol_ref "(eligible_for_return_delay (insn)? ELIGIBLE_FOR_RETURN_DELAY_TRUE: ELIGIBLE_FOR_RETURN_DELAY_FALSE)"));; ??? !v9: Should implement the notion of predelay slots for floating-point;; branches. This would allow us to remove the nop always inserted before;; a floating point branch.;; ??? It is OK for fill_simple_delay_slots to put load/store instructions;; in a delay slot, but it is not OK for fill_eager_delay_slots to do so.;; This is because doing so will add several pipeline stalls to the path;; that the load/store did not come from. Unfortunately, there is no way;; to prevent fill_eager_delay_slots from using load/store without completely;; disabling them. For the SPEC benchmark set, this is a serious lose,;; because it prevents us from moving back the final store of inner loops.(define_attr "in_branch_delay" "false,true"(if_then_else (and (eq_attr "type" "!uncond_branch,branch,call,sibcall,call_no_delay_slot,multi")(eq_attr "length" "1"))(const_string "true")(const_string "false")))(define_attr "in_uncond_branch_delay" "false,true"(if_then_else (and (eq_attr "type" "!uncond_branch,branch,call,sibcall,call_no_delay_slot,multi")(eq_attr "length" "1"))(const_string "true")(const_string "false")))(define_attr "in_annul_branch_delay" "false,true"(if_then_else (and (eq_attr "type" "!uncond_branch,branch,call,sibcall,call_no_delay_slot,multi")(eq_attr "length" "1"))(const_string "true")(const_string "false")))(define_delay (eq_attr "type" "call")[(eq_attr "in_call_delay" "true") (nil) (nil)])(define_delay (eq_attr "type" "sibcall")[(eq_attr "eligible_for_sibcall_delay" "true") (nil) (nil)])(define_delay (eq_attr "type" "branch")[(eq_attr "in_branch_delay" "true")(nil) (eq_attr "in_annul_branch_delay" "true")])(define_delay (eq_attr "type" "uncond_branch")[(eq_attr "in_uncond_branch_delay" "true")(nil) (nil)])(define_delay (eq_attr "type" "return")[(eq_attr "eligible_for_return_delay" "true") (nil) (nil)]);; Include SPARC DFA schedulers(include "cypress.md")(include "supersparc.md")(include "hypersparc.md")(include "leon.md")(include "sparclet.md")(include "ultra1_2.md")(include "ultra3.md")(include "niagara.md")(include "niagara2.md");; Operand and operator predicates and constraints(include "predicates.md")(include "constraints.md");; Compare instructions.;; These are just the DEFINE_INSNs to match the patterns and the;; DEFINE_SPLITs for some of the scc insns that actually require;; more than one machine instruction. DEFINE_EXPANDs are further down.;; The compare DEFINE_INSNs.(define_insn "*cmpsi_insn"[(set (reg:CC CC_REG)(compare:CC (match_operand:SI 0 "register_operand" "r")(match_operand:SI 1 "arith_operand" "rI")))]"""cmp\t%0, %1"[(set_attr "type" "compare")])(define_insn "*cmpdi_sp64"[(set (reg:CCX CC_REG)(compare:CCX (match_operand:DI 0 "register_operand" "r")(match_operand:DI 1 "arith_operand" "rI")))]"TARGET_ARCH64""cmp\t%0, %1"[(set_attr "type" "compare")])(define_insn "*cmpsf_fpe"[(set (match_operand:CCFPE 0 "fcc_register_operand" "=c")(compare:CCFPE (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")))]"TARGET_FPU"{if (TARGET_V9)return "fcmpes\t%0, %1, %2";return "fcmpes\t%1, %2";}[(set_attr "type" "fpcmp")])(define_insn "*cmpdf_fpe"[(set (match_operand:CCFPE 0 "fcc_register_operand" "=c")(compare:CCFPE (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")))]"TARGET_FPU"{if (TARGET_V9)return "fcmped\t%0, %1, %2";return "fcmped\t%1, %2";}[(set_attr "type" "fpcmp")(set_attr "fptype" "double")])(define_insn "*cmptf_fpe"[(set (match_operand:CCFPE 0 "fcc_register_operand" "=c")(compare:CCFPE (match_operand:TF 1 "register_operand" "e")(match_operand:TF 2 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD"{if (TARGET_V9)return "fcmpeq\t%0, %1, %2";return "fcmpeq\t%1, %2";}[(set_attr "type" "fpcmp")])(define_insn "*cmpsf_fp"[(set (match_operand:CCFP 0 "fcc_register_operand" "=c")(compare:CCFP (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")))]"TARGET_FPU"{if (TARGET_V9)return "fcmps\t%0, %1, %2";return "fcmps\t%1, %2";}[(set_attr "type" "fpcmp")])(define_insn "*cmpdf_fp"[(set (match_operand:CCFP 0 "fcc_register_operand" "=c")(compare:CCFP (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")))]"TARGET_FPU"{if (TARGET_V9)return "fcmpd\t%0, %1, %2";return "fcmpd\t%1, %2";}[(set_attr "type" "fpcmp")(set_attr "fptype" "double")])(define_insn "*cmptf_fp"[(set (match_operand:CCFP 0 "fcc_register_operand" "=c")(compare:CCFP (match_operand:TF 1 "register_operand" "e")(match_operand:TF 2 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD"{if (TARGET_V9)return "fcmpq\t%0, %1, %2";return "fcmpq\t%1, %2";}[(set_attr "type" "fpcmp")]);; Next come the scc insns.(define_expand "cstoresi4"[(use (match_operator 1 "comparison_operator"[(match_operand:SI 2 "compare_operand" "")(match_operand:SI 3 "arith_operand" "")]))(clobber (match_operand:SI 0 "register_operand"))]""{if (GET_CODE (operands[2]) == ZERO_EXTRACT && operands[3] != const0_rtx)operands[2] = force_reg (SImode, operands[2]);if (emit_scc_insn (operands)) DONE; else FAIL;})(define_expand "cstoredi4"[(use (match_operator 1 "comparison_operator"[(match_operand:DI 2 "compare_operand" "")(match_operand:DI 3 "arith_operand" "")]))(clobber (match_operand:SI 0 "register_operand"))]"TARGET_ARCH64"{if (GET_CODE (operands[2]) == ZERO_EXTRACT && operands[3] != const0_rtx)operands[2] = force_reg (DImode, operands[2]);if (emit_scc_insn (operands)) DONE; else FAIL;})(define_expand "cstore<F:mode>4"[(use (match_operator 1 "comparison_operator"[(match_operand:F 2 "register_operand" "")(match_operand:F 3 "register_operand" "")]))(clobber (match_operand:SI 0 "register_operand"))]"TARGET_FPU"{ if (emit_scc_insn (operands)) DONE; else FAIL; });; Seq_special[_xxx] and sne_special[_xxx] clobber the CC reg, because they;; generate addcc/subcc instructions.(define_expand "seqsi_special"[(set (match_dup 3)(xor:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "register_operand" "")))(parallel [(set (match_operand:SI 0 "register_operand" "")(eq:SI (match_dup 3) (const_int 0)))(clobber (reg:CC CC_REG))])]""{ operands[3] = gen_reg_rtx (SImode); })(define_expand "seqdi_special"[(set (match_dup 3)(xor:DI (match_operand:DI 1 "register_operand" "")(match_operand:DI 2 "register_operand" "")))(set (match_operand:SI 0 "register_operand" "")(eq:SI (match_dup 3) (const_int 0)))]"TARGET_ARCH64"{ operands[3] = gen_reg_rtx (DImode); })(define_expand "snesi_special"[(set (match_dup 3)(xor:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "register_operand" "")))(parallel [(set (match_operand:SI 0 "register_operand" "")(ne:SI (match_dup 3) (const_int 0)))(clobber (reg:CC CC_REG))])]""{ operands[3] = gen_reg_rtx (SImode); })(define_expand "snedi_special"[(set (match_dup 3)(xor:DI (match_operand:DI 1 "register_operand" "")(match_operand:DI 2 "register_operand" "")))(set (match_operand:SI 0 "register_operand" "")(ne:SI (match_dup 3) (const_int 0)))]"TARGET_ARCH64 && ! TARGET_VIS3"{ operands[3] = gen_reg_rtx (DImode); })(define_expand "snedi_special_vis3"[(set (match_dup 3)(xor:DI (match_operand:DI 1 "register_operand" "")(match_operand:DI 2 "register_operand" "")))(parallel [(set (match_operand:SI 0 "register_operand" "")(ne:SI (match_dup 3) (const_int 0)))(clobber (reg:CCX CC_REG))])]"TARGET_ARCH64 && TARGET_VIS3"{ operands[3] = gen_reg_rtx (DImode); });; Now the DEFINE_INSNs for the scc cases.;; The SEQ and SNE patterns are special because they can be done;; without any branching and do not involve a COMPARE. We want;; them to always use the splits below so the results can be;; scheduled.(define_insn_and_split "*snesi_zero"[(set (match_operand:SI 0 "register_operand" "=r")(ne:SI (match_operand:SI 1 "register_operand" "r")(const_int 0)))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (ltu:SI (reg:CC CC_REG) (const_int 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*neg_snesi_zero"[(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (ne:SI (match_operand:SI 1 "register_operand" "r")(const_int 0))))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (neg:SI (ltu:SI (reg:CC CC_REG) (const_int 0))))]""[(set_attr "length" "2")])(define_insn_and_split "*snesi_zero_extend"[(set (match_operand:DI 0 "register_operand" "=r")(ne:DI (match_operand:SI 1 "register_operand" "r")(const_int 0)))(clobber (reg:CC CC_REG))]"TARGET_ARCH64""#""&& 1"[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (minus:SI (const_int 0)(match_dup 1))(const_int 0)))(set (match_dup 0) (zero_extend:DI (plus:SI (plus:SI (const_int 0)(const_int 0))(ltu:SI (reg:CC_NOOV CC_REG)(const_int 0)))))]""[(set_attr "length" "2")])(define_insn_and_split "*neg_snesi_sign_extend"[(set (match_operand:DI 0 "register_operand" "=r")(neg:DI (ne:DI (match_operand:SI 1 "register_operand" "r")(const_int 0))))(clobber (reg:CC CC_REG))]"TARGET_ARCH64""#""&& 1"[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (minus:SI (const_int 0)(match_dup 1))(const_int 0)))(set (match_dup 0) (sign_extend:DI (neg:SI (ltu:SI (reg:CC CC_REG)(const_int 0)))))]""[(set_attr "length" "2")])(define_insn_and_split "*snedi_zero"[(set (match_operand:DI 0 "register_operand" "=&r")(ne:DI (match_operand:DI 1 "register_operand" "r")(const_int 0)))]"TARGET_ARCH64 && ! TARGET_VIS3""#""&& ! reg_overlap_mentioned_p (operands[1], operands[0])"[(set (match_dup 0) (const_int 0))(set (match_dup 0) (if_then_else:DI (ne:DI (match_dup 1)(const_int 0))(const_int 1)(match_dup 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*snedi_zero_vis3"[(set (match_operand:DI 0 "register_operand" "=r")(ne:DI (match_operand:DI 1 "register_operand" "r")(const_int 0)))(clobber (reg:CCX CC_REG))]"TARGET_ARCH64 && TARGET_VIS3""#"""[(set (reg:CCX_NOOV CC_REG) (compare:CCX_NOOV (neg:DI (match_dup 1))(const_int 0)))(set (match_dup 0) (ltu:DI (reg:CCX CC_REG) (const_int 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*neg_snedi_zero"[(set (match_operand:DI 0 "register_operand" "=&r")(neg:DI (ne:DI (match_operand:DI 1 "register_operand" "r")(const_int 0))))]"TARGET_ARCH64""#""&& ! reg_overlap_mentioned_p (operands[1], operands[0])"[(set (match_dup 0) (const_int 0))(set (match_dup 0) (if_then_else:DI (ne:DI (match_dup 1)(const_int 0))(const_int -1)(match_dup 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*snedi_zero_trunc"[(set (match_operand:SI 0 "register_operand" "=&r")(ne:SI (match_operand:DI 1 "register_operand" "r")(const_int 0)))]"TARGET_ARCH64 && ! TARGET_VIS3""#""&& ! reg_overlap_mentioned_p (operands[1], operands[0])"[(set (match_dup 0) (const_int 0))(set (match_dup 0) (if_then_else:SI (ne:DI (match_dup 1)(const_int 0))(const_int 1)(match_dup 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*snedi_zero_trunc_vis3"[(set (match_operand:SI 0 "register_operand" "=r")(ne:SI (match_operand:DI 1 "register_operand" "r")(const_int 0)))(clobber (reg:CCX CC_REG))]"TARGET_ARCH64 && TARGET_VIS3""#"""[(set (reg:CCX_NOOV CC_REG) (compare:CCX_NOOV (neg:DI (match_dup 1))(const_int 0)))(set (match_dup 0) (ltu:SI (reg:CCX CC_REG) (const_int 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*seqsi_zero"[(set (match_operand:SI 0 "register_operand" "=r")(eq:SI (match_operand:SI 1 "register_operand" "r")(const_int 0)))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (geu:SI (reg:CC CC_REG) (const_int 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*neg_seqsi_zero"[(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (eq:SI (match_operand:SI 1 "register_operand" "r")(const_int 0))))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (neg:SI (geu:SI (reg:CC CC_REG) (const_int 0))))]""[(set_attr "length" "2")])(define_insn_and_split "*seqsi_zero_extend"[(set (match_operand:DI 0 "register_operand" "=r")(eq:DI (match_operand:SI 1 "register_operand" "r")(const_int 0)))(clobber (reg:CC CC_REG))]"TARGET_ARCH64""#""&& 1"[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (minus:SI (const_int 0)(match_dup 1))(const_int 0)))(set (match_dup 0) (zero_extend:DI (minus:SI (minus:SI (const_int 0)(const_int -1))(ltu:SI (reg:CC_NOOV CC_REG)(const_int 0)))))]""[(set_attr "length" "2")])(define_insn_and_split "*neg_seqsi_sign_extend"[(set (match_operand:DI 0 "register_operand" "=r")(neg:DI (eq:DI (match_operand:SI 1 "register_operand" "r")(const_int 0))))(clobber (reg:CC CC_REG))]"TARGET_ARCH64""#""&& 1"[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (sign_extend:DI (neg:SI (geu:SI (reg:CC CC_REG)(const_int 0)))))]""[(set_attr "length" "2")])(define_insn_and_split "*seqdi_zero"[(set (match_operand:DI 0 "register_operand" "=&r")(eq:DI (match_operand:DI 1 "register_operand" "r")(const_int 0)))]"TARGET_ARCH64""#""&& ! reg_overlap_mentioned_p (operands[1], operands[0])"[(set (match_dup 0) (const_int 0))(set (match_dup 0) (if_then_else:DI (eq:DI (match_dup 1)(const_int 0))(const_int 1)(match_dup 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*neg_seqdi_zero"[(set (match_operand:DI 0 "register_operand" "=&r")(neg:DI (eq:DI (match_operand:DI 1 "register_operand" "r")(const_int 0))))]"TARGET_ARCH64""#""&& ! reg_overlap_mentioned_p (operands[1], operands[0])"[(set (match_dup 0) (const_int 0))(set (match_dup 0) (if_then_else:DI (eq:DI (match_dup 1)(const_int 0))(const_int -1)(match_dup 0)))]""[(set_attr "length" "2")])(define_insn_and_split "*seqdi_zero_trunc"[(set (match_operand:SI 0 "register_operand" "=&r")(eq:SI (match_operand:DI 1 "register_operand" "r")(const_int 0)))]"TARGET_ARCH64""#""&& ! reg_overlap_mentioned_p (operands[1], operands[0])"[(set (match_dup 0) (const_int 0))(set (match_dup 0) (if_then_else:SI (eq:DI (match_dup 1)(const_int 0))(const_int 1)(match_dup 0)))]""[(set_attr "length" "2")]);; We can also do (x + (i == 0)) and related, so put them in.;; ??? The addx/subx insns use the 32 bit carry flag so there are no DImode;; versions for v9.(define_insn_and_split "*x_plus_i_ne_0"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (ne:SI (match_operand:SI 1 "register_operand" "r")(const_int 0))(match_operand:SI 2 "register_operand" "r")))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (plus:SI (ltu:SI (reg:CC CC_REG) (const_int 0))(match_dup 2)))]""[(set_attr "length" "2")])(define_insn_and_split "*x_minus_i_ne_0"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_operand:SI 2 "register_operand" "r")(ne:SI (match_operand:SI 1 "register_operand" "r")(const_int 0))))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (minus:SI (match_dup 2)(ltu:SI (reg:CC CC_REG) (const_int 0))))]""[(set_attr "length" "2")])(define_insn_and_split "*x_plus_i_eq_0"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (eq:SI (match_operand:SI 1 "register_operand" "r")(const_int 0))(match_operand:SI 2 "register_operand" "r")))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (plus:SI (geu:SI (reg:CC CC_REG) (const_int 0))(match_dup 2)))]""[(set_attr "length" "2")])(define_insn_and_split "*x_minus_i_eq_0"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_operand:SI 2 "register_operand" "r")(eq:SI (match_operand:SI 1 "register_operand" "r")(const_int 0))))(clobber (reg:CC CC_REG))]"""#"""[(set (reg:CC_NOOV CC_REG) (compare:CC_NOOV (neg:SI (match_dup 1))(const_int 0)))(set (match_dup 0) (minus:SI (match_dup 2)(geu:SI (reg:CC CC_REG) (const_int 0))))]""[(set_attr "length" "2")]);; We can also do GEU and LTU directly, but these operate after a compare.;; ??? The addx/subx insns use the 32 bit carry flag so there are no DImode;; versions for v9.(define_insn "*sltu_insn"[(set (match_operand:SI 0 "register_operand" "=r")(ltu:SI (reg:CC CC_REG) (const_int 0)))]"""addx\t%%g0, 0, %0"[(set_attr "type" "ialuX")])(define_insn "*sltu_insn_vis3"[(set (match_operand:DI 0 "register_operand" "=r")(ltu:DI (reg:CCX CC_REG) (const_int 0)))]"TARGET_ARCH64 && TARGET_VIS3""addxc\t%%g0, %%g0, %0"[(set_attr "type" "ialuX")])(define_insn "*sltu_insn_vis3_trunc"[(set (match_operand:SI 0 "register_operand" "=r")(ltu:SI (reg:CCX CC_REG) (const_int 0)))]"TARGET_ARCH64 && TARGET_VIS3""addxc\t%%g0, %%g0, %0"[(set_attr "type" "ialuX")])(define_insn "*sltu_extend_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(ltu:DI (reg:CC CC_REG) (const_int 0)))]"TARGET_ARCH64""addx\t%%g0, 0, %0"[(set_attr "type" "ialuX")])(define_insn "*neg_sltu_insn"[(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (ltu:SI (reg:CC CC_REG) (const_int 0))))]"""subx\t%%g0, 0, %0"[(set_attr "type" "ialuX")])(define_insn "*neg_sltu_extend_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (neg:SI (ltu:SI (reg:CC CC_REG) (const_int 0)))))]"TARGET_ARCH64""subx\t%%g0, 0, %0"[(set_attr "type" "ialuX")]);; ??? Combine should canonicalize these next two to the same pattern.(define_insn "*neg_sltu_minus_x"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (neg:SI (ltu:SI (reg:CC CC_REG) (const_int 0)))(match_operand:SI 1 "arith_operand" "rI")))]"""subx\t%%g0, %1, %0"[(set_attr "type" "ialuX")])(define_insn "*neg_sltu_plus_x"[(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (plus:SI (ltu:SI (reg:CC CC_REG) (const_int 0))(match_operand:SI 1 "arith_operand" "rI"))))]"""subx\t%%g0, %1, %0"[(set_attr "type" "ialuX")])(define_insn "*sgeu_insn"[(set (match_operand:SI 0 "register_operand" "=r")(geu:SI (reg:CC CC_REG) (const_int 0)))]"""subx\t%%g0, -1, %0"[(set_attr "type" "ialuX")])(define_insn "*sgeu_extend_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(geu:DI (reg:CC CC_REG) (const_int 0)))]"TARGET_ARCH64""subx\t%%g0, -1, %0"[(set_attr "type" "ialuX")])(define_insn "*neg_sgeu_insn"[(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (geu:SI (reg:CC CC_REG) (const_int 0))))]"""addx\t%%g0, -1, %0"[(set_attr "type" "ialuX")])(define_insn "*neg_sgeu_extend_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (neg:SI (geu:SI (reg:CC CC_REG) (const_int 0)))))]"TARGET_ARCH64""addx\t%%g0, -1, %0"[(set_attr "type" "ialuX")]);; We can also do (x + ((unsigned) i >= 0)) and related, so put them in.;; ??? The addx/subx insns use the 32 bit carry flag so there are no DImode;; versions for v9.(define_insn "*sltu_plus_x"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (ltu:SI (reg:CC CC_REG) (const_int 0))(match_operand:SI 1 "arith_operand" "rI")))]"""addx\t%%g0, %1, %0"[(set_attr "type" "ialuX")])(define_insn "*sltu_plus_x_plus_y"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (ltu:SI (reg:CC CC_REG) (const_int 0))(plus:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI"))))]"""addx\t%1, %2, %0"[(set_attr "type" "ialuX")])(define_insn "*x_minus_sltu"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_operand:SI 1 "register_operand" "r")(ltu:SI (reg:CC CC_REG) (const_int 0))))]"""subx\t%1, 0, %0"[(set_attr "type" "ialuX")]);; ??? Combine should canonicalize these next two to the same pattern.(define_insn "*x_minus_y_minus_sltu"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (minus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "arith_operand" "rI"))(ltu:SI (reg:CC CC_REG) (const_int 0))))]"""subx\t%r1, %2, %0"[(set_attr "type" "ialuX")])(define_insn "*x_minus_sltu_plus_y"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(plus:SI (ltu:SI (reg:CC CC_REG) (const_int 0))(match_operand:SI 2 "arith_operand" "rI"))))]"""subx\t%r1, %2, %0"[(set_attr "type" "ialuX")])(define_insn "*sgeu_plus_x"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (geu:SI (reg:CC CC_REG) (const_int 0))(match_operand:SI 1 "register_operand" "r")))]"""subx\t%1, -1, %0"[(set_attr "type" "ialuX")])(define_insn "*x_minus_sgeu"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_operand:SI 1 "register_operand" "r")(geu:SI (reg:CC CC_REG) (const_int 0))))]"""addx\t%1, -1, %0"[(set_attr "type" "ialuX")])(define_split[(set (match_operand:SI 0 "register_operand" "")(match_operator:SI 2 "noov_compare_operator"[(match_operand 1 "icc_or_fcc_register_operand" "")(const_int 0)]))]"TARGET_V9&& REGNO (operands[1]) == SPARC_ICC_REG&& (GET_MODE (operands[1]) == CCXmode/* 32-bit LTU/GEU are better implemented using addx/subx. */|| (GET_CODE (operands[2]) != LTU && GET_CODE (operands[2]) != GEU))"[(set (match_dup 0) (const_int 0))(set (match_dup 0)(if_then_else:SI (match_op_dup:SI 2 [(match_dup 1) (const_int 0)])(const_int 1)(match_dup 0)))]"");; These control RTL generation for conditional jump insns(define_expand "cbranchcc4"[(set (pc)(if_then_else (match_operator 0 "comparison_operator"[(match_operand 1 "compare_operand" "")(match_operand 2 "const_zero_operand" "")])(label_ref (match_operand 3 "" ""))(pc)))]"""")(define_expand "cbranchsi4"[(use (match_operator 0 "comparison_operator"[(match_operand:SI 1 "compare_operand" "")(match_operand:SI 2 "arith_operand" "")]))(use (match_operand 3 ""))]""{if (GET_CODE (operands[1]) == ZERO_EXTRACT && operands[2] != const0_rtx)operands[1] = force_reg (SImode, operands[1]);emit_conditional_branch_insn (operands);DONE;})(define_expand "cbranchdi4"[(use (match_operator 0 "comparison_operator"[(match_operand:DI 1 "compare_operand" "")(match_operand:DI 2 "arith_operand" "")]))(use (match_operand 3 ""))]"TARGET_ARCH64"{if (GET_CODE (operands[1]) == ZERO_EXTRACT && operands[2] != const0_rtx)operands[1] = force_reg (DImode, operands[1]);emit_conditional_branch_insn (operands);DONE;})(define_expand "cbranch<F:mode>4"[(use (match_operator 0 "comparison_operator"[(match_operand:F 1 "register_operand" "")(match_operand:F 2 "register_operand" "")]))(use (match_operand 3 ""))]"TARGET_FPU"{ emit_conditional_branch_insn (operands); DONE; });; Now match both normal and inverted jump.;; XXX fpcmp nop braindamage(define_insn "*normal_branch"[(set (pc)(if_then_else (match_operator 0 "noov_compare_operator"[(reg CC_REG) (const_int 0)])(label_ref (match_operand 1 "" ""))(pc)))]""{return output_cbranch (operands[0], operands[1], 1, 0,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "icc")]);; XXX fpcmp nop braindamage(define_insn "*inverted_branch"[(set (pc)(if_then_else (match_operator 0 "noov_compare_operator"[(reg CC_REG) (const_int 0)])(pc)(label_ref (match_operand 1 "" ""))))]""{return output_cbranch (operands[0], operands[1], 1, 1,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "icc")]);; XXX fpcmp nop braindamage(define_insn "*normal_fp_branch"[(set (pc)(if_then_else (match_operator 1 "comparison_operator"[(match_operand:CCFP 0 "fcc_register_operand" "c")(const_int 0)])(label_ref (match_operand 2 "" ""))(pc)))]""{return output_cbranch (operands[1], operands[2], 2, 0,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "fcc")]);; XXX fpcmp nop braindamage(define_insn "*inverted_fp_branch"[(set (pc)(if_then_else (match_operator 1 "comparison_operator"[(match_operand:CCFP 0 "fcc_register_operand" "c")(const_int 0)])(pc)(label_ref (match_operand 2 "" ""))))]""{return output_cbranch (operands[1], operands[2], 2, 1,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "fcc")]);; XXX fpcmp nop braindamage(define_insn "*normal_fpe_branch"[(set (pc)(if_then_else (match_operator 1 "comparison_operator"[(match_operand:CCFPE 0 "fcc_register_operand" "c")(const_int 0)])(label_ref (match_operand 2 "" ""))(pc)))]""{return output_cbranch (operands[1], operands[2], 2, 0,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "fcc")]);; XXX fpcmp nop braindamage(define_insn "*inverted_fpe_branch"[(set (pc)(if_then_else (match_operator 1 "comparison_operator"[(match_operand:CCFPE 0 "fcc_register_operand" "c")(const_int 0)])(pc)(label_ref (match_operand 2 "" ""))))]""{return output_cbranch (operands[1], operands[2], 2, 1,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "fcc")]);; SPARC V9-specific jump insns. None of these are guaranteed to be;; in the architecture.;; There are no 32 bit brreg insns.;; XXX(define_insn "*normal_int_branch_sp64"[(set (pc)(if_then_else (match_operator 0 "v9_register_compare_operator"[(match_operand:DI 1 "register_operand" "r")(const_int 0)])(label_ref (match_operand 2 "" ""))(pc)))]"TARGET_ARCH64"{return output_v9branch (operands[0], operands[2], 1, 2, 0,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "reg")]);; XXX(define_insn "*inverted_int_branch_sp64"[(set (pc)(if_then_else (match_operator 0 "v9_register_compare_operator"[(match_operand:DI 1 "register_operand" "r")(const_int 0)])(pc)(label_ref (match_operand 2 "" ""))))]"TARGET_ARCH64"{return output_v9branch (operands[0], operands[2], 1, 2, 1,final_sequence && INSN_ANNULLED_BRANCH_P (insn),insn);}[(set_attr "type" "branch")(set_attr "branch_type" "reg")]);; Load in operand 0 the (absolute) address of operand 1, which is a symbolic;; value subject to a PC-relative relocation. Operand 2 is a helper function;; that adds the PC value at the call point to register #(operand 3).;;;; Even on V9 we use this call sequence with a stub, instead of "rd %pc, ...";; because the RDPC instruction is extremely expensive and incurs a complete;; instruction pipeline flush.(define_insn "load_pcrel_sym<P:mode>"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "symbolic_operand" "")(match_operand:P 2 "call_address_operand" "")(match_operand:P 3 "const_int_operand" "")] UNSPEC_LOAD_PCREL_SYM))(clobber (reg:P O7_REG))]"REGNO (operands[0]) == INTVAL (operands[3])"{if (flag_delayed_branch)return "sethi\t%%hi(%a1-4), %0\n\tcall\t%a2\n\t add\t%0, %%lo(%a1+4), %0";elsereturn "sethi\t%%hi(%a1-8), %0\n\tadd\t%0, %%lo(%a1-4), %0\n\tcall\t%a2\n\t nop";}[(set (attr "type") (const_string "multi"))(set (attr "length")(if_then_else (eq_attr "delayed_branch" "true")(const_int 3)(const_int 4)))]);; Integer move instructions(define_expand "movqi"[(set (match_operand:QI 0 "nonimmediate_operand" "")(match_operand:QI 1 "general_operand" ""))]""{if (sparc_expand_move (QImode, operands))DONE;})(define_insn "*movqi_insn"[(set (match_operand:QI 0 "nonimmediate_operand" "=r,r,m")(match_operand:QI 1 "input_operand" "rI,m,rJ"))]"(register_operand (operands[0], QImode)|| register_or_zero_operand (operands[1], QImode))""@mov\t%1, %0ldub\t%1, %0stb\t%r1, %0"[(set_attr "type" "*,load,store")(set_attr "us3load_type" "*,3cycle,*")])(define_expand "movhi"[(set (match_operand:HI 0 "nonimmediate_operand" "")(match_operand:HI 1 "general_operand" ""))]""{if (sparc_expand_move (HImode, operands))DONE;})(define_insn "*movhi_insn"[(set (match_operand:HI 0 "nonimmediate_operand" "=r,r,r,m")(match_operand:HI 1 "input_operand" "rI,K,m,rJ"))]"(register_operand (operands[0], HImode)|| register_or_zero_operand (operands[1], HImode))""@mov\t%1, %0sethi\t%%hi(%a1), %0lduh\t%1, %0sth\t%r1, %0"[(set_attr "type" "*,*,load,store")(set_attr "us3load_type" "*,*,3cycle,*")]);; We always work with constants here.(define_insn "*movhi_lo_sum"[(set (match_operand:HI 0 "register_operand" "=r")(ior:HI (match_operand:HI 1 "register_operand" "%r")(match_operand:HI 2 "small_int_operand" "I")))]"""or\t%1, %2, %0")(define_expand "movsi"[(set (match_operand:SI 0 "nonimmediate_operand" "")(match_operand:SI 1 "general_operand" ""))]""{if (sparc_expand_move (SImode, operands))DONE;})(define_insn "*movsi_insn"[(set (match_operand:SI 0 "nonimmediate_operand" "=r,r,r, m, r,*f,*f,*f, m,d,d")(match_operand:SI 1 "input_operand" "rI,K,m,rJ,*f, r, f, m,*f,J,P"))]"register_operand (operands[0], SImode)|| register_or_zero_or_all_ones_operand (operands[1], SImode)""@mov\t%1, %0sethi\t%%hi(%a1), %0ld\t%1, %0st\t%r1, %0movstouw\t%1, %0movwtos\t%1, %0fmovs\t%1, %0ld\t%1, %0st\t%1, %0fzeros\t%0fones\t%0"[(set_attr "type" "*,*,load,store,*,*,fpmove,fpload,fpstore,fga,fga")(set_attr "cpu_feature" "*,*,*,*,vis3,vis3,*,*,*,vis,vis")])(define_insn "*movsi_lo_sum"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "immediate_operand" "in")))]"""or\t%1, %%lo(%a2), %0")(define_insn "*movsi_high"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (match_operand:SI 1 "immediate_operand" "in")))]"""sethi\t%%hi(%a1), %0");; The next two patterns must wrap the SYMBOL_REF in an UNSPEC;; so that CSE won't optimize the address computation away.(define_insn "movsi_lo_sum_pic"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand:SI 2 "immediate_operand" "in")] UNSPEC_MOVE_PIC)))]"flag_pic"{#ifdef HAVE_AS_SPARC_GOTDATA_OPreturn "xor\t%1, %%gdop_lox10(%a2), %0";#elsereturn "or\t%1, %%lo(%a2), %0";#endif})(define_insn "movsi_high_pic"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (unspec:SI [(match_operand 1 "" "")] UNSPEC_MOVE_PIC)))]"flag_pic && check_pic (1)"{#ifdef HAVE_AS_SPARC_GOTDATA_OPreturn "sethi\t%%gdop_hix22(%a1), %0";#elsereturn "sethi\t%%hi(%a1), %0";#endif})(define_insn "movsi_pic_gotdata_op"[(set (match_operand:SI 0 "register_operand" "=r")(unspec:SI [(match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "register_operand" "r")(match_operand 3 "symbolic_operand" "")] UNSPEC_MOVE_GOTDATA))]"flag_pic && check_pic (1)"{#ifdef HAVE_AS_SPARC_GOTDATA_OPreturn "ld\t[%1 + %2], %0, %%gdop(%a3)";#elsereturn "ld\t[%1 + %2], %0";#endif}[(set_attr "type" "load")])(define_expand "movsi_pic_label_ref"[(set (match_dup 3) (high:SI(unspec:SI [(match_operand:SI 1 "label_ref_operand" "")(match_dup 2)] UNSPEC_MOVE_PIC_LABEL)))(set (match_dup 4) (lo_sum:SI (match_dup 3)(unspec:SI [(match_dup 1) (match_dup 2)] UNSPEC_MOVE_PIC_LABEL)))(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_dup 5) (match_dup 4)))]"flag_pic"{crtl->uses_pic_offset_table = 1;operands[2] = gen_rtx_SYMBOL_REF (Pmode, "_GLOBAL_OFFSET_TABLE_");if (!can_create_pseudo_p ()){operands[3] = operands[0];operands[4] = operands[0];}else{operands[3] = gen_reg_rtx (SImode);operands[4] = gen_reg_rtx (SImode);}operands[5] = pic_offset_table_rtx;})(define_insn "*movsi_high_pic_label_ref"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI(unspec:SI [(match_operand:SI 1 "label_ref_operand" "")(match_operand:SI 2 "" "")] UNSPEC_MOVE_PIC_LABEL)))]"flag_pic""sethi\t%%hi(%a2-(%a1-.)), %0")(define_insn "*movsi_lo_sum_pic_label_ref"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand:SI 2 "label_ref_operand" "")(match_operand:SI 3 "" "")] UNSPEC_MOVE_PIC_LABEL)))]"flag_pic""or\t%1, %%lo(%a3-(%a2-.)), %0");; Set up the PIC register for VxWorks.(define_expand "vxworks_load_got"[(set (match_dup 0)(high:SI (match_dup 1)))(set (match_dup 0)(mem:SI (lo_sum:SI (match_dup 0) (match_dup 1))))(set (match_dup 0)(mem:SI (lo_sum:SI (match_dup 0) (match_dup 2))))]"TARGET_VXWORKS_RTP"{operands[0] = pic_offset_table_rtx;operands[1] = gen_rtx_SYMBOL_REF (SImode, VXWORKS_GOTT_BASE);operands[2] = gen_rtx_SYMBOL_REF (SImode, VXWORKS_GOTT_INDEX);})(define_expand "movdi"[(set (match_operand:DI 0 "nonimmediate_operand" "")(match_operand:DI 1 "general_operand" ""))]""{if (sparc_expand_move (DImode, operands))DONE;});; Be careful, fmovd does not exist when !v9.;; We match MEM moves directly when we have correct even;; numbered registers, but fall into splits otherwise.;; The constraint ordering here is really important to;; avoid insane problems in reload, especially for patterns;; of the form:;;;; (set (mem:DI (plus:SI (reg:SI 30 %fp);; (const_int -5016)));; (reg:DI 2 %g2));;(define_insn "*movdi_insn_sp32"[(set (match_operand:DI 0 "nonimmediate_operand""=T,o,T,U,o,r,r,r,?T,?*f,?*f,?o,?*e,?*e, r,?*f,?*e,?W,b,b")(match_operand:DI 1 "input_operand"" J,J,U,T,r,o,i,r,*f, T, o,*f, *e, *e,?*f, r, W,*e,J,P"))]"! TARGET_ARCH64&& (register_operand (operands[0], DImode)|| register_or_zero_operand (operands[1], DImode))""@stx\t%%g0, %0#std\t%1, %0ldd\t%1, %0####std\t%1, %0ldd\t%1, %0##fmovd\t%1, %0###ldd\t%1, %0std\t%1, %0fzero\t%0fone\t%0"[(set_attr "type" "store,store,store,load,*,*,*,*,fpstore,fpload,*,*,fpmove,*,*,*,fpload,fpstore,fga,fga")(set_attr "length" "*,2,*,*,2,2,2,2,*,*,2,2,*,2,2,2,*,*,*,*")(set_attr "fptype" "*,*,*,*,*,*,*,*,*,*,*,*,double,*,*,*,*,*,double,double")(set_attr "cpu_feature" "v9,*,*,*,*,*,*,*,fpu,fpu,fpu,fpu,v9,fpunotv9,vis3,vis3,fpu,fpu,vis,vis")])(define_insn "*movdi_insn_sp64"[(set (match_operand:DI 0 "nonimmediate_operand" "=r,r,r, m, r,*e,?*e,?*e,?W,b,b")(match_operand:DI 1 "input_operand" "rI,N,m,rJ,*e, r, *e, W,*e,J,P"))]"TARGET_ARCH64&& (register_operand (operands[0], DImode)|| register_or_zero_or_all_ones_operand (operands[1], DImode))""@mov\t%1, %0sethi\t%%hi(%a1), %0ldx\t%1, %0stx\t%r1, %0movdtox\t%1, %0movxtod\t%1, %0fmovd\t%1, %0ldd\t%1, %0std\t%1, %0fzero\t%0fone\t%0"[(set_attr "type" "*,*,load,store,*,*,fpmove,fpload,fpstore,fga,fga")(set_attr "fptype" "*,*,*,*,*,*,double,*,*,double,double")(set_attr "cpu_feature" "*,*,*,*,vis3,vis3,*,*,*,vis,vis")])(define_expand "movdi_pic_label_ref"[(set (match_dup 3) (high:DI(unspec:DI [(match_operand:DI 1 "label_ref_operand" "")(match_dup 2)] UNSPEC_MOVE_PIC_LABEL)))(set (match_dup 4) (lo_sum:DI (match_dup 3)(unspec:DI [(match_dup 1) (match_dup 2)] UNSPEC_MOVE_PIC_LABEL)))(set (match_operand:DI 0 "register_operand" "=r")(minus:DI (match_dup 5) (match_dup 4)))]"TARGET_ARCH64 && flag_pic"{crtl->uses_pic_offset_table = 1;operands[2] = gen_rtx_SYMBOL_REF (Pmode, "_GLOBAL_OFFSET_TABLE_");if (!can_create_pseudo_p ()){operands[3] = operands[0];operands[4] = operands[0];}else{operands[3] = gen_reg_rtx (DImode);operands[4] = gen_reg_rtx (DImode);}operands[5] = pic_offset_table_rtx;})(define_insn "*movdi_high_pic_label_ref"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI(unspec:DI [(match_operand:DI 1 "label_ref_operand" "")(match_operand:DI 2 "" "")] UNSPEC_MOVE_PIC_LABEL)))]"TARGET_ARCH64 && flag_pic""sethi\t%%hi(%a2-(%a1-.)), %0")(define_insn "*movdi_lo_sum_pic_label_ref"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:DI 2 "label_ref_operand" "")(match_operand:DI 3 "" "")] UNSPEC_MOVE_PIC_LABEL)))]"TARGET_ARCH64 && flag_pic""or\t%1, %%lo(%a3-(%a2-.)), %0");; SPARC-v9 code model support insns. See sparc_emit_set_symbolic_const64;; in sparc.c to see what is going on here... PIC stuff comes first.(define_insn "movdi_lo_sum_pic"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:DI 2 "immediate_operand" "in")] UNSPEC_MOVE_PIC)))]"TARGET_ARCH64 && flag_pic"{#ifdef HAVE_AS_SPARC_GOTDATA_OPreturn "xor\t%1, %%gdop_lox10(%a2), %0";#elsereturn "or\t%1, %%lo(%a2), %0";#endif})(define_insn "movdi_high_pic"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand 1 "" "")] UNSPEC_MOVE_PIC)))]"TARGET_ARCH64 && flag_pic && check_pic (1)"{#ifdef HAVE_AS_SPARC_GOTDATA_OPreturn "sethi\t%%gdop_hix22(%a1), %0";#elsereturn "sethi\t%%hi(%a1), %0";#endif})(define_insn "movdi_pic_gotdata_op"[(set (match_operand:DI 0 "register_operand" "=r")(unspec:DI [(match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "register_operand" "r")(match_operand 3 "symbolic_operand" "")] UNSPEC_MOVE_GOTDATA))]"TARGET_ARCH64 && flag_pic && check_pic (1)"{#ifdef HAVE_AS_SPARC_GOTDATA_OPreturn "ldx\t[%1 + %2], %0, %%gdop(%a3)";#elsereturn "ldx\t[%1 + %2], %0";#endif}[(set_attr "type" "load")])(define_insn "*sethi_di_medlow_embmedany_pic"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (match_operand:DI 1 "medium_pic_operand" "")))]"(TARGET_CM_MEDLOW || TARGET_CM_EMBMEDANY) && check_pic (1)""sethi\t%%hi(%a1), %0")(define_insn "*sethi_di_medlow"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (match_operand:DI 1 "symbolic_operand" "")))]"TARGET_CM_MEDLOW && check_pic (1)""sethi\t%%hi(%a1), %0")(define_insn "*losum_di_medlow"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "symbolic_operand" "")))]"TARGET_CM_MEDLOW""or\t%1, %%lo(%a2), %0")(define_insn "seth44"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand:DI 1 "symbolic_operand" "")] UNSPEC_SETH44)))]"TARGET_CM_MEDMID""sethi\t%%h44(%a1), %0")(define_insn "setm44"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:DI 2 "symbolic_operand" "")] UNSPEC_SETM44)))]"TARGET_CM_MEDMID""or\t%1, %%m44(%a2), %0")(define_insn "setl44"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "symbolic_operand" "")))]"TARGET_CM_MEDMID""or\t%1, %%l44(%a2), %0")(define_insn "sethh"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand:DI 1 "symbolic_operand" "")] UNSPEC_SETHH)))]"TARGET_CM_MEDANY""sethi\t%%hh(%a1), %0")(define_insn "setlm"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand:DI 1 "symbolic_operand" "")] UNSPEC_SETLM)))]"TARGET_CM_MEDANY""sethi\t%%lm(%a1), %0")(define_insn "sethm"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:DI 2 "symbolic_operand" "")] UNSPEC_EMB_SETHM)))]"TARGET_CM_MEDANY""or\t%1, %%hm(%a2), %0")(define_insn "setlo"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "symbolic_operand" "")))]"TARGET_CM_MEDANY""or\t%1, %%lo(%a2), %0")(define_insn "embmedany_sethi"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand:DI 1 "data_segment_operand" "")] UNSPEC_EMB_HISUM)))]"TARGET_CM_EMBMEDANY && check_pic (1)""sethi\t%%hi(%a1), %0")(define_insn "embmedany_losum"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "data_segment_operand" "")))]"TARGET_CM_EMBMEDANY""add\t%1, %%lo(%a2), %0")(define_insn "embmedany_brsum"[(set (match_operand:DI 0 "register_operand" "=r")(unspec:DI [(match_operand:DI 1 "register_operand" "r")] UNSPEC_EMB_HISUM))]"TARGET_CM_EMBMEDANY""add\t%1, %_, %0")(define_insn "embmedany_textuhi"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand:DI 1 "text_segment_operand" "")] UNSPEC_EMB_TEXTUHI)))]"TARGET_CM_EMBMEDANY && check_pic (1)""sethi\t%%uhi(%a1), %0")(define_insn "embmedany_texthi"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand:DI 1 "text_segment_operand" "")] UNSPEC_EMB_TEXTHI)))]"TARGET_CM_EMBMEDANY && check_pic (1)""sethi\t%%hi(%a1), %0")(define_insn "embmedany_textulo"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:DI 2 "text_segment_operand" "")] UNSPEC_EMB_TEXTULO)))]"TARGET_CM_EMBMEDANY""or\t%1, %%ulo(%a2), %0")(define_insn "embmedany_textlo"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "text_segment_operand" "")))]"TARGET_CM_EMBMEDANY""or\t%1, %%lo(%a2), %0");; Now some patterns to help reload out a bit.(define_expand "reload_indi"[(parallel [(match_operand:DI 0 "register_operand" "=r")(match_operand:DI 1 "immediate_operand" "")(match_operand:TI 2 "register_operand" "=&r")])]"(TARGET_CM_MEDANY|| TARGET_CM_EMBMEDANY)&& ! flag_pic"{sparc_emit_set_symbolic_const64 (operands[0], operands[1], operands[2]);DONE;})(define_expand "reload_outdi"[(parallel [(match_operand:DI 0 "register_operand" "=r")(match_operand:DI 1 "immediate_operand" "")(match_operand:TI 2 "register_operand" "=&r")])]"(TARGET_CM_MEDANY|| TARGET_CM_EMBMEDANY)&& ! flag_pic"{sparc_emit_set_symbolic_const64 (operands[0], operands[1], operands[2]);DONE;});; Split up putting CONSTs and REGs into DI regs when !arch64(define_split[(set (match_operand:DI 0 "register_operand" "")(match_operand:DI 1 "const_int_operand" ""))]"! TARGET_ARCH64&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))&& reload_completed"[(clobber (const_int 0))]{#if HOST_BITS_PER_WIDE_INT == 32emit_insn (gen_movsi (gen_highpart (SImode, operands[0]),(INTVAL (operands[1]) < 0) ?constm1_rtx :const0_rtx));emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]),operands[1]));#elseunsigned int low, high;low = trunc_int_for_mode (INTVAL (operands[1]), SImode);high = trunc_int_for_mode (INTVAL (operands[1]) >> 32, SImode);emit_insn (gen_movsi (gen_highpart (SImode, operands[0]), GEN_INT (high)));/* Slick... but this trick loses if this subreg constant partcan be done in one insn. */if (low == high&& ! SPARC_SETHI32_P (high)&& ! SPARC_SIMM13_P (high))emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]),gen_highpart (SImode, operands[0])));elseemit_insn (gen_movsi (gen_lowpart (SImode, operands[0]), GEN_INT (low)));#endifDONE;})(define_split[(set (match_operand:DI 0 "register_operand" "")(match_operand:DI 1 "const_double_operand" ""))]"reload_completed&& (! TARGET_V9|| (! TARGET_ARCH64&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))))"[(clobber (const_int 0))]{emit_insn (gen_movsi (gen_highpart (SImode, operands[0]),GEN_INT (CONST_DOUBLE_HIGH (operands[1]))));/* Slick... but this trick loses if this subreg constant partcan be done in one insn. */if (CONST_DOUBLE_LOW (operands[1]) == CONST_DOUBLE_HIGH (operands[1])&& ! SPARC_SETHI32_P (CONST_DOUBLE_HIGH (operands[1]))&& ! SPARC_SIMM13_P (CONST_DOUBLE_HIGH (operands[1]))){emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]),gen_highpart (SImode, operands[0])));}else{emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]),GEN_INT (CONST_DOUBLE_LOW (operands[1]))));}DONE;})(define_split[(set (match_operand:DI 0 "register_operand" "")(match_operand:DI 1 "register_operand" ""))]"reload_completed&& (! TARGET_V9|| (! TARGET_ARCH64&& sparc_split_regreg_legitimate (operands[0],operands[1])))"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx set_src = operands[1];rtx dest1, dest2;rtx src1, src2;dest1 = gen_highpart (SImode, set_dest);dest2 = gen_lowpart (SImode, set_dest);src1 = gen_highpart (SImode, set_src);src2 = gen_lowpart (SImode, set_src);/* Now emit using the real source and destination we found, swappingthe order if we detect overlap. */if (reg_overlap_mentioned_p (dest1, src2)){emit_insn (gen_movsi (dest2, src2));emit_insn (gen_movsi (dest1, src1));}else{emit_insn (gen_movsi (dest1, src1));emit_insn (gen_movsi (dest2, src2));}DONE;});; Now handle the cases of memory moves from/to non-even;; DI mode register pairs.(define_split[(set (match_operand:DI 0 "register_operand" "")(match_operand:DI 1 "memory_operand" ""))]"(! TARGET_ARCH64&& reload_completed&& sparc_splitdi_legitimate (operands[0], operands[1]))"[(clobber (const_int 0))]{rtx word0 = adjust_address (operands[1], SImode, 0);rtx word1 = adjust_address (operands[1], SImode, 4);rtx high_part = gen_highpart (SImode, operands[0]);rtx low_part = gen_lowpart (SImode, operands[0]);if (reg_overlap_mentioned_p (high_part, word1)){emit_insn (gen_movsi (low_part, word1));emit_insn (gen_movsi (high_part, word0));}else{emit_insn (gen_movsi (high_part, word0));emit_insn (gen_movsi (low_part, word1));}DONE;})(define_split[(set (match_operand:DI 0 "memory_operand" "")(match_operand:DI 1 "register_operand" ""))]"(! TARGET_ARCH64&& reload_completed&& sparc_splitdi_legitimate (operands[1], operands[0]))"[(clobber (const_int 0))]{emit_insn (gen_movsi (adjust_address (operands[0], SImode, 0),gen_highpart (SImode, operands[1])));emit_insn (gen_movsi (adjust_address (operands[0], SImode, 4),gen_lowpart (SImode, operands[1])));DONE;})(define_split[(set (match_operand:DI 0 "memory_operand" "")(match_operand:DI 1 "const_zero_operand" ""))]"reload_completed&& (! TARGET_V9|| (! TARGET_ARCH64&& ! mem_min_alignment (operands[0], 8)))&& offsettable_memref_p (operands[0])"[(clobber (const_int 0))]{emit_insn (gen_movsi (adjust_address (operands[0], SImode, 0), const0_rtx));emit_insn (gen_movsi (adjust_address (operands[0], SImode, 4), const0_rtx));DONE;});; Floating point move instructions(define_expand "movsf"[(set (match_operand:SF 0 "nonimmediate_operand" "")(match_operand:SF 1 "general_operand" ""))]""{if (sparc_expand_move (SFmode, operands))DONE;})(define_insn "*movsf_insn"[(set (match_operand:SF 0 "nonimmediate_operand" "=d,d,f, *r,*r,*r,*r, f,f,*r,m, m")(match_operand:SF 1 "input_operand" "G,C,f,*rR, Q, S, f,*r,m, m,f,*rG"))]"(register_operand (operands[0], SFmode)|| register_or_zero_or_all_ones_operand (operands[1], SFmode))"{if (GET_CODE (operands[1]) == CONST_DOUBLE&& (which_alternative == 3|| which_alternative == 4|| which_alternative == 5)){REAL_VALUE_TYPE r;long i;REAL_VALUE_FROM_CONST_DOUBLE (r, operands[1]);REAL_VALUE_TO_TARGET_SINGLE (r, i);operands[1] = GEN_INT (i);}switch (which_alternative){case 0:return "fzeros\t%0";case 1:return "fones\t%0";case 2:return "fmovs\t%1, %0";case 3:return "mov\t%1, %0";case 4:return "sethi\t%%hi(%a1), %0";case 5:return "#";case 6:return "movstouw\t%1, %0";case 7:return "movwtos\t%1, %0";case 8:case 9:return "ld\t%1, %0";case 10:case 11:return "st\t%r1, %0";default:gcc_unreachable ();}}[(set_attr "type" "fga,fga,fpmove,*,*,*,*,*,fpload,load,fpstore,store")(set_attr "cpu_feature" "vis,vis,fpu,*,*,*,vis3,vis3,fpu,*,fpu,*")]);; The following 3 patterns build SFmode constants in integer registers.(define_insn "*movsf_lo_sum"[(set (match_operand:SF 0 "register_operand" "=r")(lo_sum:SF (match_operand:SF 1 "register_operand" "r")(match_operand:SF 2 "fp_const_high_losum_operand" "S")))]""{REAL_VALUE_TYPE r;long i;REAL_VALUE_FROM_CONST_DOUBLE (r, operands[2]);REAL_VALUE_TO_TARGET_SINGLE (r, i);operands[2] = GEN_INT (i);return "or\t%1, %%lo(%a2), %0";})(define_insn "*movsf_high"[(set (match_operand:SF 0 "register_operand" "=r")(high:SF (match_operand:SF 1 "fp_const_high_losum_operand" "S")))]""{REAL_VALUE_TYPE r;long i;REAL_VALUE_FROM_CONST_DOUBLE (r, operands[1]);REAL_VALUE_TO_TARGET_SINGLE (r, i);operands[1] = GEN_INT (i);return "sethi\t%%hi(%1), %0";})(define_split[(set (match_operand:SF 0 "register_operand" "")(match_operand:SF 1 "fp_const_high_losum_operand" ""))]"REG_P (operands[0]) && SPARC_INT_REG_P (REGNO (operands[0]))"[(set (match_dup 0) (high:SF (match_dup 1)))(set (match_dup 0) (lo_sum:SF (match_dup 0) (match_dup 1)))])(define_expand "movdf"[(set (match_operand:DF 0 "nonimmediate_operand" "")(match_operand:DF 1 "general_operand" ""))]""{if (sparc_expand_move (DFmode, operands))DONE;})(define_insn "*movdf_insn_sp32"[(set (match_operand:DF 0 "nonimmediate_operand" "=b,b,e,e,*r, f, e,T,W,U,T, f, *r, o,o")(match_operand:DF 1 "input_operand" "G,C,e,e, f,*r,W#F,G,e,T,U,o#F,*roF,*rG,f"))]"! TARGET_ARCH64&& (register_operand (operands[0], DFmode)|| register_or_zero_or_all_ones_operand (operands[1], DFmode))""@fzero\t%0fone\t%0fmovd\t%1, %0###ldd\t%1, %0stx\t%r1, %0std\t%1, %0ldd\t%1, %0std\t%1, %0####"[(set_attr "type" "fga,fga,fpmove,*,*,*,fpload,store,fpstore,load,store,*,*,*,*")(set_attr "length" "*,*,*,2,2,2,*,*,*,*,*,2,2,2,2")(set_attr "fptype" "double,double,double,*,*,*,*,*,*,*,*,*,*,*,*")(set_attr "cpu_feature" "vis,vis,v9,fpunotv9,vis3,vis3,fpu,v9,fpu,*,*,fpu,*,*,fpu")])(define_insn "*movdf_insn_sp64"[(set (match_operand:DF 0 "nonimmediate_operand" "=b,b,e,*r, e, e,W, *r,*r, m,*r")(match_operand:DF 1 "input_operand" "G,C,e, e,*r,W#F,e,*rG, m,*rG, F"))]"TARGET_ARCH64&& (register_operand (operands[0], DFmode)|| register_or_zero_or_all_ones_operand (operands[1], DFmode))""@fzero\t%0fone\t%0fmovd\t%1, %0movdtox\t%1, %0movxtod\t%1, %0ldd\t%1, %0std\t%1, %0mov\t%r1, %0ldx\t%1, %0stx\t%r1, %0#"[(set_attr "type" "fga,fga,fpmove,*,*,load,store,*,load,store,*")(set_attr "length" "*,*,*,*,*,*,*,*,*,*,2")(set_attr "fptype" "double,double,double,double,double,*,*,*,*,*,*")(set_attr "cpu_feature" "vis,vis,fpu,vis3,vis3,fpu,fpu,*,*,*,*")]);; This pattern builds DFmode constants in integer registers.(define_split[(set (match_operand:DF 0 "register_operand" "")(match_operand:DF 1 "const_double_operand" ""))]"REG_P (operands[0])&& SPARC_INT_REG_P (REGNO (operands[0]))&& ! const_zero_operand (operands[1], GET_MODE (operands[0]))&& reload_completed"[(clobber (const_int 0))]{operands[0] = gen_rtx_raw_REG (DImode, REGNO (operands[0]));if (TARGET_ARCH64){#if HOST_BITS_PER_WIDE_INT == 32gcc_unreachable ();#elseenum machine_mode mode = GET_MODE (operands[1]);rtx tem = simplify_subreg (DImode, operands[1], mode, 0);emit_insn (gen_movdi (operands[0], tem));#endif}else{enum machine_mode mode = GET_MODE (operands[1]);rtx hi = simplify_subreg (SImode, operands[1], mode, 0);rtx lo = simplify_subreg (SImode, operands[1], mode, 4);gcc_assert (GET_CODE (hi) == CONST_INT);gcc_assert (GET_CODE (lo) == CONST_INT);emit_insn (gen_movsi (gen_highpart (SImode, operands[0]), hi));/* Slick... but this trick loses if this subreg constant partcan be done in one insn. */if (lo == hi&& ! SPARC_SETHI32_P (INTVAL (hi))&& ! SPARC_SIMM13_P (INTVAL (hi))){emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]),gen_highpart (SImode, operands[0])));}else{emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]), lo));}}DONE;});; Ok, now the splits to handle all the multi insn and;; mis-aligned memory address cases.;; In these splits please take note that we must be;; careful when V9 but not ARCH64 because the integer;; register DFmode cases must be handled.(define_split[(set (match_operand:DF 0 "register_operand" "")(match_operand:DF 1 "register_operand" ""))]"(! TARGET_V9|| (! TARGET_ARCH64&& sparc_split_regreg_legitimate (operands[0],operands[1])))&& reload_completed"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx set_src = operands[1];rtx dest1, dest2;rtx src1, src2;dest1 = gen_highpart (SFmode, set_dest);dest2 = gen_lowpart (SFmode, set_dest);src1 = gen_highpart (SFmode, set_src);src2 = gen_lowpart (SFmode, set_src);/* Now emit using the real source and destination we found, swappingthe order if we detect overlap. */if (reg_overlap_mentioned_p (dest1, src2)){emit_move_insn_1 (dest2, src2);emit_move_insn_1 (dest1, src1);}else{emit_move_insn_1 (dest1, src1);emit_move_insn_1 (dest2, src2);}DONE;})(define_split[(set (match_operand:DF 0 "register_operand" "")(match_operand:DF 1 "memory_operand" ""))]"reload_completed&& ! TARGET_ARCH64&& (((REGNO (operands[0]) % 2) != 0)|| ! mem_min_alignment (operands[1], 8))&& offsettable_memref_p (operands[1])"[(clobber (const_int 0))]{rtx word0, word1;word0 = adjust_address (operands[1], SFmode, 0);word1 = adjust_address (operands[1], SFmode, 4);if (reg_overlap_mentioned_p (gen_highpart (SFmode, operands[0]), word1)){emit_move_insn_1 (gen_lowpart (SFmode, operands[0]), word1);emit_move_insn_1 (gen_highpart (SFmode, operands[0]), word0);}else{emit_move_insn_1 (gen_highpart (SFmode, operands[0]), word0);emit_move_insn_1 (gen_lowpart (SFmode, operands[0]), word1);}DONE;})(define_split[(set (match_operand:DF 0 "memory_operand" "")(match_operand:DF 1 "register_operand" ""))]"reload_completed&& ! TARGET_ARCH64&& (((REGNO (operands[1]) % 2) != 0)|| ! mem_min_alignment (operands[0], 8))&& offsettable_memref_p (operands[0])"[(clobber (const_int 0))]{rtx word0, word1;word0 = adjust_address (operands[0], SFmode, 0);word1 = adjust_address (operands[0], SFmode, 4);emit_move_insn_1 (word0, gen_highpart (SFmode, operands[1]));emit_move_insn_1 (word1, gen_lowpart (SFmode, operands[1]));DONE;})(define_split[(set (match_operand:DF 0 "memory_operand" "")(match_operand:DF 1 "const_zero_operand" ""))]"reload_completed&& (! TARGET_V9|| (! TARGET_ARCH64&& ! mem_min_alignment (operands[0], 8)))&& offsettable_memref_p (operands[0])"[(clobber (const_int 0))]{rtx dest1, dest2;dest1 = adjust_address (operands[0], SFmode, 0);dest2 = adjust_address (operands[0], SFmode, 4);emit_move_insn_1 (dest1, CONST0_RTX (SFmode));emit_move_insn_1 (dest2, CONST0_RTX (SFmode));DONE;})(define_split[(set (match_operand:DF 0 "register_operand" "")(match_operand:DF 1 "const_zero_operand" ""))]"reload_completed&& ! TARGET_ARCH64&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx dest1, dest2;dest1 = gen_highpart (SFmode, set_dest);dest2 = gen_lowpart (SFmode, set_dest);emit_move_insn_1 (dest1, CONST0_RTX (SFmode));emit_move_insn_1 (dest2, CONST0_RTX (SFmode));DONE;})(define_expand "movtf"[(set (match_operand:TF 0 "nonimmediate_operand" "")(match_operand:TF 1 "general_operand" ""))]""{if (sparc_expand_move (TFmode, operands))DONE;})(define_insn "*movtf_insn_sp32"[(set (match_operand:TF 0 "nonimmediate_operand" "=b, e,o, o,U, r")(match_operand:TF 1 "input_operand" " G,oe,e,rGU,o,roG"))]"! TARGET_ARCH64&& (register_operand (operands[0], TFmode)|| register_or_zero_operand (operands[1], TFmode))""#"[(set_attr "length" "4,4,4,4,4,4")(set_attr "cpu_feature" "fpu,fpu,fpu,*,*,*")])(define_insn "*movtf_insn_sp64"[(set (match_operand:TF 0 "nonimmediate_operand" "=b, e,o, o, r")(match_operand:TF 1 "input_operand" "G,oe,e,rG,roG"))]"TARGET_ARCH64&& ! TARGET_HARD_QUAD&& (register_operand (operands[0], TFmode)|| register_or_zero_operand (operands[1], TFmode))""#"[(set_attr "length" "2,2,2,2,2")(set_attr "cpu_feature" "fpu,fpu,fpu,*,*")])(define_insn "*movtf_insn_sp64_hq"[(set (match_operand:TF 0 "nonimmediate_operand" "=b,e,e,m, o, r")(match_operand:TF 1 "input_operand" "G,e,m,e,rG,roG"))]"TARGET_ARCH64&& TARGET_HARD_QUAD&& (register_operand (operands[0], TFmode)|| register_or_zero_operand (operands[1], TFmode))""@#fmovq\t%1, %0ldq\t%1, %0stq\t%1, %0##"[(set_attr "type" "*,fpmove,fpload,fpstore,*,*")(set_attr "length" "2,*,*,*,2,2")]);; Now all the splits to handle multi-insn TF mode moves.(define_split[(set (match_operand:TF 0 "register_operand" "")(match_operand:TF 1 "register_operand" ""))]"reload_completed&& (! TARGET_ARCH64|| (TARGET_FPU&& ! TARGET_HARD_QUAD)|| (! fp_register_operand (operands[0], TFmode)&& ! fp_register_operand (operands[1], TFmode)))"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx set_src = operands[1];rtx dest1, dest2;rtx src1, src2;dest1 = gen_df_reg (set_dest, 0);dest2 = gen_df_reg (set_dest, 1);src1 = gen_df_reg (set_src, 0);src2 = gen_df_reg (set_src, 1);/* Now emit using the real source and destination we found, swappingthe order if we detect overlap. */if (reg_overlap_mentioned_p (dest1, src2)){emit_insn (gen_movdf (dest2, src2));emit_insn (gen_movdf (dest1, src1));}else{emit_insn (gen_movdf (dest1, src1));emit_insn (gen_movdf (dest2, src2));}DONE;})(define_split[(set (match_operand:TF 0 "nonimmediate_operand" "")(match_operand:TF 1 "const_zero_operand" ""))]"reload_completed"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx dest1, dest2;switch (GET_CODE (set_dest)){case REG:dest1 = gen_df_reg (set_dest, 0);dest2 = gen_df_reg (set_dest, 1);break;case MEM:dest1 = adjust_address (set_dest, DFmode, 0);dest2 = adjust_address (set_dest, DFmode, 8);break;default:gcc_unreachable ();}emit_insn (gen_movdf (dest1, CONST0_RTX (DFmode)));emit_insn (gen_movdf (dest2, CONST0_RTX (DFmode)));DONE;})(define_split[(set (match_operand:TF 0 "register_operand" "")(match_operand:TF 1 "memory_operand" ""))]"(reload_completed&& offsettable_memref_p (operands[1])&& (! TARGET_ARCH64|| ! TARGET_HARD_QUAD|| ! fp_register_operand (operands[0], TFmode)))"[(clobber (const_int 0))]{rtx word0 = adjust_address (operands[1], DFmode, 0);rtx word1 = adjust_address (operands[1], DFmode, 8);rtx set_dest, dest1, dest2;set_dest = operands[0];dest1 = gen_df_reg (set_dest, 0);dest2 = gen_df_reg (set_dest, 1);/* Now output, ordering such that we don't clobber any registersmentioned in the address. */if (reg_overlap_mentioned_p (dest1, word1)){emit_insn (gen_movdf (dest2, word1));emit_insn (gen_movdf (dest1, word0));}else{emit_insn (gen_movdf (dest1, word0));emit_insn (gen_movdf (dest2, word1));}DONE;})(define_split[(set (match_operand:TF 0 "memory_operand" "")(match_operand:TF 1 "register_operand" ""))]"(reload_completed&& offsettable_memref_p (operands[0])&& (! TARGET_ARCH64|| ! TARGET_HARD_QUAD|| ! fp_register_operand (operands[1], TFmode)))"[(clobber (const_int 0))]{rtx set_src = operands[1];emit_insn (gen_movdf (adjust_address (operands[0], DFmode, 0),gen_df_reg (set_src, 0)));emit_insn (gen_movdf (adjust_address (operands[0], DFmode, 8),gen_df_reg (set_src, 1)));DONE;});; SPARC-V9 conditional move instructions;; We can handle larger constants here for some flavors, but for now we keep;; it simple and only allow those constants supported by all flavors.;; Note that emit_conditional_move canonicalizes operands 2,3 so that operand;; 3 contains the constant if one is present, but we handle either for;; generality (sparc.c puts a constant in operand 2).;;;; Our instruction patterns, on the other hand, canonicalize such that;; operand 3 must be the set destination.(define_expand "mov<I:mode>cc"[(set (match_operand:I 0 "register_operand" "")(if_then_else:I (match_operand 1 "comparison_operator" "")(match_operand:I 2 "arith10_operand" "")(match_operand:I 3 "arith10_operand" "")))]"TARGET_V9 && !(<I:MODE>mode == DImode && TARGET_ARCH32)"{if (! sparc_expand_conditional_move (<I:MODE>mode, operands))FAIL;DONE;})(define_expand "mov<F:mode>cc"[(set (match_operand:F 0 "register_operand" "")(if_then_else:F (match_operand 1 "comparison_operator" "")(match_operand:F 2 "register_operand" "")(match_operand:F 3 "register_operand" "")))]"TARGET_V9 && TARGET_FPU"{if (! sparc_expand_conditional_move (<F:MODE>mode, operands))FAIL;DONE;});; Conditional move define_insns(define_insn "*mov<I:mode>_cc_v9"[(set (match_operand:I 0 "register_operand" "=r")(if_then_else:I (match_operator 1 "comparison_operator"[(match_operand 2 "icc_or_fcc_register_operand" "X")(const_int 0)])(match_operand:I 3 "arith11_operand" "rL")(match_operand:I 4 "register_operand" "0")))]"TARGET_V9 && !(<I:MODE>mode == DImode && TARGET_ARCH32)""mov%C1\t%x2, %3, %0"[(set_attr "type" "cmove")])(define_insn "*mov<I:mode>_cc_reg_sp64"[(set (match_operand:I 0 "register_operand" "=r")(if_then_else:I (match_operator 1 "v9_register_compare_operator"[(match_operand:DI 2 "register_operand" "r")(const_int 0)])(match_operand:I 3 "arith10_operand" "rM")(match_operand:I 4 "register_operand" "0")))]"TARGET_ARCH64""movr%D1\t%2, %r3, %0"[(set_attr "type" "cmove")])(define_insn "*movsf_cc_v9"[(set (match_operand:SF 0 "register_operand" "=f")(if_then_else:SF (match_operator 1 "comparison_operator"[(match_operand 2 "icc_or_fcc_register_operand" "X")(const_int 0)])(match_operand:SF 3 "register_operand" "f")(match_operand:SF 4 "register_operand" "0")))]"TARGET_V9 && TARGET_FPU""fmovs%C1\t%x2, %3, %0"[(set_attr "type" "fpcmove")])(define_insn "*movsf_cc_reg_sp64"[(set (match_operand:SF 0 "register_operand" "=f")(if_then_else:SF (match_operator 1 "v9_register_compare_operator"[(match_operand:DI 2 "register_operand" "r")(const_int 0)])(match_operand:SF 3 "register_operand" "f")(match_operand:SF 4 "register_operand" "0")))]"TARGET_ARCH64 && TARGET_FPU""fmovrs%D1\t%2, %3, %0"[(set_attr "type" "fpcrmove")]);; Named because invoked by movtf_cc_v9(define_insn "movdf_cc_v9"[(set (match_operand:DF 0 "register_operand" "=e")(if_then_else:DF (match_operator 1 "comparison_operator"[(match_operand 2 "icc_or_fcc_register_operand" "X")(const_int 0)])(match_operand:DF 3 "register_operand" "e")(match_operand:DF 4 "register_operand" "0")))]"TARGET_V9 && TARGET_FPU""fmovd%C1\t%x2, %3, %0"[(set_attr "type" "fpcmove")(set_attr "fptype" "double")]);; Named because invoked by movtf_cc_reg_sp64(define_insn "movdf_cc_reg_sp64"[(set (match_operand:DF 0 "register_operand" "=e")(if_then_else:DF (match_operator 1 "v9_register_compare_operator"[(match_operand:DI 2 "register_operand" "r")(const_int 0)])(match_operand:DF 3 "register_operand" "e")(match_operand:DF 4 "register_operand" "0")))]"TARGET_ARCH64 && TARGET_FPU""fmovrd%D1\t%2, %3, %0"[(set_attr "type" "fpcrmove")(set_attr "fptype" "double")])(define_insn "*movtf_cc_hq_v9"[(set (match_operand:TF 0 "register_operand" "=e")(if_then_else:TF (match_operator 1 "comparison_operator"[(match_operand 2 "icc_or_fcc_register_operand" "X")(const_int 0)])(match_operand:TF 3 "register_operand" "e")(match_operand:TF 4 "register_operand" "0")))]"TARGET_V9 && TARGET_FPU && TARGET_HARD_QUAD""fmovq%C1\t%x2, %3, %0"[(set_attr "type" "fpcmove")])(define_insn "*movtf_cc_reg_hq_sp64"[(set (match_operand:TF 0 "register_operand" "=e")(if_then_else:TF (match_operator 1 "v9_register_compare_operator"[(match_operand:DI 2 "register_operand" "r")(const_int 0)])(match_operand:TF 3 "register_operand" "e")(match_operand:TF 4 "register_operand" "0")))]"TARGET_ARCH64 && TARGET_FPU && TARGET_HARD_QUAD""fmovrq%D1\t%2, %3, %0"[(set_attr "type" "fpcrmove")])(define_insn_and_split "*movtf_cc_v9"[(set (match_operand:TF 0 "register_operand" "=e")(if_then_else:TF (match_operator 1 "comparison_operator"[(match_operand 2 "icc_or_fcc_register_operand" "X")(const_int 0)])(match_operand:TF 3 "register_operand" "e")(match_operand:TF 4 "register_operand" "0")))]"TARGET_V9 && TARGET_FPU && !TARGET_HARD_QUAD""#""&& reload_completed"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx set_srca = operands[3];rtx dest1, dest2;rtx srca1, srca2;dest1 = gen_df_reg (set_dest, 0);dest2 = gen_df_reg (set_dest, 1);srca1 = gen_df_reg (set_srca, 0);srca2 = gen_df_reg (set_srca, 1);if (reg_overlap_mentioned_p (dest1, srca2)){emit_insn (gen_movdf_cc_v9 (dest2, operands[1], operands[2], srca2, dest2));emit_insn (gen_movdf_cc_v9 (dest1, operands[1], operands[2], srca1, dest1));}else{emit_insn (gen_movdf_cc_v9 (dest1, operands[1], operands[2], srca1, dest1));emit_insn (gen_movdf_cc_v9 (dest2, operands[1], operands[2], srca2, dest2));}DONE;}[(set_attr "length" "2")])(define_insn_and_split "*movtf_cc_reg_sp64"[(set (match_operand:TF 0 "register_operand" "=e")(if_then_else:TF (match_operator 1 "v9_register_compare_operator"[(match_operand:DI 2 "register_operand" "r")(const_int 0)])(match_operand:TF 3 "register_operand" "e")(match_operand:TF 4 "register_operand" "0")))]"TARGET_ARCH64 && TARGET_FPU && ! TARGET_HARD_QUAD""#""&& reload_completed"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx set_srca = operands[3];rtx dest1, dest2;rtx srca1, srca2;dest1 = gen_df_reg (set_dest, 0);dest2 = gen_df_reg (set_dest, 1);srca1 = gen_df_reg (set_srca, 0);srca2 = gen_df_reg (set_srca, 1);if (reg_overlap_mentioned_p (dest1, srca2)){emit_insn (gen_movdf_cc_reg_sp64 (dest2, operands[1], operands[2], srca2, dest2));emit_insn (gen_movdf_cc_reg_sp64 (dest1, operands[1], operands[2], srca1, dest1));}else{emit_insn (gen_movdf_cc_reg_sp64 (dest1, operands[1], operands[2], srca1, dest1));emit_insn (gen_movdf_cc_reg_sp64 (dest2, operands[1], operands[2], srca2, dest2));}DONE;}[(set_attr "length" "2")]);; Zero-extension instructions;; These patterns originally accepted general_operands, however, slightly;; better code is generated by only accepting register_operands, and then;; letting combine generate the ldu[hb] insns.(define_expand "zero_extendhisi2"[(set (match_operand:SI 0 "register_operand" "")(zero_extend:SI (match_operand:HI 1 "register_operand" "")))]""{rtx temp = gen_reg_rtx (SImode);rtx shift_16 = GEN_INT (16);int op1_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (SImode);op1_subbyte *= GET_MODE_SIZE (SImode);operand1 = XEXP (operand1, 0);}emit_insn (gen_ashlsi3 (temp, gen_rtx_SUBREG (SImode, operand1, op1_subbyte),shift_16));emit_insn (gen_lshrsi3 (operand0, temp, shift_16));DONE;})(define_insn "*zero_extendhisi2_insn"[(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (match_operand:HI 1 "memory_operand" "m")))]"""lduh\t%1, %0"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_expand "zero_extendqihi2"[(set (match_operand:HI 0 "register_operand" "")(zero_extend:HI (match_operand:QI 1 "register_operand" "")))]"""")(define_insn "*zero_extendqihi2_insn"[(set (match_operand:HI 0 "register_operand" "=r,r")(zero_extend:HI (match_operand:QI 1 "input_operand" "r,m")))]"GET_CODE (operands[1]) != CONST_INT""@and\t%1, 0xff, %0ldub\t%1, %0"[(set_attr "type" "*,load")(set_attr "us3load_type" "*,3cycle")])(define_expand "zero_extendqisi2"[(set (match_operand:SI 0 "register_operand" "")(zero_extend:SI (match_operand:QI 1 "register_operand" "")))]"""")(define_insn "*zero_extendqisi2_insn"[(set (match_operand:SI 0 "register_operand" "=r,r")(zero_extend:SI (match_operand:QI 1 "input_operand" "r,m")))]"GET_CODE (operands[1]) != CONST_INT""@and\t%1, 0xff, %0ldub\t%1, %0"[(set_attr "type" "*,load")(set_attr "us3load_type" "*,3cycle")])(define_expand "zero_extendqidi2"[(set (match_operand:DI 0 "register_operand" "")(zero_extend:DI (match_operand:QI 1 "register_operand" "")))]"TARGET_ARCH64""")(define_insn "*zero_extendqidi2_insn"[(set (match_operand:DI 0 "register_operand" "=r,r")(zero_extend:DI (match_operand:QI 1 "input_operand" "r,m")))]"TARGET_ARCH64 && GET_CODE (operands[1]) != CONST_INT""@and\t%1, 0xff, %0ldub\t%1, %0"[(set_attr "type" "*,load")(set_attr "us3load_type" "*,3cycle")])(define_expand "zero_extendhidi2"[(set (match_operand:DI 0 "register_operand" "")(zero_extend:DI (match_operand:HI 1 "register_operand" "")))]"TARGET_ARCH64"{rtx temp = gen_reg_rtx (DImode);rtx shift_48 = GEN_INT (48);int op1_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (DImode);op1_subbyte *= GET_MODE_SIZE (DImode);operand1 = XEXP (operand1, 0);}emit_insn (gen_ashldi3 (temp, gen_rtx_SUBREG (DImode, operand1, op1_subbyte),shift_48));emit_insn (gen_lshrdi3 (operand0, temp, shift_48));DONE;})(define_insn "*zero_extendhidi2_insn"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (match_operand:HI 1 "memory_operand" "m")))]"TARGET_ARCH64""lduh\t%1, %0"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")]);; ??? Write truncdisi pattern using sra?(define_expand "zero_extendsidi2"[(set (match_operand:DI 0 "register_operand" "")(zero_extend:DI (match_operand:SI 1 "register_operand" "")))]"""")(define_insn "*zero_extendsidi2_insn_sp64"[(set (match_operand:DI 0 "register_operand" "=r,r,r")(zero_extend:DI (match_operand:SI 1 "input_operand" "r,m,*f")))]"TARGET_ARCH64&& GET_CODE (operands[1]) != CONST_INT""@srl\t%1, 0, %0lduw\t%1, %0movstouw\t%1, %0"[(set_attr "type" "shift,load,*")(set_attr "cpu_feature" "*,*,vis3")])(define_insn_and_split "*zero_extendsidi2_insn_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (match_operand:SI 1 "register_operand" "r")))]"! TARGET_ARCH64""#""&& reload_completed"[(set (match_dup 2) (match_dup 3))(set (match_dup 4) (match_dup 5))]{rtx dest1, dest2;dest1 = gen_highpart (SImode, operands[0]);dest2 = gen_lowpart (SImode, operands[0]);/* Swap the order in case of overlap. */if (REGNO (dest1) == REGNO (operands[1])){operands[2] = dest2;operands[3] = operands[1];operands[4] = dest1;operands[5] = const0_rtx;}else{operands[2] = dest1;operands[3] = const0_rtx;operands[4] = dest2;operands[5] = operands[1];}}[(set_attr "length" "2")]);; Simplify comparisons of extended values.(define_insn "*cmp_zero_extendqisi2"[(set (reg:CC CC_REG)(compare:CC (zero_extend:SI (match_operand:QI 0 "register_operand" "r"))(const_int 0)))]"""andcc\t%0, 0xff, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_qi"[(set (reg:CC CC_REG)(compare:CC (match_operand:QI 0 "register_operand" "r")(const_int 0)))]"""andcc\t%0, 0xff, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_extendqisi2_set"[(set (reg:CC CC_REG)(compare:CC (zero_extend:SI (match_operand:QI 1 "register_operand" "r"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (match_dup 1)))]"""andcc\t%1, 0xff, %0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_extendqisi2_andcc_set"[(set (reg:CC CC_REG)(compare:CC (and:SI (match_operand:SI 1 "register_operand" "r")(const_int 255))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (subreg:QI (match_dup 1) 0)))]"""andcc\t%1, 0xff, %0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_extendqidi2"[(set (reg:CCX CC_REG)(compare:CCX (zero_extend:DI (match_operand:QI 0 "register_operand" "r"))(const_int 0)))]"TARGET_ARCH64""andcc\t%0, 0xff, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_qi_sp64"[(set (reg:CCX CC_REG)(compare:CCX (match_operand:QI 0 "register_operand" "r")(const_int 0)))]"TARGET_ARCH64""andcc\t%0, 0xff, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_extendqidi2_set"[(set (reg:CCX CC_REG)(compare:CCX (zero_extend:DI (match_operand:QI 1 "register_operand" "r"))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (match_dup 1)))]"TARGET_ARCH64""andcc\t%1, 0xff, %0"[(set_attr "type" "compare")])(define_insn "*cmp_zero_extendqidi2_andcc_set"[(set (reg:CCX CC_REG)(compare:CCX (and:DI (match_operand:DI 1 "register_operand" "r")(const_int 255))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (subreg:QI (match_dup 1) 0)))]"TARGET_ARCH64""andcc\t%1, 0xff, %0"[(set_attr "type" "compare")]);; Similarly, handle {SI,DI}->QI mode truncation followed by a compare.(define_insn "*cmp_siqi_trunc"[(set (reg:CC CC_REG)(compare:CC (subreg:QI (match_operand:SI 0 "register_operand" "r") 3)(const_int 0)))]"""andcc\t%0, 0xff, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_siqi_trunc_set"[(set (reg:CC CC_REG)(compare:CC (subreg:QI (match_operand:SI 1 "register_operand" "r") 3)(const_int 0)))(set (match_operand:QI 0 "register_operand" "=r")(subreg:QI (match_dup 1) 3))]"""andcc\t%1, 0xff, %0"[(set_attr "type" "compare")])(define_insn "*cmp_diqi_trunc"[(set (reg:CC CC_REG)(compare:CC (subreg:QI (match_operand:DI 0 "register_operand" "r") 7)(const_int 0)))]"TARGET_ARCH64""andcc\t%0, 0xff, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_diqi_trunc_set"[(set (reg:CC CC_REG)(compare:CC (subreg:QI (match_operand:DI 1 "register_operand" "r") 7)(const_int 0)))(set (match_operand:QI 0 "register_operand" "=r")(subreg:QI (match_dup 1) 7))]"TARGET_ARCH64""andcc\t%1, 0xff, %0"[(set_attr "type" "compare")]);; Sign-extension instructions;; These patterns originally accepted general_operands, however, slightly;; better code is generated by only accepting register_operands, and then;; letting combine generate the lds[hb] insns.(define_expand "extendhisi2"[(set (match_operand:SI 0 "register_operand" "")(sign_extend:SI (match_operand:HI 1 "register_operand" "")))]""{rtx temp = gen_reg_rtx (SImode);rtx shift_16 = GEN_INT (16);int op1_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (SImode);op1_subbyte *= GET_MODE_SIZE (SImode);operand1 = XEXP (operand1, 0);}emit_insn (gen_ashlsi3 (temp, gen_rtx_SUBREG (SImode, operand1, op1_subbyte),shift_16));emit_insn (gen_ashrsi3 (operand0, temp, shift_16));DONE;})(define_insn "*sign_extendhisi2_insn"[(set (match_operand:SI 0 "register_operand" "=r")(sign_extend:SI (match_operand:HI 1 "memory_operand" "m")))]"""ldsh\t%1, %0"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_expand "extendqihi2"[(set (match_operand:HI 0 "register_operand" "")(sign_extend:HI (match_operand:QI 1 "register_operand" "")))]""{rtx temp = gen_reg_rtx (SImode);rtx shift_24 = GEN_INT (24);int op1_subbyte = 0;int op0_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (SImode);op1_subbyte *= GET_MODE_SIZE (SImode);operand1 = XEXP (operand1, 0);}if (GET_CODE (operand0) == SUBREG){op0_subbyte = SUBREG_BYTE (operand0);op0_subbyte /= GET_MODE_SIZE (SImode);op0_subbyte *= GET_MODE_SIZE (SImode);operand0 = XEXP (operand0, 0);}emit_insn (gen_ashlsi3 (temp, gen_rtx_SUBREG (SImode, operand1, op1_subbyte),shift_24));if (GET_MODE (operand0) != SImode)operand0 = gen_rtx_SUBREG (SImode, operand0, op0_subbyte);emit_insn (gen_ashrsi3 (operand0, temp, shift_24));DONE;})(define_insn "*sign_extendqihi2_insn"[(set (match_operand:HI 0 "register_operand" "=r")(sign_extend:HI (match_operand:QI 1 "memory_operand" "m")))]"""ldsb\t%1, %0"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_expand "extendqisi2"[(set (match_operand:SI 0 "register_operand" "")(sign_extend:SI (match_operand:QI 1 "register_operand" "")))]""{rtx temp = gen_reg_rtx (SImode);rtx shift_24 = GEN_INT (24);int op1_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (SImode);op1_subbyte *= GET_MODE_SIZE (SImode);operand1 = XEXP (operand1, 0);}emit_insn (gen_ashlsi3 (temp, gen_rtx_SUBREG (SImode, operand1, op1_subbyte),shift_24));emit_insn (gen_ashrsi3 (operand0, temp, shift_24));DONE;})(define_insn "*sign_extendqisi2_insn"[(set (match_operand:SI 0 "register_operand" "=r")(sign_extend:SI (match_operand:QI 1 "memory_operand" "m")))]"""ldsb\t%1, %0"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_expand "extendqidi2"[(set (match_operand:DI 0 "register_operand" "")(sign_extend:DI (match_operand:QI 1 "register_operand" "")))]"TARGET_ARCH64"{rtx temp = gen_reg_rtx (DImode);rtx shift_56 = GEN_INT (56);int op1_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (DImode);op1_subbyte *= GET_MODE_SIZE (DImode);operand1 = XEXP (operand1, 0);}emit_insn (gen_ashldi3 (temp, gen_rtx_SUBREG (DImode, operand1, op1_subbyte),shift_56));emit_insn (gen_ashrdi3 (operand0, temp, shift_56));DONE;})(define_insn "*sign_extendqidi2_insn"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (match_operand:QI 1 "memory_operand" "m")))]"TARGET_ARCH64""ldsb\t%1, %0"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_expand "extendhidi2"[(set (match_operand:DI 0 "register_operand" "")(sign_extend:DI (match_operand:HI 1 "register_operand" "")))]"TARGET_ARCH64"{rtx temp = gen_reg_rtx (DImode);rtx shift_48 = GEN_INT (48);int op1_subbyte = 0;if (GET_CODE (operand1) == SUBREG){op1_subbyte = SUBREG_BYTE (operand1);op1_subbyte /= GET_MODE_SIZE (DImode);op1_subbyte *= GET_MODE_SIZE (DImode);operand1 = XEXP (operand1, 0);}emit_insn (gen_ashldi3 (temp, gen_rtx_SUBREG (DImode, operand1, op1_subbyte),shift_48));emit_insn (gen_ashrdi3 (operand0, temp, shift_48));DONE;})(define_insn "*sign_extendhidi2_insn"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (match_operand:HI 1 "memory_operand" "m")))]"TARGET_ARCH64""ldsh\t%1, %0"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_expand "extendsidi2"[(set (match_operand:DI 0 "register_operand" "")(sign_extend:DI (match_operand:SI 1 "register_operand" "")))]"TARGET_ARCH64""")(define_insn "*sign_extendsidi2_insn"[(set (match_operand:DI 0 "register_operand" "=r,r,r")(sign_extend:DI (match_operand:SI 1 "input_operand" "r,m,*f")))]"TARGET_ARCH64""@sra\t%1, 0, %0ldsw\t%1, %0movstosw\t%1, %0"[(set_attr "type" "shift,sload,*")(set_attr "us3load_type" "*,3cycle,*")(set_attr "cpu_feature" "*,*,vis3")]);; Special pattern for optimizing bit-field compares. This is needed;; because combine uses this as a canonical form.(define_insn "*cmp_zero_extract"[(set (reg:CC CC_REG)(compare:CC(zero_extract:SI (match_operand:SI 0 "register_operand" "r")(match_operand:SI 1 "small_int_operand" "I")(match_operand:SI 2 "small_int_operand" "I"))(const_int 0)))]"INTVAL (operands[2]) > 19"{int len = INTVAL (operands[1]);int pos = 32 - INTVAL (operands[2]) - len;HOST_WIDE_INT mask = ((1 << len) - 1) << pos;operands[1] = GEN_INT (mask);return "andcc\t%0, %1, %%g0";}[(set_attr "type" "compare")])(define_insn "*cmp_zero_extract_sp64"[(set (reg:CCX CC_REG)(compare:CCX(zero_extract:DI (match_operand:DI 0 "register_operand" "r")(match_operand:SI 1 "small_int_operand" "I")(match_operand:SI 2 "small_int_operand" "I"))(const_int 0)))]"TARGET_ARCH64 && INTVAL (operands[2]) > 51"{int len = INTVAL (operands[1]);int pos = 64 - INTVAL (operands[2]) - len;HOST_WIDE_INT mask = (((unsigned HOST_WIDE_INT) 1 << len) - 1) << pos;operands[1] = GEN_INT (mask);return "andcc\t%0, %1, %%g0";}[(set_attr "type" "compare")]);; Conversions between float, double and long double.(define_insn "extendsfdf2"[(set (match_operand:DF 0 "register_operand" "=e")(float_extend:DF(match_operand:SF 1 "register_operand" "f")))]"TARGET_FPU""fstod\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "extendsftf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(float_extend:TF(match_operand:SF 1 "register_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FLOAT_EXTEND, operands); DONE;")(define_insn "*extendsftf2_hq"[(set (match_operand:TF 0 "register_operand" "=e")(float_extend:TF(match_operand:SF 1 "register_operand" "f")))]"TARGET_FPU && TARGET_HARD_QUAD""fstoq\t%1, %0"[(set_attr "type" "fp")])(define_expand "extenddftf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(float_extend:TF(match_operand:DF 1 "register_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FLOAT_EXTEND, operands); DONE;")(define_insn "*extenddftf2_hq"[(set (match_operand:TF 0 "register_operand" "=e")(float_extend:TF(match_operand:DF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fdtoq\t%1, %0"[(set_attr "type" "fp")])(define_insn "truncdfsf2"[(set (match_operand:SF 0 "register_operand" "=f")(float_truncate:SF(match_operand:DF 1 "register_operand" "e")))]"TARGET_FPU""fdtos\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "trunctfsf2"[(set (match_operand:SF 0 "register_operand" "")(float_truncate:SF(match_operand:TF 1 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FLOAT_TRUNCATE, operands); DONE;")(define_insn "*trunctfsf2_hq"[(set (match_operand:SF 0 "register_operand" "=f")(float_truncate:SF(match_operand:TF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fqtos\t%1, %0"[(set_attr "type" "fp")])(define_expand "trunctfdf2"[(set (match_operand:DF 0 "register_operand" "")(float_truncate:DF(match_operand:TF 1 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FLOAT_TRUNCATE, operands); DONE;")(define_insn "*trunctfdf2_hq"[(set (match_operand:DF 0 "register_operand" "=e")(float_truncate:DF(match_operand:TF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fqtod\t%1, %0"[(set_attr "type" "fp")]);; Conversion between fixed point and floating point.(define_insn "floatsisf2"[(set (match_operand:SF 0 "register_operand" "=f")(float:SF (match_operand:SI 1 "register_operand" "f")))]"TARGET_FPU""fitos\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "floatsidf2"[(set (match_operand:DF 0 "register_operand" "=e")(float:DF (match_operand:SI 1 "register_operand" "f")))]"TARGET_FPU""fitod\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "floatsitf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(float:TF (match_operand:SI 1 "register_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FLOAT, operands); DONE;")(define_insn "*floatsitf2_hq"[(set (match_operand:TF 0 "register_operand" "=e")(float:TF (match_operand:SI 1 "register_operand" "f")))]"TARGET_FPU && TARGET_HARD_QUAD""fitoq\t%1, %0"[(set_attr "type" "fp")])(define_expand "floatunssitf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(unsigned_float:TF (match_operand:SI 1 "register_operand" "")))]"TARGET_FPU && TARGET_ARCH64 && ! TARGET_HARD_QUAD""emit_tfmode_cvt (UNSIGNED_FLOAT, operands); DONE;");; Now the same for 64 bit sources.(define_insn "floatdisf2"[(set (match_operand:SF 0 "register_operand" "=f")(float:SF (match_operand:DI 1 "register_operand" "e")))]"TARGET_V9 && TARGET_FPU""fxtos\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "floatunsdisf2"[(use (match_operand:SF 0 "register_operand" ""))(use (match_operand:DI 1 "general_operand" ""))]"TARGET_ARCH64 && TARGET_FPU""sparc_emit_floatunsdi (operands, SFmode); DONE;")(define_insn "floatdidf2"[(set (match_operand:DF 0 "register_operand" "=e")(float:DF (match_operand:DI 1 "register_operand" "e")))]"TARGET_V9 && TARGET_FPU""fxtod\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "floatunsdidf2"[(use (match_operand:DF 0 "register_operand" ""))(use (match_operand:DI 1 "general_operand" ""))]"TARGET_ARCH64 && TARGET_FPU""sparc_emit_floatunsdi (operands, DFmode); DONE;")(define_expand "floatditf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(float:TF (match_operand:DI 1 "register_operand" "")))]"TARGET_FPU && TARGET_V9 && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FLOAT, operands); DONE;")(define_insn "*floatditf2_hq"[(set (match_operand:TF 0 "register_operand" "=e")(float:TF (match_operand:DI 1 "register_operand" "e")))]"TARGET_V9 && TARGET_FPU && TARGET_HARD_QUAD""fxtoq\t%1, %0"[(set_attr "type" "fp")])(define_expand "floatunsditf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(unsigned_float:TF (match_operand:DI 1 "register_operand" "")))]"TARGET_FPU && TARGET_ARCH64 && ! TARGET_HARD_QUAD""emit_tfmode_cvt (UNSIGNED_FLOAT, operands); DONE;");; Convert a float to an actual integer.;; Truncation is performed as part of the conversion.(define_insn "fix_truncsfsi2"[(set (match_operand:SI 0 "register_operand" "=f")(fix:SI (fix:SF (match_operand:SF 1 "register_operand" "f"))))]"TARGET_FPU""fstoi\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "fix_truncdfsi2"[(set (match_operand:SI 0 "register_operand" "=f")(fix:SI (fix:DF (match_operand:DF 1 "register_operand" "e"))))]"TARGET_FPU""fdtoi\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "fix_trunctfsi2"[(set (match_operand:SI 0 "register_operand" "")(fix:SI (match_operand:TF 1 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FIX, operands); DONE;")(define_insn "*fix_trunctfsi2_hq"[(set (match_operand:SI 0 "register_operand" "=f")(fix:SI (match_operand:TF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fqtoi\t%1, %0"[(set_attr "type" "fp")])(define_expand "fixuns_trunctfsi2"[(set (match_operand:SI 0 "register_operand" "")(unsigned_fix:SI (match_operand:TF 1 "general_operand" "")))]"TARGET_FPU && TARGET_ARCH64 && ! TARGET_HARD_QUAD""emit_tfmode_cvt (UNSIGNED_FIX, operands); DONE;");; Now the same, for V9 targets(define_insn "fix_truncsfdi2"[(set (match_operand:DI 0 "register_operand" "=e")(fix:DI (fix:SF (match_operand:SF 1 "register_operand" "f"))))]"TARGET_V9 && TARGET_FPU""fstox\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "fixuns_truncsfdi2"[(use (match_operand:DI 0 "register_operand" ""))(use (match_operand:SF 1 "general_operand" ""))]"TARGET_ARCH64 && TARGET_FPU""sparc_emit_fixunsdi (operands, SFmode); DONE;")(define_insn "fix_truncdfdi2"[(set (match_operand:DI 0 "register_operand" "=e")(fix:DI (fix:DF (match_operand:DF 1 "register_operand" "e"))))]"TARGET_V9 && TARGET_FPU""fdtox\t%1, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "fixuns_truncdfdi2"[(use (match_operand:DI 0 "register_operand" ""))(use (match_operand:DF 1 "general_operand" ""))]"TARGET_ARCH64 && TARGET_FPU""sparc_emit_fixunsdi (operands, DFmode); DONE;")(define_expand "fix_trunctfdi2"[(set (match_operand:DI 0 "register_operand" "")(fix:DI (match_operand:TF 1 "general_operand" "")))]"TARGET_V9 && TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_cvt (FIX, operands); DONE;")(define_insn "*fix_trunctfdi2_hq"[(set (match_operand:DI 0 "register_operand" "=e")(fix:DI (match_operand:TF 1 "register_operand" "e")))]"TARGET_V9 && TARGET_FPU && TARGET_HARD_QUAD""fqtox\t%1, %0"[(set_attr "type" "fp")])(define_expand "fixuns_trunctfdi2"[(set (match_operand:DI 0 "register_operand" "")(unsigned_fix:DI (match_operand:TF 1 "general_operand" "")))]"TARGET_FPU && TARGET_ARCH64 && ! TARGET_HARD_QUAD""emit_tfmode_cvt (UNSIGNED_FIX, operands); DONE;");; Integer addition/subtraction instructions.(define_expand "adddi3"[(set (match_operand:DI 0 "register_operand" "")(plus:DI (match_operand:DI 1 "register_operand" "")(match_operand:DI 2 "arith_double_add_operand" "")))]""{if (! TARGET_ARCH64){emit_insn (gen_rtx_PARALLEL (VOIDmode, gen_rtvec (2,gen_rtx_SET (VOIDmode, operands[0],gen_rtx_PLUS (DImode, operands[1],operands[2])),gen_rtx_CLOBBER (VOIDmode,gen_rtx_REG (CCmode, SPARC_ICC_REG)))));DONE;}})(define_insn_and_split "*adddi3_insn_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "arith_double_operand" "%r")(match_operand:DI 2 "arith_double_operand" "rHI")))(clobber (reg:CC CC_REG))]"! TARGET_ARCH64""#""&& reload_completed"[(parallel [(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (plus:SI (match_dup 4)(match_dup 5))(const_int 0)))(set (match_dup 3)(plus:SI (match_dup 4) (match_dup 5)))])(set (match_dup 6)(plus:SI (plus:SI (match_dup 7)(match_dup 8))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))]{operands[3] = gen_lowpart (SImode, operands[0]);operands[4] = gen_lowpart (SImode, operands[1]);operands[5] = gen_lowpart (SImode, operands[2]);operands[6] = gen_highpart (SImode, operands[0]);operands[7] = gen_highpart_mode (SImode, DImode, operands[1]);#if HOST_BITS_PER_WIDE_INT == 32if (GET_CODE (operands[2]) == CONST_INT){if (INTVAL (operands[2]) < 0)operands[8] = constm1_rtx;elseoperands[8] = const0_rtx;}else#endifoperands[8] = gen_highpart_mode (SImode, DImode, operands[2]);}[(set_attr "length" "2")]);; LTU here means "carry set"(define_insn "addx"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (plus:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI"))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))]"""addx\t%1, %2, %0"[(set_attr "type" "ialuX")])(define_insn "addxc"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (plus:DI (match_operand:DI 1 "register_or_zero_operand" "%rJ")(match_operand:DI 2 "register_or_zero_operand" "rJ"))(ltu:DI (reg:CCX_NOOV CC_REG) (const_int 0))))]"TARGET_ARCH64 && TARGET_VIS3""addxc\t%r1, %r2, %0"[(set_attr "type" "ialuX")])(define_insn_and_split "*addx_extend_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (plus:SI (plus:SI(match_operand:SI 1 "register_or_zero_operand" "%rJ")(match_operand:SI 2 "arith_operand" "rI"))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0)))))]"! TARGET_ARCH64""#""&& reload_completed"[(set (match_dup 3) (plus:SI (plus:SI (match_dup 1) (match_dup 2))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))(set (match_dup 4) (const_int 0))]"operands[3] = gen_lowpart (SImode, operands[0]);operands[4] = gen_highpart_mode (SImode, DImode, operands[1]);"[(set_attr "length" "2")])(define_insn "*addx_extend_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (plus:SI (plus:SI (match_operand:SI 1 "register_or_zero_operand" "%rJ")(match_operand:SI 2 "register_or_zero_operand" "rJ"))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0)))))]"TARGET_ARCH64""addx\t%r1, %r2, %0"[(set_attr "type" "ialuX")])(define_insn "*addxc_trunc_sp64_vis3"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (plus:SI (match_operand:SI 1 "register_or_zero_operand" "%rJ")(match_operand:SI 2 "register_or_zero_operand" "rJ"))(ltu:SI (reg:CCX_NOOV CC_REG) (const_int 0))))]"TARGET_ARCH64 && TARGET_VIS3""addxc\t%r1, %r2, %0"[(set_attr "type" "ialuX")])(define_insn_and_split "*adddi3_extend_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "register_operand" "r")))(clobber (reg:CC CC_REG))]"! TARGET_ARCH64""#""&& reload_completed"[(parallel [(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (plus:SI (match_dup 3) (match_dup 1))(const_int 0)))(set (match_dup 5) (plus:SI (match_dup 3) (match_dup 1)))])(set (match_dup 6)(plus:SI (plus:SI (match_dup 4) (const_int 0))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))]"operands[3] = gen_lowpart (SImode, operands[2]);operands[4] = gen_highpart (SImode, operands[2]);operands[5] = gen_lowpart (SImode, operands[0]);operands[6] = gen_highpart (SImode, operands[0]);"[(set_attr "length" "2")])(define_insn "*adddi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r,r")(plus:DI (match_operand:DI 1 "register_operand" "%r,r")(match_operand:DI 2 "arith_add_operand" "rI,O")))]"TARGET_ARCH64""@add\t%1, %2, %0sub\t%1, -%2, %0")(define_insn "addsi3"[(set (match_operand:SI 0 "register_operand" "=r,r")(plus:SI (match_operand:SI 1 "register_operand" "%r,r")(match_operand:SI 2 "arith_add_operand" "rI,O")))]"""@add\t%1, %2, %0sub\t%1, -%2, %0"[(set_attr "type" "*,*")(set_attr "fptype" "*,*")])(define_insn "*cmp_cc_plus"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (plus:SI (match_operand:SI 0 "arith_operand" "%r")(match_operand:SI 1 "arith_operand" "rI"))(const_int 0)))]"""addcc\t%0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_plus"[(set (reg:CCX_NOOV CC_REG)(compare:CCX_NOOV (plus:DI (match_operand:DI 0 "arith_operand" "%r")(match_operand:DI 1 "arith_operand" "rI"))(const_int 0)))]"TARGET_ARCH64""addcc\t%0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_plus_set"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (plus:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_dup 1) (match_dup 2)))]"""addcc\t%1, %2, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_plus_set"[(set (reg:CCX_NOOV CC_REG)(compare:CCX_NOOV (plus:DI (match_operand:DI 1 "arith_operand" "%r")(match_operand:DI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_dup 1) (match_dup 2)))]"TARGET_ARCH64""addcc\t%1, %2, %0"[(set_attr "type" "compare")])(define_expand "subdi3"[(set (match_operand:DI 0 "register_operand" "")(minus:DI (match_operand:DI 1 "register_operand" "")(match_operand:DI 2 "arith_double_add_operand" "")))]""{if (! TARGET_ARCH64){emit_insn (gen_rtx_PARALLEL (VOIDmode, gen_rtvec (2,gen_rtx_SET (VOIDmode, operands[0],gen_rtx_MINUS (DImode, operands[1],operands[2])),gen_rtx_CLOBBER (VOIDmode,gen_rtx_REG (CCmode, SPARC_ICC_REG)))));DONE;}})(define_insn_and_split "*subdi3_insn_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(minus:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "arith_double_operand" "rHI")))(clobber (reg:CC CC_REG))]"! TARGET_ARCH64""#""&& reload_completed"[(parallel [(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:SI (match_dup 4)(match_dup 5))(const_int 0)))(set (match_dup 3)(minus:SI (match_dup 4) (match_dup 5)))])(set (match_dup 6)(minus:SI (minus:SI (match_dup 7)(match_dup 8))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))]{operands[3] = gen_lowpart (SImode, operands[0]);operands[4] = gen_lowpart (SImode, operands[1]);operands[5] = gen_lowpart (SImode, operands[2]);operands[6] = gen_highpart (SImode, operands[0]);operands[7] = gen_highpart (SImode, operands[1]);#if HOST_BITS_PER_WIDE_INT == 32if (GET_CODE (operands[2]) == CONST_INT){if (INTVAL (operands[2]) < 0)operands[8] = constm1_rtx;elseoperands[8] = const0_rtx;}else#endifoperands[8] = gen_highpart_mode (SImode, DImode, operands[2]);}[(set_attr "length" "2")]);; LTU here means "carry set"(define_insn "subx"[(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (minus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "arith_operand" "rI"))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))]"""subx\t%r1, %2, %0"[(set_attr "type" "ialuX")])(define_insn "*subx_extend_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (minus:SI (minus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "arith_operand" "rI"))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0)))))]"TARGET_ARCH64""subx\t%r1, %2, %0"[(set_attr "type" "ialuX")])(define_insn_and_split "*subx_extend"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (minus:SI (minus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "arith_operand" "rI"))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0)))))]"! TARGET_ARCH64""#""&& reload_completed"[(set (match_dup 3) (minus:SI (minus:SI (match_dup 1) (match_dup 2))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))(set (match_dup 4) (const_int 0))]"operands[3] = gen_lowpart (SImode, operands[0]);operands[4] = gen_highpart (SImode, operands[0]);"[(set_attr "length" "2")])(define_insn_and_split "*subdi3_extend_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(minus:DI (match_operand:DI 1 "register_operand" "r")(zero_extend:DI (match_operand:SI 2 "register_operand" "r"))))(clobber (reg:CC CC_REG))]"! TARGET_ARCH64""#""&& reload_completed"[(parallel [(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:SI (match_dup 3) (match_dup 2))(const_int 0)))(set (match_dup 5) (minus:SI (match_dup 3) (match_dup 2)))])(set (match_dup 6)(minus:SI (minus:SI (match_dup 4) (const_int 0))(ltu:SI (reg:CC_NOOV CC_REG) (const_int 0))))]"operands[3] = gen_lowpart (SImode, operands[1]);operands[4] = gen_highpart (SImode, operands[1]);operands[5] = gen_lowpart (SImode, operands[0]);operands[6] = gen_highpart (SImode, operands[0]);"[(set_attr "length" "2")])(define_insn "*subdi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r,r")(minus:DI (match_operand:DI 1 "register_operand" "r,r")(match_operand:DI 2 "arith_add_operand" "rI,O")))]"TARGET_ARCH64""@sub\t%1, %2, %0add\t%1, -%2, %0")(define_insn "subsi3"[(set (match_operand:SI 0 "register_operand" "=r,r")(minus:SI (match_operand:SI 1 "register_operand" "r,r")(match_operand:SI 2 "arith_add_operand" "rI,O")))]"""@sub\t%1, %2, %0add\t%1, -%2, %0"[(set_attr "type" "*,*")(set_attr "fptype" "*,*")])(define_insn "*cmp_minus_cc"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:SI (match_operand:SI 0 "register_or_zero_operand" "rJ")(match_operand:SI 1 "arith_operand" "rI"))(const_int 0)))]"""subcc\t%r0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_minus_ccx"[(set (reg:CCX_NOOV CC_REG)(compare:CCX_NOOV (minus:DI (match_operand:DI 0 "register_operand" "r")(match_operand:DI 1 "arith_operand" "rI"))(const_int 0)))]"TARGET_ARCH64""subcc\t%0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "cmp_minus_cc_set"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(minus:SI (match_dup 1) (match_dup 2)))]"""subcc\t%r1, %2, %0"[(set_attr "type" "compare")])(define_insn "*cmp_minus_ccx_set"[(set (reg:CCX_NOOV CC_REG)(compare:CCX_NOOV (minus:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(minus:DI (match_dup 1) (match_dup 2)))]"TARGET_ARCH64""subcc\t%1, %2, %0"[(set_attr "type" "compare")]);; Integer multiply/divide instructions.;; The 32-bit multiply/divide instructions are deprecated on v9, but at;; least in UltraSPARC I, II and IIi it is a win tick-wise.(define_insn "mulsi3"[(set (match_operand:SI 0 "register_operand" "=r")(mult:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_HARD_MUL""smul\t%1, %2, %0"[(set_attr "type" "imul")])(define_expand "muldi3"[(set (match_operand:DI 0 "register_operand" "")(mult:DI (match_operand:DI 1 "arith_operand" "")(match_operand:DI 2 "arith_operand" "")))]"TARGET_ARCH64 || TARGET_V8PLUS"{if (TARGET_V8PLUS){emit_insn (gen_muldi3_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*muldi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (match_operand:DI 1 "arith_operand" "%r")(match_operand:DI 2 "arith_operand" "rI")))]"TARGET_ARCH64""mulx\t%1, %2, %0"[(set_attr "type" "imul")]);; V8plus wide multiply.;; XXX(define_insn "muldi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=r,h")(mult:DI (match_operand:DI 1 "arith_operand" "%r,0")(match_operand:DI 2 "arith_operand" "rI,rI")))(clobber (match_scratch:SI 3 "=&h,X"))(clobber (match_scratch:SI 4 "=&h,X"))]"TARGET_V8PLUS""* return output_v8plus_mult (insn, operands, \"mulx\");"[(set_attr "type" "multi")(set_attr "length" "9,8")])(define_insn "*cmp_mul_set"[(set (reg:CC CC_REG)(compare:CC (mult:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(mult:SI (match_dup 1) (match_dup 2)))]"TARGET_V8 || TARGET_SPARCLITE || TARGET_DEPRECATED_V8_INSNS""smulcc\t%1, %2, %0"[(set_attr "type" "imul")])(define_expand "mulsidi3"[(set (match_operand:DI 0 "register_operand" "")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" ""))(sign_extend:DI (match_operand:SI 2 "arith_operand" ""))))]"TARGET_HARD_MUL"{if (CONSTANT_P (operands[2])){if (TARGET_V8PLUS)emit_insn (gen_const_mulsidi3_v8plus (operands[0], operands[1],operands[2]));else if (TARGET_ARCH32)emit_insn (gen_const_mulsidi3_sp32 (operands[0], operands[1],operands[2]));elseemit_insn (gen_const_mulsidi3_sp64 (operands[0], operands[1],operands[2]));DONE;}if (TARGET_V8PLUS){emit_insn (gen_mulsidi3_v8plus (operands[0], operands[1], operands[2]));DONE;}});; V9 puts the 64-bit product in a 64-bit register. Only out or global;; registers can hold 64-bit values in the V8plus environment.;; XXX(define_insn "mulsidi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=h,r")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(sign_extend:DI (match_operand:SI 2 "register_operand" "r,r"))))(clobber (match_scratch:SI 3 "=X,&h"))]"TARGET_V8PLUS""@smul\t%1, %2, %L0\n\tsrlx\t%L0, 32, %H0smul\t%1, %2, %3\n\tsrlx\t%3, 32, %H0\n\tmov\t%3, %L0"[(set_attr "type" "multi")(set_attr "length" "2,3")]);; XXX(define_insn "const_mulsidi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=h,r")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(match_operand:DI 2 "small_int_operand" "I,I")))(clobber (match_scratch:SI 3 "=X,&h"))]"TARGET_V8PLUS""@smul\t%1, %2, %L0\n\tsrlx\t%L0, 32, %H0smul\t%1, %2, %3\n\tsrlx\t%3, 32, %H0\n\tmov\t%3, %L0"[(set_attr "type" "multi")(set_attr "length" "2,3")]);; XXX(define_insn "*mulsidi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r"))(sign_extend:DI (match_operand:SI 2 "register_operand" "r"))))]"TARGET_HARD_MUL32"{return TARGET_SPARCLET? "smuld\t%1, %2, %L0": "smul\t%1, %2, %L0\n\trd\t%%y, %H0";}[(set (attr "type")(if_then_else (eq_attr "isa" "sparclet")(const_string "imul") (const_string "multi")))(set (attr "length")(if_then_else (eq_attr "isa" "sparclet")(const_int 1) (const_int 2)))])(define_insn "*mulsidi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r"))(sign_extend:DI (match_operand:SI 2 "register_operand" "r"))))]"TARGET_DEPRECATED_V8_INSNS && TARGET_ARCH64""smul\t%1, %2, %0"[(set_attr "type" "imul")]);; Extra pattern, because sign_extend of a constant isn't valid.;; XXX(define_insn "const_mulsidi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "small_int_operand" "I")))]"TARGET_HARD_MUL32"{return TARGET_SPARCLET? "smuld\t%1, %2, %L0": "smul\t%1, %2, %L0\n\trd\t%%y, %H0";}[(set (attr "type")(if_then_else (eq_attr "isa" "sparclet")(const_string "imul") (const_string "multi")))(set (attr "length")(if_then_else (eq_attr "isa" "sparclet")(const_int 1) (const_int 2)))])(define_insn "const_mulsidi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "small_int_operand" "I")))]"TARGET_DEPRECATED_V8_INSNS && TARGET_ARCH64""smul\t%1, %2, %0"[(set_attr "type" "imul")])(define_expand "smulsi3_highpart"[(set (match_operand:SI 0 "register_operand" "")(truncate:SI(lshiftrt:DI (mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" ""))(sign_extend:DI (match_operand:SI 2 "arith_operand" "")))(const_int 32))))]"TARGET_HARD_MUL && TARGET_ARCH32"{if (CONSTANT_P (operands[2])){if (TARGET_V8PLUS){emit_insn (gen_const_smulsi3_highpart_v8plus (operands[0],operands[1],operands[2],GEN_INT (32)));DONE;}emit_insn (gen_const_smulsi3_highpart (operands[0], operands[1], operands[2]));DONE;}if (TARGET_V8PLUS){emit_insn (gen_smulsi3_highpart_v8plus (operands[0], operands[1],operands[2], GEN_INT (32)));DONE;}});; XXX(define_insn "smulsi3_highpart_v8plus"[(set (match_operand:SI 0 "register_operand" "=h,r")(truncate:SI(lshiftrt:DI (mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(sign_extend:DI (match_operand:SI 2 "register_operand" "r,r")))(match_operand:SI 3 "small_int_operand" "I,I"))))(clobber (match_scratch:SI 4 "=X,&h"))]"TARGET_V8PLUS""@smul\t%1, %2, %0\;srlx\t%0, %3, %0smul\t%1, %2, %4\;srlx\t%4, %3, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; The combiner changes TRUNCATE in the previous pattern to SUBREG.;; XXX(define_insn ""[(set (match_operand:SI 0 "register_operand" "=h,r")(subreg:SI(lshiftrt:DI(mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(sign_extend:DI (match_operand:SI 2 "register_operand" "r,r")))(match_operand:SI 3 "small_int_operand" "I,I"))4))(clobber (match_scratch:SI 4 "=X,&h"))]"TARGET_V8PLUS""@smul\t%1, %2, %0\n\tsrlx\t%0, %3, %0smul\t%1, %2, %4\n\tsrlx\t%4, %3, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; XXX(define_insn "const_smulsi3_highpart_v8plus"[(set (match_operand:SI 0 "register_operand" "=h,r")(truncate:SI(lshiftrt:DI (mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(match_operand:DI 2 "small_int_operand" "I,I"))(match_operand:SI 3 "small_int_operand" "I,I"))))(clobber (match_scratch:SI 4 "=X,&h"))]"TARGET_V8PLUS""@smul\t%1, %2, %0\n\tsrlx\t%0, %3, %0smul\t%1, %2, %4\n\tsrlx\t%4, %3, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; XXX(define_insn "*smulsi3_highpart_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(truncate:SI(lshiftrt:DI (mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r"))(sign_extend:DI (match_operand:SI 2 "register_operand" "r")))(const_int 32))))]"TARGET_HARD_MUL32""smul\t%1, %2, %%g0\n\trd\t%%y, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; XXX(define_insn "const_smulsi3_highpart"[(set (match_operand:SI 0 "register_operand" "=r")(truncate:SI(lshiftrt:DI (mult:DI (sign_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "small_int_operand" "i"))(const_int 32))))]"TARGET_HARD_MUL32""smul\t%1, %2, %%g0\n\trd\t%%y, %0"[(set_attr "type" "multi")(set_attr "length" "2")])(define_expand "umulsidi3"[(set (match_operand:DI 0 "register_operand" "")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" ""))(zero_extend:DI (match_operand:SI 2 "uns_arith_operand" ""))))]"TARGET_HARD_MUL"{if (CONSTANT_P (operands[2])){if (TARGET_V8PLUS)emit_insn (gen_const_umulsidi3_v8plus (operands[0], operands[1],operands[2]));else if (TARGET_ARCH32)emit_insn (gen_const_umulsidi3_sp32 (operands[0], operands[1],operands[2]));elseemit_insn (gen_const_umulsidi3_sp64 (operands[0], operands[1],operands[2]));DONE;}if (TARGET_V8PLUS){emit_insn (gen_umulsidi3_v8plus (operands[0], operands[1], operands[2]));DONE;}});; XXX(define_insn "umulsidi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=h,r")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(zero_extend:DI (match_operand:SI 2 "register_operand" "r,r"))))(clobber (match_scratch:SI 3 "=X,&h"))]"TARGET_V8PLUS""@umul\t%1, %2, %L0\n\tsrlx\t%L0, 32, %H0umul\t%1, %2, %3\n\tsrlx\t%3, 32, %H0\n\tmov\t%3, %L0"[(set_attr "type" "multi")(set_attr "length" "2,3")]);; XXX(define_insn "*umulsidi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(zero_extend:DI (match_operand:SI 2 "register_operand" "r"))))]"TARGET_HARD_MUL32"{return TARGET_SPARCLET? "umuld\t%1, %2, %L0": "umul\t%1, %2, %L0\n\trd\t%%y, %H0";}[(set (attr "type")(if_then_else (eq_attr "isa" "sparclet")(const_string "imul") (const_string "multi")))(set (attr "length")(if_then_else (eq_attr "isa" "sparclet")(const_int 1) (const_int 2)))])(define_insn "*umulsidi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(zero_extend:DI (match_operand:SI 2 "register_operand" "r"))))]"TARGET_DEPRECATED_V8_INSNS && TARGET_ARCH64""umul\t%1, %2, %0"[(set_attr "type" "imul")]);; Extra pattern, because sign_extend of a constant isn't valid.;; XXX(define_insn "const_umulsidi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "uns_small_int_operand" "")))]"TARGET_HARD_MUL32"{return TARGET_SPARCLET? "umuld\t%1, %s2, %L0": "umul\t%1, %s2, %L0\n\trd\t%%y, %H0";}[(set (attr "type")(if_then_else (eq_attr "isa" "sparclet")(const_string "imul") (const_string "multi")))(set (attr "length")(if_then_else (eq_attr "isa" "sparclet")(const_int 1) (const_int 2)))])(define_insn "const_umulsidi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "uns_small_int_operand" "")))]"TARGET_DEPRECATED_V8_INSNS && TARGET_ARCH64""umul\t%1, %s2, %0"[(set_attr "type" "imul")]);; XXX(define_insn "const_umulsidi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=h,r")(mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(match_operand:DI 2 "uns_small_int_operand" "")))(clobber (match_scratch:SI 3 "=X,h"))]"TARGET_V8PLUS""@umul\t%1, %s2, %L0\n\tsrlx\t%L0, 32, %H0umul\t%1, %s2, %3\n\tsrlx\t%3, 32, %H0\n\tmov\t%3, %L0"[(set_attr "type" "multi")(set_attr "length" "2,3")])(define_expand "umulsi3_highpart"[(set (match_operand:SI 0 "register_operand" "")(truncate:SI(lshiftrt:DI (mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" ""))(zero_extend:DI (match_operand:SI 2 "uns_arith_operand" "")))(const_int 32))))]"TARGET_HARD_MUL && TARGET_ARCH32"{if (CONSTANT_P (operands[2])){if (TARGET_V8PLUS){emit_insn (gen_const_umulsi3_highpart_v8plus (operands[0],operands[1],operands[2],GEN_INT (32)));DONE;}emit_insn (gen_const_umulsi3_highpart (operands[0], operands[1], operands[2]));DONE;}if (TARGET_V8PLUS){emit_insn (gen_umulsi3_highpart_v8plus (operands[0], operands[1],operands[2], GEN_INT (32)));DONE;}});; XXX(define_insn "umulsi3_highpart_v8plus"[(set (match_operand:SI 0 "register_operand" "=h,r")(truncate:SI(lshiftrt:DI (mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(zero_extend:DI (match_operand:SI 2 "register_operand" "r,r")))(match_operand:SI 3 "small_int_operand" "I,I"))))(clobber (match_scratch:SI 4 "=X,h"))]"TARGET_V8PLUS""@umul\t%1, %2, %0\n\tsrlx\t%0, %3, %0umul\t%1, %2, %4\n\tsrlx\t%4, %3, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; XXX(define_insn "const_umulsi3_highpart_v8plus"[(set (match_operand:SI 0 "register_operand" "=h,r")(truncate:SI(lshiftrt:DI (mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r,r"))(match_operand:DI 2 "uns_small_int_operand" ""))(match_operand:SI 3 "small_int_operand" "I,I"))))(clobber (match_scratch:SI 4 "=X,h"))]"TARGET_V8PLUS""@umul\t%1, %s2, %0\n\tsrlx\t%0, %3, %0umul\t%1, %s2, %4\n\tsrlx\t%4, %3, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; XXX(define_insn "*umulsi3_highpart_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(truncate:SI(lshiftrt:DI (mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(zero_extend:DI (match_operand:SI 2 "register_operand" "r")))(const_int 32))))]"TARGET_HARD_MUL32""umul\t%1, %2, %%g0\n\trd\t%%y, %0"[(set_attr "type" "multi")(set_attr "length" "2")]);; XXX(define_insn "const_umulsi3_highpart"[(set (match_operand:SI 0 "register_operand" "=r")(truncate:SI(lshiftrt:DI (mult:DI (zero_extend:DI (match_operand:SI 1 "register_operand" "r"))(match_operand:DI 2 "uns_small_int_operand" ""))(const_int 32))))]"TARGET_HARD_MUL32""umul\t%1, %s2, %%g0\n\trd\t%%y, %0"[(set_attr "type" "multi")(set_attr "length" "2")])(define_expand "divsi3"[(parallel [(set (match_operand:SI 0 "register_operand" "")(div:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "input_operand" "")))(clobber (match_scratch:SI 3 ""))])]"TARGET_V8 || TARGET_DEPRECATED_V8_INSNS"{if (TARGET_ARCH64){operands[3] = gen_reg_rtx(SImode);emit_insn (gen_ashrsi3 (operands[3], operands[1], GEN_INT (31)));emit_insn (gen_divsi3_sp64 (operands[0], operands[1], operands[2],operands[3]));DONE;}});; The V8 architecture specifies that there must be at least 3 instructions;; between a write to the Y register and a use of it for correct results.;; We try to fill one of them with a simple constant or a memory load.(define_insn "divsi3_sp32"[(set (match_operand:SI 0 "register_operand" "=r,r,r")(div:SI (match_operand:SI 1 "register_operand" "r,r,r")(match_operand:SI 2 "input_operand" "rI,K,m")))(clobber (match_scratch:SI 3 "=&r,&r,&r"))]"(TARGET_V8 || TARGET_DEPRECATED_V8_INSNS) && TARGET_ARCH32"{output_asm_insn ("sra\t%1, 31, %3", operands);output_asm_insn ("wr\t%3, 0, %%y", operands);switch (which_alternative){case 0:if (TARGET_V9)return "sdiv\t%1, %2, %0";elsereturn "nop\n\tnop\n\tnop\n\tsdiv\t%1, %2, %0";case 1:if (TARGET_V9)return "sethi\t%%hi(%a2), %3\n\tsdiv\t%1, %3, %0";elsereturn "sethi\t%%hi(%a2), %3\n\tnop\n\tnop\n\tsdiv\t%1, %3, %0";case 2:if (TARGET_V9)return "ld\t%2, %3\n\tsdiv\t%1, %3, %0";elsereturn "ld\t%2, %3\n\tnop\n\tnop\n\tsdiv\t%1, %3, %0";default:gcc_unreachable ();}}[(set_attr "type" "multi")(set (attr "length")(if_then_else (eq_attr "isa" "v9")(const_int 4) (const_int 6)))])(define_insn "divsi3_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(div:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "input_operand" "rI")))(use (match_operand:SI 3 "register_operand" "r"))]"TARGET_DEPRECATED_V8_INSNS && TARGET_ARCH64""wr\t%%g0, %3, %%y\n\tsdiv\t%1, %2, %0"[(set_attr "type" "multi")(set_attr "length" "2")])(define_insn "divdi3"[(set (match_operand:DI 0 "register_operand" "=r")(div:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "arith_operand" "rI")))]"TARGET_ARCH64""sdivx\t%1, %2, %0"[(set_attr "type" "idiv")])(define_insn "*cmp_sdiv_cc_set"[(set (reg:CC CC_REG)(compare:CC (div:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(div:SI (match_dup 1) (match_dup 2)))(clobber (match_scratch:SI 3 "=&r"))]"TARGET_V8 || TARGET_DEPRECATED_V8_INSNS"{output_asm_insn ("sra\t%1, 31, %3", operands);output_asm_insn ("wr\t%3, 0, %%y", operands);if (TARGET_V9)return "sdivcc\t%1, %2, %0";elsereturn "nop\n\tnop\n\tnop\n\tsdivcc\t%1, %2, %0";}[(set_attr "type" "multi")(set (attr "length")(if_then_else (eq_attr "isa" "v9")(const_int 3) (const_int 6)))]);; XXX(define_expand "udivsi3"[(set (match_operand:SI 0 "register_operand" "")(udiv:SI (match_operand:SI 1 "nonimmediate_operand" "")(match_operand:SI 2 "input_operand" "")))]"TARGET_V8 || TARGET_DEPRECATED_V8_INSNS""");; The V8 architecture specifies that there must be at least 3 instructions;; between a write to the Y register and a use of it for correct results.;; We try to fill one of them with a simple constant or a memory load.(define_insn "udivsi3_sp32"[(set (match_operand:SI 0 "register_operand" "=r,&r,&r,&r")(udiv:SI (match_operand:SI 1 "nonimmediate_operand" "r,r,r,m")(match_operand:SI 2 "input_operand" "rI,K,m,r")))]"(TARGET_V8 || TARGET_DEPRECATED_V8_INSNS) && TARGET_ARCH32"{output_asm_insn ("wr\t%%g0, 0, %%y", operands);switch (which_alternative){case 0:if (TARGET_V9)return "udiv\t%1, %2, %0";elsereturn "nop\n\tnop\n\tnop\n\tudiv\t%1, %2, %0";case 1:if (TARGET_V9)return "sethi\t%%hi(%a2), %0\n\tudiv\t%1, %0, %0";elsereturn "sethi\t%%hi(%a2), %0\n\tnop\n\tnop\n\tudiv\t%1, %0, %0";case 2:if (TARGET_V9)return "ld\t%2, %0\n\tudiv\t%1, %0, %0";elsereturn "ld\t%2, %0\n\tnop\n\tnop\n\tudiv\t%1, %0, %0";case 3:if (TARGET_V9)return "ld\t%1, %0\n\tudiv\t%0, %2, %0";elsereturn "ld\t%1, %0\n\tnop\n\tnop\n\tudiv\t%0, %2, %0";default:gcc_unreachable ();}}[(set_attr "type" "multi")(set (attr "length")(if_then_else (eq_attr "isa" "v9")(const_int 3) (const_int 5)))])(define_insn "udivsi3_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(udiv:SI (match_operand:SI 1 "nonimmediate_operand" "r")(match_operand:SI 2 "input_operand" "rI")))]"TARGET_DEPRECATED_V8_INSNS && TARGET_ARCH64""wr\t%%g0, 0, %%y\n\tudiv\t%1, %2, %0"[(set_attr "type" "multi")(set_attr "length" "2")])(define_insn "udivdi3"[(set (match_operand:DI 0 "register_operand" "=r")(udiv:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "arith_operand" "rI")))]"TARGET_ARCH64""udivx\t%1, %2, %0"[(set_attr "type" "idiv")])(define_insn "*cmp_udiv_cc_set"[(set (reg:CC CC_REG)(compare:CC (udiv:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(udiv:SI (match_dup 1) (match_dup 2)))]"TARGET_V8 || TARGET_DEPRECATED_V8_INSNS"{output_asm_insn ("wr\t%%g0, 0, %%y", operands);if (TARGET_V9)return "udivcc\t%1, %2, %0";elsereturn "nop\n\tnop\n\tnop\n\tudivcc\t%1, %2, %0";}[(set_attr "type" "multi")(set (attr "length")(if_then_else (eq_attr "isa" "v9")(const_int 2) (const_int 5)))]); sparclet multiply/accumulate insns(define_insn "*smacsi"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (mult:SI (match_operand:SI 1 "register_operand" "%r")(match_operand:SI 2 "arith_operand" "rI"))(match_operand:SI 3 "register_operand" "0")))]"TARGET_SPARCLET""smac\t%1, %2, %0"[(set_attr "type" "imul")])(define_insn "*smacdi"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (mult:DI (sign_extend:DI(match_operand:SI 1 "register_operand" "%r"))(sign_extend:DI(match_operand:SI 2 "register_operand" "r")))(match_operand:DI 3 "register_operand" "0")))]"TARGET_SPARCLET""smacd\t%1, %2, %L0"[(set_attr "type" "imul")])(define_insn "*umacdi"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (mult:DI (zero_extend:DI(match_operand:SI 1 "register_operand" "%r"))(zero_extend:DI(match_operand:SI 2 "register_operand" "r")))(match_operand:DI 3 "register_operand" "0")))]"TARGET_SPARCLET""umacd\t%1, %2, %L0"[(set_attr "type" "imul")]);; Boolean instructions.;; We define DImode `and' so with DImode `not' we can get;; DImode `andn'. Other combinations are possible.(define_expand "anddi3"[(set (match_operand:DI 0 "register_operand" "")(and:DI (match_operand:DI 1 "arith_double_operand" "")(match_operand:DI 2 "arith_double_operand" "")))]"""")(define_insn "*anddi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(and:DI (match_operand:DI 1 "arith_double_operand" "%r")(match_operand:DI 2 "arith_double_operand" "rHI")))]"! TARGET_ARCH64""#")(define_insn "*anddi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(and:DI (match_operand:DI 1 "arith_operand" "%r")(match_operand:DI 2 "arith_operand" "rI")))]"TARGET_ARCH64""and\t%1, %2, %0")(define_insn "andsi3"[(set (match_operand:SI 0 "register_operand" "=r")(and:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI")))]"""and\t%1, %2, %0")(define_split[(set (match_operand:SI 0 "register_operand" "")(and:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "const_compl_high_operand" "")))(clobber (match_operand:SI 3 "register_operand" ""))]""[(set (match_dup 3) (match_dup 4))(set (match_dup 0) (and:SI (not:SI (match_dup 3)) (match_dup 1)))]{operands[4] = GEN_INT (~INTVAL (operands[2]));})(define_insn_and_split "*and_not_di_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(and:DI (not:DI (match_operand:DI 1 "register_operand" "%r"))(match_operand:DI 2 "register_operand" "r")))]"! TARGET_ARCH64""#""&& reload_completed&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))"[(set (match_dup 3) (and:SI (not:SI (match_dup 4)) (match_dup 5)))(set (match_dup 6) (and:SI (not:SI (match_dup 7)) (match_dup 8)))]"operands[3] = gen_highpart (SImode, operands[0]);operands[4] = gen_highpart (SImode, operands[1]);operands[5] = gen_highpart (SImode, operands[2]);operands[6] = gen_lowpart (SImode, operands[0]);operands[7] = gen_lowpart (SImode, operands[1]);operands[8] = gen_lowpart (SImode, operands[2]);"[(set_attr "length" "2")])(define_insn "*and_not_di_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(and:DI (not:DI (match_operand:DI 1 "register_operand" "%r"))(match_operand:DI 2 "register_operand" "r")))]"TARGET_ARCH64""andn\t%2, %1, %0")(define_insn "*and_not_si"[(set (match_operand:SI 0 "register_operand" "=r")(and:SI (not:SI (match_operand:SI 1 "register_operand" "%r"))(match_operand:SI 2 "register_operand" "r")))]"""andn\t%2, %1, %0")(define_expand "iordi3"[(set (match_operand:DI 0 "register_operand" "")(ior:DI (match_operand:DI 1 "arith_double_operand" "")(match_operand:DI 2 "arith_double_operand" "")))]"""")(define_insn "*iordi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(ior:DI (match_operand:DI 1 "arith_double_operand" "%r")(match_operand:DI 2 "arith_double_operand" "rHI")))]"! TARGET_ARCH64""#"[(set_attr "length" "2")])(define_insn "*iordi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(ior:DI (match_operand:DI 1 "arith_operand" "%r")(match_operand:DI 2 "arith_operand" "rI")))]"TARGET_ARCH64""or\t%1, %2, %0")(define_insn "iorsi3"[(set (match_operand:SI 0 "register_operand" "=r")(ior:SI (match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI")))]"""or\t%1, %2, %0")(define_split[(set (match_operand:SI 0 "register_operand" "")(ior:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "const_compl_high_operand" "")))(clobber (match_operand:SI 3 "register_operand" ""))]""[(set (match_dup 3) (match_dup 4))(set (match_dup 0) (ior:SI (not:SI (match_dup 3)) (match_dup 1)))]{operands[4] = GEN_INT (~INTVAL (operands[2]));})(define_insn_and_split "*or_not_di_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(ior:DI (not:DI (match_operand:DI 1 "register_operand" "r"))(match_operand:DI 2 "register_operand" "r")))]"! TARGET_ARCH64""#""&& reload_completed&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))"[(set (match_dup 3) (ior:SI (not:SI (match_dup 4)) (match_dup 5)))(set (match_dup 6) (ior:SI (not:SI (match_dup 7)) (match_dup 8)))]"operands[3] = gen_highpart (SImode, operands[0]);operands[4] = gen_highpart (SImode, operands[1]);operands[5] = gen_highpart (SImode, operands[2]);operands[6] = gen_lowpart (SImode, operands[0]);operands[7] = gen_lowpart (SImode, operands[1]);operands[8] = gen_lowpart (SImode, operands[2]);"[(set_attr "length" "2")])(define_insn "*or_not_di_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(ior:DI (not:DI (match_operand:DI 1 "register_operand" "r"))(match_operand:DI 2 "register_operand" "r")))]"TARGET_ARCH64""orn\t%2, %1, %0")(define_insn "*or_not_si"[(set (match_operand:SI 0 "register_operand" "=r")(ior:SI (not:SI (match_operand:SI 1 "register_operand" "r"))(match_operand:SI 2 "register_operand" "r")))]"""orn\t%2, %1, %0")(define_expand "xordi3"[(set (match_operand:DI 0 "register_operand" "")(xor:DI (match_operand:DI 1 "arith_double_operand" "")(match_operand:DI 2 "arith_double_operand" "")))]"""")(define_insn "*xordi3_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(xor:DI (match_operand:DI 1 "arith_double_operand" "%r")(match_operand:DI 2 "arith_double_operand" "rHI")))]"! TARGET_ARCH64""#"[(set_attr "length" "2")])(define_insn "*xordi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(xor:DI (match_operand:DI 1 "arith_operand" "%rJ")(match_operand:DI 2 "arith_operand" "rI")))]"TARGET_ARCH64""xor\t%r1, %2, %0")(define_insn "xorsi3"[(set (match_operand:SI 0 "register_operand" "=r")(xor:SI (match_operand:SI 1 "arith_operand" "%rJ")(match_operand:SI 2 "arith_operand" "rI")))]"""xor\t%r1, %2, %0")(define_split[(set (match_operand:SI 0 "register_operand" "")(xor:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "const_compl_high_operand" "")))(clobber (match_operand:SI 3 "register_operand" ""))]""[(set (match_dup 3) (match_dup 4))(set (match_dup 0) (not:SI (xor:SI (match_dup 3) (match_dup 1))))]{operands[4] = GEN_INT (~INTVAL (operands[2]));})(define_split[(set (match_operand:SI 0 "register_operand" "")(not:SI (xor:SI (match_operand:SI 1 "register_operand" "")(match_operand:SI 2 "const_compl_high_operand" ""))))(clobber (match_operand:SI 3 "register_operand" ""))]""[(set (match_dup 3) (match_dup 4))(set (match_dup 0) (xor:SI (match_dup 3) (match_dup 1)))]{operands[4] = GEN_INT (~INTVAL (operands[2]));});; Split DImode logical operations requiring two instructions.(define_split[(set (match_operand:DI 0 "register_operand" "")(match_operator:DI 1 "cc_arith_operator" ; AND, IOR, XOR[(match_operand:DI 2 "register_operand" "")(match_operand:DI 3 "arith_double_operand" "")]))]"! TARGET_ARCH64&& reload_completed&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))"[(set (match_dup 4) (match_op_dup:SI 1 [(match_dup 6) (match_dup 8)]))(set (match_dup 5) (match_op_dup:SI 1 [(match_dup 7) (match_dup 9)]))]{operands[4] = gen_highpart (SImode, operands[0]);operands[5] = gen_lowpart (SImode, operands[0]);operands[6] = gen_highpart (SImode, operands[2]);operands[7] = gen_lowpart (SImode, operands[2]);#if HOST_BITS_PER_WIDE_INT == 32if (GET_CODE (operands[3]) == CONST_INT){if (INTVAL (operands[3]) < 0)operands[8] = constm1_rtx;elseoperands[8] = const0_rtx;}else#endifoperands[8] = gen_highpart_mode (SImode, DImode, operands[3]);operands[9] = gen_lowpart (SImode, operands[3]);});; xnor patterns. Note that (a ^ ~b) == (~a ^ b) == ~(a ^ b).;; Combine now canonicalizes to the rightmost expression.(define_insn_and_split "*xor_not_di_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(not:DI (xor:DI (match_operand:DI 1 "register_operand" "r")(match_operand:DI 2 "register_operand" "r"))))]"! TARGET_ARCH64""#""&& reload_completed&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))"[(set (match_dup 3) (not:SI (xor:SI (match_dup 4) (match_dup 5))))(set (match_dup 6) (not:SI (xor:SI (match_dup 7) (match_dup 8))))]"operands[3] = gen_highpart (SImode, operands[0]);operands[4] = gen_highpart (SImode, operands[1]);operands[5] = gen_highpart (SImode, operands[2]);operands[6] = gen_lowpart (SImode, operands[0]);operands[7] = gen_lowpart (SImode, operands[1]);operands[8] = gen_lowpart (SImode, operands[2]);"[(set_attr "length" "2")])(define_insn "*xor_not_di_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(not:DI (xor:DI (match_operand:DI 1 "register_or_zero_operand" "rJ")(match_operand:DI 2 "arith_operand" "rI"))))]"TARGET_ARCH64""xnor\t%r1, %2, %0")(define_insn "*xor_not_si"[(set (match_operand:SI 0 "register_operand" "=r")(not:SI (xor:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "arith_operand" "rI"))))]"""xnor\t%r1, %2, %0");; These correspond to the above in the case where we also (or only);; want to set the condition code.(define_insn "*cmp_cc_arith_op"[(set (reg:CC CC_REG)(compare:CC(match_operator:SI 2 "cc_arith_operator"[(match_operand:SI 0 "arith_operand" "%r")(match_operand:SI 1 "arith_operand" "rI")])(const_int 0)))]"""%A2cc\t%0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_arith_op"[(set (reg:CCX CC_REG)(compare:CCX(match_operator:DI 2 "cc_arith_operator"[(match_operand:DI 0 "arith_operand" "%r")(match_operand:DI 1 "arith_operand" "rI")])(const_int 0)))]"TARGET_ARCH64""%A2cc\t%0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_arith_op_set"[(set (reg:CC CC_REG)(compare:CC(match_operator:SI 3 "cc_arith_operator"[(match_operand:SI 1 "arith_operand" "%r")(match_operand:SI 2 "arith_operand" "rI")])(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(match_operator:SI 4 "cc_arith_operator" [(match_dup 1) (match_dup 2)]))]"GET_CODE (operands[3]) == GET_CODE (operands[4])""%A3cc\t%1, %2, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_arith_op_set"[(set (reg:CCX CC_REG)(compare:CCX(match_operator:DI 3 "cc_arith_operator"[(match_operand:DI 1 "arith_operand" "%r")(match_operand:DI 2 "arith_operand" "rI")])(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(match_operator:DI 4 "cc_arith_operator" [(match_dup 1) (match_dup 2)]))]"TARGET_ARCH64 && GET_CODE (operands[3]) == GET_CODE (operands[4])""%A3cc\t%1, %2, %0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_xor_not"[(set (reg:CC CC_REG)(compare:CC(not:SI (xor:SI (match_operand:SI 0 "register_or_zero_operand" "%rJ")(match_operand:SI 1 "arith_operand" "rI")))(const_int 0)))]"""xnorcc\t%r0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_xor_not"[(set (reg:CCX CC_REG)(compare:CCX(not:DI (xor:DI (match_operand:DI 0 "register_or_zero_operand" "%rJ")(match_operand:DI 1 "arith_operand" "rI")))(const_int 0)))]"TARGET_ARCH64""xnorcc\t%r0, %1, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_xor_not_set"[(set (reg:CC CC_REG)(compare:CC(not:SI (xor:SI (match_operand:SI 1 "register_or_zero_operand" "%rJ")(match_operand:SI 2 "arith_operand" "rI")))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(not:SI (xor:SI (match_dup 1) (match_dup 2))))]"""xnorcc\t%r1, %2, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_xor_not_set"[(set (reg:CCX CC_REG)(compare:CCX(not:DI (xor:DI (match_operand:DI 1 "register_or_zero_operand" "%rJ")(match_operand:DI 2 "arith_operand" "rI")))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(not:DI (xor:DI (match_dup 1) (match_dup 2))))]"TARGET_ARCH64""xnorcc\t%r1, %2, %0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_arith_op_not"[(set (reg:CC CC_REG)(compare:CC(match_operator:SI 2 "cc_arith_not_operator"[(not:SI (match_operand:SI 0 "arith_operand" "rI"))(match_operand:SI 1 "register_or_zero_operand" "rJ")])(const_int 0)))]"""%B2cc\t%r1, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_arith_op_not"[(set (reg:CCX CC_REG)(compare:CCX(match_operator:DI 2 "cc_arith_not_operator"[(not:DI (match_operand:DI 0 "arith_operand" "rI"))(match_operand:DI 1 "register_or_zero_operand" "rJ")])(const_int 0)))]"TARGET_ARCH64""%B2cc\t%r1, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_arith_op_not_set"[(set (reg:CC CC_REG)(compare:CC(match_operator:SI 3 "cc_arith_not_operator"[(not:SI (match_operand:SI 1 "arith_operand" "rI"))(match_operand:SI 2 "register_or_zero_operand" "rJ")])(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(match_operator:SI 4 "cc_arith_not_operator"[(not:SI (match_dup 1)) (match_dup 2)]))]"GET_CODE (operands[3]) == GET_CODE (operands[4])""%B3cc\t%r2, %1, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_arith_op_not_set"[(set (reg:CCX CC_REG)(compare:CCX(match_operator:DI 3 "cc_arith_not_operator"[(not:DI (match_operand:DI 1 "arith_operand" "rI"))(match_operand:DI 2 "register_or_zero_operand" "rJ")])(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(match_operator:DI 4 "cc_arith_not_operator"[(not:DI (match_dup 1)) (match_dup 2)]))]"TARGET_ARCH64 && GET_CODE (operands[3]) == GET_CODE (operands[4])""%B3cc\t%r2, %1, %0"[(set_attr "type" "compare")]);; We cannot use the "neg" pseudo insn because the Sun assembler;; does not know how to make it work for constants.(define_expand "negdi2"[(set (match_operand:DI 0 "register_operand" "=r")(neg:DI (match_operand:DI 1 "register_operand" "r")))]""{if (! TARGET_ARCH64){emit_insn (gen_rtx_PARALLEL(VOIDmode,gen_rtvec (2,gen_rtx_SET (VOIDmode, operand0,gen_rtx_NEG (DImode, operand1)),gen_rtx_CLOBBER (VOIDmode,gen_rtx_REG (CCmode,SPARC_ICC_REG)))));DONE;}})(define_insn_and_split "*negdi2_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(neg:DI (match_operand:DI 1 "register_operand" "r")))(clobber (reg:CC CC_REG))]"! TARGET_ARCH64""#""&& reload_completed"[(parallel [(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:SI (const_int 0) (match_dup 5))(const_int 0)))(set (match_dup 4) (minus:SI (const_int 0) (match_dup 5)))])(set (match_dup 2) (minus:SI (minus:SI (const_int 0) (match_dup 3))(ltu:SI (reg:CC CC_REG) (const_int 0))))]"operands[2] = gen_highpart (SImode, operands[0]);operands[3] = gen_highpart (SImode, operands[1]);operands[4] = gen_lowpart (SImode, operands[0]);operands[5] = gen_lowpart (SImode, operands[1]);"[(set_attr "length" "2")])(define_insn "*negdi2_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(neg:DI (match_operand:DI 1 "register_operand" "r")))]"TARGET_ARCH64""sub\t%%g0, %1, %0")(define_insn "negsi2"[(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (match_operand:SI 1 "arith_operand" "rI")))]"""sub\t%%g0, %1, %0")(define_insn "*cmp_cc_neg"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (neg:SI (match_operand:SI 0 "arith_operand" "rI"))(const_int 0)))]"""subcc\t%%g0, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_neg"[(set (reg:CCX_NOOV CC_REG)(compare:CCX_NOOV (neg:DI (match_operand:DI 0 "arith_operand" "rI"))(const_int 0)))]"TARGET_ARCH64""subcc\t%%g0, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_set_neg"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (neg:SI (match_operand:SI 1 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(neg:SI (match_dup 1)))]"""subcc\t%%g0, %1, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_set_neg"[(set (reg:CCX_NOOV CC_REG)(compare:CCX_NOOV (neg:DI (match_operand:DI 1 "arith_operand" "rI"))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(neg:DI (match_dup 1)))]"TARGET_ARCH64""subcc\t%%g0, %1, %0"[(set_attr "type" "compare")]);; We cannot use the "not" pseudo insn because the Sun assembler;; does not know how to make it work for constants.(define_expand "one_cmpldi2"[(set (match_operand:DI 0 "register_operand" "")(not:DI (match_operand:DI 1 "register_operand" "")))]"""")(define_insn_and_split "*one_cmpldi2_sp32"[(set (match_operand:DI 0 "register_operand" "=r")(not:DI (match_operand:DI 1 "register_operand" "r")))]"! TARGET_ARCH64""#""&& reload_completed&& ((GET_CODE (operands[0]) == REG&& SPARC_INT_REG_P (REGNO (operands[0])))|| (GET_CODE (operands[0]) == SUBREG&& GET_CODE (SUBREG_REG (operands[0])) == REG&& SPARC_INT_REG_P (REGNO (SUBREG_REG (operands[0])))))"[(set (match_dup 2) (not:SI (xor:SI (match_dup 3) (const_int 0))))(set (match_dup 4) (not:SI (xor:SI (match_dup 5) (const_int 0))))]"operands[2] = gen_highpart (SImode, operands[0]);operands[3] = gen_highpart (SImode, operands[1]);operands[4] = gen_lowpart (SImode, operands[0]);operands[5] = gen_lowpart (SImode, operands[1]);"[(set_attr "length" "2")])(define_insn "*one_cmpldi2_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(not:DI (match_operand:DI 1 "arith_operand" "rI")))]"TARGET_ARCH64""xnor\t%%g0, %1, %0")(define_insn "one_cmplsi2"[(set (match_operand:SI 0 "register_operand" "=r")(not:SI (match_operand:SI 1 "arith_operand" "rI")))]"""xnor\t%%g0, %1, %0")(define_insn "*cmp_cc_not"[(set (reg:CC CC_REG)(compare:CC (not:SI (match_operand:SI 0 "arith_operand" "rI"))(const_int 0)))]"""xnorcc\t%%g0, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_not"[(set (reg:CCX CC_REG)(compare:CCX (not:DI (match_operand:DI 0 "arith_operand" "rI"))(const_int 0)))]"TARGET_ARCH64""xnorcc\t%%g0, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_set_not"[(set (reg:CC CC_REG)(compare:CC (not:SI (match_operand:SI 1 "arith_operand" "rI"))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(not:SI (match_dup 1)))]"""xnorcc\t%%g0, %1, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_set_not"[(set (reg:CCX CC_REG)(compare:CCX (not:DI (match_operand:DI 1 "arith_operand" "rI"))(const_int 0)))(set (match_operand:DI 0 "register_operand" "=r")(not:DI (match_dup 1)))]"TARGET_ARCH64""xnorcc\t%%g0, %1, %0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_set"[(set (match_operand:SI 0 "register_operand" "=r")(match_operand:SI 1 "register_operand" "r"))(set (reg:CC CC_REG)(compare:CC (match_dup 1)(const_int 0)))]"""orcc\t%1, 0, %0"[(set_attr "type" "compare")])(define_insn "*cmp_ccx_set64"[(set (match_operand:DI 0 "register_operand" "=r")(match_operand:DI 1 "register_operand" "r"))(set (reg:CCX CC_REG)(compare:CCX (match_dup 1)(const_int 0)))]"TARGET_ARCH64""orcc\t%1, 0, %0"[(set_attr "type" "compare")]);; Floating point arithmetic instructions.(define_expand "addtf3"[(set (match_operand:TF 0 "nonimmediate_operand" "")(plus:TF (match_operand:TF 1 "general_operand" "")(match_operand:TF 2 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_binop (PLUS, operands); DONE;")(define_insn "*addtf3_hq"[(set (match_operand:TF 0 "register_operand" "=e")(plus:TF (match_operand:TF 1 "register_operand" "e")(match_operand:TF 2 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""faddq\t%1, %2, %0"[(set_attr "type" "fp")])(define_insn "adddf3"[(set (match_operand:DF 0 "register_operand" "=e")(plus:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")))]"TARGET_FPU""faddd\t%1, %2, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "addsf3"[(set (match_operand:SF 0 "register_operand" "=f")(plus:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")))]"TARGET_FPU""fadds\t%1, %2, %0"[(set_attr "type" "fp")])(define_expand "subtf3"[(set (match_operand:TF 0 "nonimmediate_operand" "")(minus:TF (match_operand:TF 1 "general_operand" "")(match_operand:TF 2 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_binop (MINUS, operands); DONE;")(define_insn "*subtf3_hq"[(set (match_operand:TF 0 "register_operand" "=e")(minus:TF (match_operand:TF 1 "register_operand" "e")(match_operand:TF 2 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fsubq\t%1, %2, %0"[(set_attr "type" "fp")])(define_insn "subdf3"[(set (match_operand:DF 0 "register_operand" "=e")(minus:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")))]"TARGET_FPU""fsubd\t%1, %2, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "subsf3"[(set (match_operand:SF 0 "register_operand" "=f")(minus:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")))]"TARGET_FPU""fsubs\t%1, %2, %0"[(set_attr "type" "fp")])(define_expand "multf3"[(set (match_operand:TF 0 "nonimmediate_operand" "")(mult:TF (match_operand:TF 1 "general_operand" "")(match_operand:TF 2 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_binop (MULT, operands); DONE;")(define_insn "*multf3_hq"[(set (match_operand:TF 0 "register_operand" "=e")(mult:TF (match_operand:TF 1 "register_operand" "e")(match_operand:TF 2 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fmulq\t%1, %2, %0"[(set_attr "type" "fpmul")])(define_insn "muldf3"[(set (match_operand:DF 0 "register_operand" "=e")(mult:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")))]"TARGET_FPU""fmuld\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "mulsf3"[(set (match_operand:SF 0 "register_operand" "=f")(mult:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")))]"TARGET_FPU""fmuls\t%1, %2, %0"[(set_attr "type" "fpmul")])(define_insn "fmadf4"[(set (match_operand:DF 0 "register_operand" "=e")(fma:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")(match_operand:DF 3 "register_operand" "e")))]"TARGET_FMAF""fmaddd\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "fmsdf4"[(set (match_operand:DF 0 "register_operand" "=e")(fma:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")(neg:DF (match_operand:DF 3 "register_operand" "e"))))]"TARGET_FMAF""fmsubd\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "*nfmadf4"[(set (match_operand:DF 0 "register_operand" "=e")(neg:DF (fma:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")(match_operand:DF 3 "register_operand" "e"))))]"TARGET_FMAF""fnmaddd\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "*nfmsdf4"[(set (match_operand:DF 0 "register_operand" "=e")(neg:DF (fma:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")(neg:DF (match_operand:DF 3 "register_operand" "e")))))]"TARGET_FMAF""fnmsubd\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "fmasf4"[(set (match_operand:SF 0 "register_operand" "=f")(fma:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")(match_operand:SF 3 "register_operand" "f")))]"TARGET_FMAF""fmadds\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "fmssf4"[(set (match_operand:SF 0 "register_operand" "=f")(fma:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")(neg:SF (match_operand:SF 3 "register_operand" "f"))))]"TARGET_FMAF""fmsubs\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "*nfmasf4"[(set (match_operand:SF 0 "register_operand" "=f")(neg:SF (fma:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")(match_operand:SF 3 "register_operand" "f"))))]"TARGET_FMAF""fnmadds\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "*nfmssf4"[(set (match_operand:SF 0 "register_operand" "=f")(neg:SF (fma:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")(neg:SF (match_operand:SF 3 "register_operand" "f")))))]"TARGET_FMAF""fnmsubs\t%1, %2, %3, %0"[(set_attr "type" "fpmul")])(define_insn "*muldf3_extend"[(set (match_operand:DF 0 "register_operand" "=e")(mult:DF (float_extend:DF (match_operand:SF 1 "register_operand" "f"))(float_extend:DF (match_operand:SF 2 "register_operand" "f"))))]"(TARGET_V8 || TARGET_V9) && TARGET_FPU""fsmuld\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "*multf3_extend"[(set (match_operand:TF 0 "register_operand" "=e")(mult:TF (float_extend:TF (match_operand:DF 1 "register_operand" "e"))(float_extend:TF (match_operand:DF 2 "register_operand" "e"))))]"(TARGET_V8 || TARGET_V9) && TARGET_FPU && TARGET_HARD_QUAD""fdmulq\t%1, %2, %0"[(set_attr "type" "fpmul")])(define_expand "divtf3"[(set (match_operand:TF 0 "nonimmediate_operand" "")(div:TF (match_operand:TF 1 "general_operand" "")(match_operand:TF 2 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_binop (DIV, operands); DONE;");; don't have timing for quad-prec. divide.(define_insn "*divtf3_hq"[(set (match_operand:TF 0 "register_operand" "=e")(div:TF (match_operand:TF 1 "register_operand" "e")(match_operand:TF 2 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fdivq\t%1, %2, %0"[(set_attr "type" "fpdivd")])(define_insn "divdf3"[(set (match_operand:DF 0 "register_operand" "=e")(div:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e")))]"TARGET_FPU""fdivd\t%1, %2, %0"[(set_attr "type" "fpdivd")(set_attr "fptype" "double")])(define_insn "divsf3"[(set (match_operand:SF 0 "register_operand" "=f")(div:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")))]"TARGET_FPU""fdivs\t%1, %2, %0"[(set_attr "type" "fpdivs")])(define_expand "negtf2"[(set (match_operand:TF 0 "register_operand" "=e,e")(neg:TF (match_operand:TF 1 "register_operand" "0,e")))]"TARGET_FPU""")(define_insn_and_split "*negtf2_notv9"[(set (match_operand:TF 0 "register_operand" "=e,e")(neg:TF (match_operand:TF 1 "register_operand" "0,e")))]; We don't use quad float insns here so we don't need TARGET_HARD_QUAD."TARGET_FPU&& ! TARGET_V9""@fnegs\t%0, %0#""&& reload_completed&& sparc_absnegfloat_split_legitimate (operands[0], operands[1])"[(set (match_dup 2) (neg:SF (match_dup 3)))(set (match_dup 4) (match_dup 5))(set (match_dup 6) (match_dup 7))]"operands[2] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]));operands[3] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]));operands[4] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]) + 1);operands[5] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]) + 1);operands[6] = gen_rtx_raw_REG (DFmode, REGNO (operands[0]) + 2);operands[7] = gen_rtx_raw_REG (DFmode, REGNO (operands[1]) + 2);"[(set_attr "type" "fpmove,*")(set_attr "length" "*,2")])(define_insn_and_split "*negtf2_v9"[(set (match_operand:TF 0 "register_operand" "=e,e")(neg:TF (match_operand:TF 1 "register_operand" "0,e")))]; We don't use quad float insns here so we don't need TARGET_HARD_QUAD."TARGET_FPU && TARGET_V9""@fnegd\t%0, %0#""&& reload_completed&& sparc_absnegfloat_split_legitimate (operands[0], operands[1])"[(set (match_dup 2) (neg:DF (match_dup 3)))(set (match_dup 4) (match_dup 5))]"operands[2] = gen_rtx_raw_REG (DFmode, REGNO (operands[0]));operands[3] = gen_rtx_raw_REG (DFmode, REGNO (operands[1]));operands[4] = gen_rtx_raw_REG (DFmode, REGNO (operands[0]) + 2);operands[5] = gen_rtx_raw_REG (DFmode, REGNO (operands[1]) + 2);"[(set_attr "type" "fpmove,*")(set_attr "length" "*,2")(set_attr "fptype" "double")])(define_expand "negdf2"[(set (match_operand:DF 0 "register_operand" "")(neg:DF (match_operand:DF 1 "register_operand" "")))]"TARGET_FPU""")(define_insn_and_split "*negdf2_notv9"[(set (match_operand:DF 0 "register_operand" "=e,e")(neg:DF (match_operand:DF 1 "register_operand" "0,e")))]"TARGET_FPU && ! TARGET_V9""@fnegs\t%0, %0#""&& reload_completed&& sparc_absnegfloat_split_legitimate (operands[0], operands[1])"[(set (match_dup 2) (neg:SF (match_dup 3)))(set (match_dup 4) (match_dup 5))]"operands[2] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]));operands[3] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]));operands[4] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]) + 1);operands[5] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]) + 1);"[(set_attr "type" "fpmove,*")(set_attr "length" "*,2")])(define_insn "*negdf2_v9"[(set (match_operand:DF 0 "register_operand" "=e")(neg:DF (match_operand:DF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_V9""fnegd\t%1, %0"[(set_attr "type" "fpmove")(set_attr "fptype" "double")])(define_insn "negsf2"[(set (match_operand:SF 0 "register_operand" "=f")(neg:SF (match_operand:SF 1 "register_operand" "f")))]"TARGET_FPU""fnegs\t%1, %0"[(set_attr "type" "fpmove")])(define_expand "abstf2"[(set (match_operand:TF 0 "register_operand" "")(abs:TF (match_operand:TF 1 "register_operand" "")))]"TARGET_FPU""")(define_insn_and_split "*abstf2_notv9"[(set (match_operand:TF 0 "register_operand" "=e,e")(abs:TF (match_operand:TF 1 "register_operand" "0,e")))]; We don't use quad float insns here so we don't need TARGET_HARD_QUAD."TARGET_FPU && ! TARGET_V9""@fabss\t%0, %0#""&& reload_completed&& sparc_absnegfloat_split_legitimate (operands[0], operands[1])"[(set (match_dup 2) (abs:SF (match_dup 3)))(set (match_dup 4) (match_dup 5))(set (match_dup 6) (match_dup 7))]"operands[2] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]));operands[3] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]));operands[4] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]) + 1);operands[5] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]) + 1);operands[6] = gen_rtx_raw_REG (DFmode, REGNO (operands[0]) + 2);operands[7] = gen_rtx_raw_REG (DFmode, REGNO (operands[1]) + 2);"[(set_attr "type" "fpmove,*")(set_attr "length" "*,2")])(define_insn "*abstf2_hq_v9"[(set (match_operand:TF 0 "register_operand" "=e,e")(abs:TF (match_operand:TF 1 "register_operand" "0,e")))]"TARGET_FPU && TARGET_V9 && TARGET_HARD_QUAD""@fabsd\t%0, %0fabsq\t%1, %0"[(set_attr "type" "fpmove")(set_attr "fptype" "double,*")])(define_insn_and_split "*abstf2_v9"[(set (match_operand:TF 0 "register_operand" "=e,e")(abs:TF (match_operand:TF 1 "register_operand" "0,e")))]"TARGET_FPU && TARGET_V9 && !TARGET_HARD_QUAD""@fabsd\t%0, %0#""&& reload_completed&& sparc_absnegfloat_split_legitimate (operands[0], operands[1])"[(set (match_dup 2) (abs:DF (match_dup 3)))(set (match_dup 4) (match_dup 5))]"operands[2] = gen_rtx_raw_REG (DFmode, REGNO (operands[0]));operands[3] = gen_rtx_raw_REG (DFmode, REGNO (operands[1]));operands[4] = gen_rtx_raw_REG (DFmode, REGNO (operands[0]) + 2);operands[5] = gen_rtx_raw_REG (DFmode, REGNO (operands[1]) + 2);"[(set_attr "type" "fpmove,*")(set_attr "length" "*,2")(set_attr "fptype" "double,*")])(define_expand "absdf2"[(set (match_operand:DF 0 "register_operand" "")(abs:DF (match_operand:DF 1 "register_operand" "")))]"TARGET_FPU""")(define_insn_and_split "*absdf2_notv9"[(set (match_operand:DF 0 "register_operand" "=e,e")(abs:DF (match_operand:DF 1 "register_operand" "0,e")))]"TARGET_FPU && ! TARGET_V9""@fabss\t%0, %0#""&& reload_completed&& sparc_absnegfloat_split_legitimate (operands[0], operands[1])"[(set (match_dup 2) (abs:SF (match_dup 3)))(set (match_dup 4) (match_dup 5))]"operands[2] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]));operands[3] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]));operands[4] = gen_rtx_raw_REG (SFmode, REGNO (operands[0]) + 1);operands[5] = gen_rtx_raw_REG (SFmode, REGNO (operands[1]) + 1);"[(set_attr "type" "fpmove,*")(set_attr "length" "*,2")])(define_insn "*absdf2_v9"[(set (match_operand:DF 0 "register_operand" "=e")(abs:DF (match_operand:DF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_V9""fabsd\t%1, %0"[(set_attr "type" "fpmove")(set_attr "fptype" "double")])(define_insn "abssf2"[(set (match_operand:SF 0 "register_operand" "=f")(abs:SF (match_operand:SF 1 "register_operand" "f")))]"TARGET_FPU""fabss\t%1, %0"[(set_attr "type" "fpmove")])(define_expand "sqrttf2"[(set (match_operand:TF 0 "nonimmediate_operand" "")(sqrt:TF (match_operand:TF 1 "general_operand" "")))]"TARGET_FPU && (TARGET_HARD_QUAD || TARGET_ARCH64)""emit_tfmode_unop (SQRT, operands); DONE;")(define_insn "*sqrttf2_hq"[(set (match_operand:TF 0 "register_operand" "=e")(sqrt:TF (match_operand:TF 1 "register_operand" "e")))]"TARGET_FPU && TARGET_HARD_QUAD""fsqrtq\t%1, %0"[(set_attr "type" "fpsqrtd")])(define_insn "sqrtdf2"[(set (match_operand:DF 0 "register_operand" "=e")(sqrt:DF (match_operand:DF 1 "register_operand" "e")))]"TARGET_FPU""fsqrtd\t%1, %0"[(set_attr "type" "fpsqrtd")(set_attr "fptype" "double")])(define_insn "sqrtsf2"[(set (match_operand:SF 0 "register_operand" "=f")(sqrt:SF (match_operand:SF 1 "register_operand" "f")))]"TARGET_FPU""fsqrts\t%1, %0"[(set_attr "type" "fpsqrts")]);; Arithmetic shift instructions.(define_insn "ashlsi3"[(set (match_operand:SI 0 "register_operand" "=r")(ashift:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]""{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);return "sll\t%1, %2, %0";}[(set_attr "type" "shift")])(define_insn "*ashlsi3_extend"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI(ashift:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI"))))]"TARGET_ARCH64"{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);return "sll\t%1, %2, %0";}[(set_attr "type" "shift")])(define_expand "ashldi3"[(set (match_operand:DI 0 "register_operand" "=r")(ashift:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_ARCH64 || TARGET_V8PLUS"{if (! TARGET_ARCH64){if (GET_CODE (operands[2]) == CONST_INT)FAIL;emit_insn (gen_ashldi3_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*ashldi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(ashift:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_ARCH64"{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x3f);return "sllx\t%1, %2, %0";}[(set_attr "type" "shift")]);; XXX UGH!(define_insn "ashldi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=&h,&h,r")(ashift:DI (match_operand:DI 1 "arith_operand" "rI,0,rI")(match_operand:SI 2 "arith_operand" "rI,rI,rI")))(clobber (match_scratch:SI 3 "=X,X,&h"))]"TARGET_V8PLUS""* return output_v8plus_shift (insn ,operands, \"sllx\");"[(set_attr "type" "multi")(set_attr "length" "5,5,6")]);; Optimize (1LL<<x)-1;; XXX this also needs to be fixed to handle equal subregs;; XXX first before we could re-enable it.;(define_insn ""; [(set (match_operand:DI 0 "register_operand" "=h"); (plus:DI (ashift:DI (const_int 1); (match_operand:SI 1 "arith_operand" "rI")); (const_int -1)))]; "0 && TARGET_V8PLUS";{; if (GET_CODE (operands[1]) == REG && REGNO (operands[1]) == REGNO (operands[0])); return "mov\t1, %L0\;sllx\t%L0, %1, %L0\;sub\t%L0, 1, %L0\;srlx\t%L0, 32, %H0";; return "mov\t1, %H0\;sllx\t%H0, %1, %L0\;sub\t%L0, 1, %L0\;srlx\t%L0, 32, %H0";;}; [(set_attr "type" "multi"); (set_attr "length" "4")])(define_insn "*cmp_cc_ashift_1"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (ashift:SI (match_operand:SI 0 "register_operand" "r")(const_int 1))(const_int 0)))]"""addcc\t%0, %0, %%g0"[(set_attr "type" "compare")])(define_insn "*cmp_cc_set_ashift_1"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (ashift:SI (match_operand:SI 1 "register_operand" "r")(const_int 1))(const_int 0)))(set (match_operand:SI 0 "register_operand" "=r")(ashift:SI (match_dup 1) (const_int 1)))]"""addcc\t%1, %1, %0"[(set_attr "type" "compare")])(define_insn "ashrsi3"[(set (match_operand:SI 0 "register_operand" "=r")(ashiftrt:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]""{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);return "sra\t%1, %2, %0";}[(set_attr "type" "shift")])(define_insn "*ashrsi3_extend"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (ashiftrt:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "r"))))]"TARGET_ARCH64""sra\t%1, %2, %0"[(set_attr "type" "shift")]);; This handles the case as above, but with constant shift instead of;; register. Combiner "simplifies" it for us a little bit though.(define_insn "*ashrsi3_extend2"[(set (match_operand:DI 0 "register_operand" "=r")(ashiftrt:DI (ashift:DI (subreg:DI (match_operand:SI 1 "register_operand" "r") 0)(const_int 32))(match_operand:SI 2 "small_int_operand" "I")))]"TARGET_ARCH64 && INTVAL (operands[2]) >= 32 && INTVAL (operands[2]) < 64"{operands[2] = GEN_INT (INTVAL (operands[2]) - 32);return "sra\t%1, %2, %0";}[(set_attr "type" "shift")])(define_expand "ashrdi3"[(set (match_operand:DI 0 "register_operand" "=r")(ashiftrt:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_ARCH64 || TARGET_V8PLUS"{if (! TARGET_ARCH64){if (GET_CODE (operands[2]) == CONST_INT)FAIL; /* prefer generic code in this case */emit_insn (gen_ashrdi3_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*ashrdi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(ashiftrt:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_ARCH64"{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x3f);return "srax\t%1, %2, %0";}[(set_attr "type" "shift")]);; XXX(define_insn "ashrdi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=&h,&h,r")(ashiftrt:DI (match_operand:DI 1 "arith_operand" "rI,0,rI")(match_operand:SI 2 "arith_operand" "rI,rI,rI")))(clobber (match_scratch:SI 3 "=X,X,&h"))]"TARGET_V8PLUS""* return output_v8plus_shift (insn, operands, \"srax\");"[(set_attr "type" "multi")(set_attr "length" "5,5,6")])(define_insn "lshrsi3"[(set (match_operand:SI 0 "register_operand" "=r")(lshiftrt:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]""{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);return "srl\t%1, %2, %0";}[(set_attr "type" "shift")])(define_insn "*lshrsi3_extend0"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI(lshiftrt:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI"))))]"TARGET_ARCH64"{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x1f);return "srl\t%1, %2, %0";}[(set_attr "type" "shift")]);; This handles the case where;; (zero_extend:DI (lshiftrt:SI (match_operand:SI) (match_operand:SI))),;; but combiner "simplifies" it for us.(define_insn "*lshrsi3_extend1"[(set (match_operand:DI 0 "register_operand" "=r")(and:DI (subreg:DI (lshiftrt:SI (match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "r")) 0)(match_operand 3 "const_int_operand" "")))]"TARGET_ARCH64 && (unsigned HOST_WIDE_INT) INTVAL (operands[3]) == 0xffffffff""srl\t%1, %2, %0"[(set_attr "type" "shift")]);; This handles the case where;; (lshiftrt:DI (zero_extend:DI (match_operand:SI)) (const_int >=0 < 32));; but combiner "simplifies" it for us.(define_insn "*lshrsi3_extend2"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extract:DI (subreg:DI (match_operand:SI 1 "register_operand" "r") 0)(match_operand 2 "small_int_operand" "I")(const_int 32)))]"TARGET_ARCH64 && (unsigned HOST_WIDE_INT) INTVAL (operands[2]) < 32"{operands[2] = GEN_INT (32 - INTVAL (operands[2]));return "srl\t%1, %2, %0";}[(set_attr "type" "shift")])(define_expand "lshrdi3"[(set (match_operand:DI 0 "register_operand" "=r")(lshiftrt:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_ARCH64 || TARGET_V8PLUS"{if (! TARGET_ARCH64){if (GET_CODE (operands[2]) == CONST_INT)FAIL;emit_insn (gen_lshrdi3_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*lshrdi3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(lshiftrt:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "arith_operand" "rI")))]"TARGET_ARCH64"{if (GET_CODE (operands[2]) == CONST_INT)operands[2] = GEN_INT (INTVAL (operands[2]) & 0x3f);return "srlx\t%1, %2, %0";}[(set_attr "type" "shift")]);; XXX(define_insn "lshrdi3_v8plus"[(set (match_operand:DI 0 "register_operand" "=&h,&h,r")(lshiftrt:DI (match_operand:DI 1 "arith_operand" "rI,0,rI")(match_operand:SI 2 "arith_operand" "rI,rI,rI")))(clobber (match_scratch:SI 3 "=X,X,&h"))]"TARGET_V8PLUS""* return output_v8plus_shift (insn, operands, \"srlx\");"[(set_attr "type" "multi")(set_attr "length" "5,5,6")])(define_insn ""[(set (match_operand:SI 0 "register_operand" "=r")(ashiftrt:SI (subreg:SI (lshiftrt:DI (match_operand:DI 1 "register_operand" "r")(const_int 32)) 4)(match_operand:SI 2 "small_int_operand" "I")))]"TARGET_ARCH64 && (unsigned HOST_WIDE_INT) INTVAL (operands[2]) < 32"{operands[2] = GEN_INT (INTVAL (operands[2]) + 32);return "srax\t%1, %2, %0";}[(set_attr "type" "shift")])(define_insn ""[(set (match_operand:SI 0 "register_operand" "=r")(lshiftrt:SI (subreg:SI (ashiftrt:DI (match_operand:DI 1 "register_operand" "r")(const_int 32)) 4)(match_operand:SI 2 "small_int_operand" "I")))]"TARGET_ARCH64 && (unsigned HOST_WIDE_INT) INTVAL (operands[2]) < 32"{operands[2] = GEN_INT (INTVAL (operands[2]) + 32);return "srlx\t%1, %2, %0";}[(set_attr "type" "shift")])(define_insn ""[(set (match_operand:SI 0 "register_operand" "=r")(ashiftrt:SI (subreg:SI (ashiftrt:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "small_int_operand" "I")) 4)(match_operand:SI 3 "small_int_operand" "I")))]"TARGET_ARCH64&& (unsigned HOST_WIDE_INT) INTVAL (operands[2]) >= 32&& (unsigned HOST_WIDE_INT) INTVAL (operands[3]) < 32&& (unsigned HOST_WIDE_INT) (INTVAL (operands[2]) + INTVAL (operands[3])) < 64"{operands[2] = GEN_INT (INTVAL (operands[2]) + INTVAL (operands[3]));return "srax\t%1, %2, %0";}[(set_attr "type" "shift")])(define_insn ""[(set (match_operand:SI 0 "register_operand" "=r")(lshiftrt:SI (subreg:SI (lshiftrt:DI (match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "small_int_operand" "I")) 4)(match_operand:SI 3 "small_int_operand" "I")))]"TARGET_ARCH64&& (unsigned HOST_WIDE_INT) INTVAL (operands[2]) >= 32&& (unsigned HOST_WIDE_INT) INTVAL (operands[3]) < 32&& (unsigned HOST_WIDE_INT) (INTVAL (operands[2]) + INTVAL (operands[3])) < 64"{operands[2] = GEN_INT (INTVAL (operands[2]) + INTVAL (operands[3]));return "srlx\t%1, %2, %0";}[(set_attr "type" "shift")]);; Unconditional and other jump instructions.(define_insn "jump"[(set (pc) (label_ref (match_operand 0 "" "")))]"""* return output_ubranch (operands[0], 0, insn);"[(set_attr "type" "uncond_branch")])(define_expand "tablejump"[(parallel [(set (pc) (match_operand 0 "register_operand" "r"))(use (label_ref (match_operand 1 "" "")))])]""{gcc_assert (GET_MODE (operands[0]) == CASE_VECTOR_MODE);/* In pic mode, our address differences are against the base of thetable. Add that base value back in; CSE ought to be able to combinethe two address loads. */if (flag_pic){rtx tmp, tmp2;tmp = gen_rtx_LABEL_REF (Pmode, operands[1]);tmp2 = operands[0];if (CASE_VECTOR_MODE != Pmode)tmp2 = gen_rtx_SIGN_EXTEND (Pmode, tmp2);tmp = gen_rtx_PLUS (Pmode, tmp2, tmp);operands[0] = memory_address (Pmode, tmp);}})(define_insn "*tablejump_sp32"[(set (pc) (match_operand:SI 0 "address_operand" "p"))(use (label_ref (match_operand 1 "" "")))]"! TARGET_ARCH64""jmp\t%a0%#"[(set_attr "type" "uncond_branch")])(define_insn "*tablejump_sp64"[(set (pc) (match_operand:DI 0 "address_operand" "p"))(use (label_ref (match_operand 1 "" "")))]"TARGET_ARCH64""jmp\t%a0%#"[(set_attr "type" "uncond_branch")]);; Jump to subroutine instructions.(define_expand "call";; Note that this expression is not used for generating RTL.;; All the RTL is generated explicitly below.[(call (match_operand 0 "call_operand" "")(match_operand 3 "" "i"))];; operands[2] is next_arg_register;; operands[3] is struct_value_size_rtx.""{rtx fn_rtx;gcc_assert (MEM_P (operands[0]) && GET_MODE (operands[0]) == FUNCTION_MODE);gcc_assert (GET_CODE (operands[3]) == CONST_INT);if (GET_CODE (XEXP (operands[0], 0)) == LABEL_REF){/* This is really a PIC sequence. We want to representit as a funny jump so its delay slots can be filled.??? But if this really *is* a CALL, will not it clobber thecall-clobbered registers? We lose this if it is a JUMP_INSN.Why cannot we have delay slots filled if it were a CALL? *//* We accept negative sizes for untyped calls. */if (! TARGET_ARCH64 && INTVAL (operands[3]) != 0)emit_jump_insn(gen_rtx_PARALLEL(VOIDmode,gen_rtvec (3,gen_rtx_SET (VOIDmode, pc_rtx, XEXP (operands[0], 0)),operands[3],gen_rtx_CLOBBER (VOIDmode, gen_rtx_REG (Pmode, 15)))));elseemit_jump_insn(gen_rtx_PARALLEL(VOIDmode,gen_rtvec (2,gen_rtx_SET (VOIDmode, pc_rtx, XEXP (operands[0], 0)),gen_rtx_CLOBBER (VOIDmode, gen_rtx_REG (Pmode, 15)))));goto finish_call;}fn_rtx = operands[0];/* We accept negative sizes for untyped calls. */if (! TARGET_ARCH64 && INTVAL (operands[3]) != 0)sparc_emit_call_insn(gen_rtx_PARALLEL(VOIDmode,gen_rtvec (3, gen_rtx_CALL (VOIDmode, fn_rtx, const0_rtx),operands[3],gen_rtx_CLOBBER (VOIDmode, gen_rtx_REG (Pmode, 15)))),XEXP (fn_rtx, 0));elsesparc_emit_call_insn(gen_rtx_PARALLEL(VOIDmode,gen_rtvec (2, gen_rtx_CALL (VOIDmode, fn_rtx, const0_rtx),gen_rtx_CLOBBER (VOIDmode, gen_rtx_REG (Pmode, 15)))),XEXP (fn_rtx, 0));finish_call:DONE;});; We can't use the same pattern for these two insns, because then registers;; in the address may not be properly reloaded.(define_insn "*call_address_sp32"[(call (mem:SI (match_operand:SI 0 "address_operand" "p"))(match_operand 1 "" ""))(clobber (reg:SI O7_REG))];;- Do not use operand 1 for most machines."! TARGET_ARCH64""call\t%a0, %1%#"[(set_attr "type" "call")])(define_insn "*call_symbolic_sp32"[(call (mem:SI (match_operand:SI 0 "symbolic_operand" "s"))(match_operand 1 "" ""))(clobber (reg:SI O7_REG))];;- Do not use operand 1 for most machines."! TARGET_ARCH64""call\t%a0, %1%#"[(set_attr "type" "call")])(define_insn "*call_address_sp64"[(call (mem:DI (match_operand:DI 0 "address_operand" "p"))(match_operand 1 "" ""))(clobber (reg:DI O7_REG))];;- Do not use operand 1 for most machines."TARGET_ARCH64""call\t%a0, %1%#"[(set_attr "type" "call")])(define_insn "*call_symbolic_sp64"[(call (mem:DI (match_operand:DI 0 "symbolic_operand" "s"))(match_operand 1 "" ""))(clobber (reg:DI O7_REG))];;- Do not use operand 1 for most machines."TARGET_ARCH64""call\t%a0, %1%#"[(set_attr "type" "call")]);; This is a call that wants a structure value.;; There is no such critter for v9 (??? we may need one anyway).(define_insn "*call_address_struct_value_sp32"[(call (mem:SI (match_operand:SI 0 "address_operand" "p"))(match_operand 1 "" ""))(match_operand 2 "immediate_operand" "")(clobber (reg:SI O7_REG))];;- Do not use operand 1 for most machines."! TARGET_ARCH64 && GET_CODE (operands[2]) == CONST_INT && INTVAL (operands[2]) > 0"{operands[2] = GEN_INT (INTVAL (operands[2]) & 0xfff);return "call\t%a0, %1\n\t nop\n\tunimp\t%2";}[(set_attr "type" "call_no_delay_slot")(set_attr "length" "3")]);; This is a call that wants a structure value.;; There is no such critter for v9 (??? we may need one anyway).(define_insn "*call_symbolic_struct_value_sp32"[(call (mem:SI (match_operand:SI 0 "symbolic_operand" "s"))(match_operand 1 "" ""))(match_operand 2 "immediate_operand" "")(clobber (reg:SI O7_REG))];;- Do not use operand 1 for most machines."! TARGET_ARCH64 && GET_CODE (operands[2]) == CONST_INT && INTVAL (operands[2]) > 0"{operands[2] = GEN_INT (INTVAL (operands[2]) & 0xfff);return "call\t%a0, %1\n\t nop\n\tunimp\t%2";}[(set_attr "type" "call_no_delay_slot")(set_attr "length" "3")]);; This is a call that may want a structure value. This is used for;; untyped_calls.(define_insn "*call_address_untyped_struct_value_sp32"[(call (mem:SI (match_operand:SI 0 "address_operand" "p"))(match_operand 1 "" ""))(match_operand 2 "immediate_operand" "")(clobber (reg:SI O7_REG))];;- Do not use operand 1 for most machines."! TARGET_ARCH64 && GET_CODE (operands[2]) == CONST_INT && INTVAL (operands[2]) < 0""call\t%a0, %1\n\t nop\n\tnop"[(set_attr "type" "call_no_delay_slot")(set_attr "length" "3")]);; This is a call that may want a structure value. This is used for;; untyped_calls.(define_insn "*call_symbolic_untyped_struct_value_sp32"[(call (mem:SI (match_operand:SI 0 "symbolic_operand" "s"))(match_operand 1 "" ""))(match_operand 2 "immediate_operand" "")(clobber (reg:SI O7_REG))];;- Do not use operand 1 for most machines."! TARGET_ARCH64 && GET_CODE (operands[2]) == CONST_INT && INTVAL (operands[2]) < 0""call\t%a0, %1\n\t nop\n\tnop"[(set_attr "type" "call_no_delay_slot")(set_attr "length" "3")])(define_expand "call_value";; Note that this expression is not used for generating RTL.;; All the RTL is generated explicitly below.[(set (match_operand 0 "register_operand" "=rf")(call (match_operand 1 "" "")(match_operand 4 "" "")))];; operand 2 is stack_size_rtx;; operand 3 is next_arg_register""{rtx fn_rtx;rtvec vec;gcc_assert (MEM_P (operands[1]) && GET_MODE (operands[1]) == FUNCTION_MODE);fn_rtx = operands[1];vec = gen_rtvec (2,gen_rtx_SET (VOIDmode, operands[0],gen_rtx_CALL (VOIDmode, fn_rtx, const0_rtx)),gen_rtx_CLOBBER (VOIDmode, gen_rtx_REG (Pmode, 15)));sparc_emit_call_insn (gen_rtx_PARALLEL (VOIDmode, vec), XEXP (fn_rtx, 0));DONE;})(define_insn "*call_value_address_sp32"[(set (match_operand 0 "" "=rf")(call (mem:SI (match_operand:SI 1 "address_operand" "p"))(match_operand 2 "" "")))(clobber (reg:SI O7_REG))];;- Do not use operand 2 for most machines."! TARGET_ARCH64""call\t%a1, %2%#"[(set_attr "type" "call")])(define_insn "*call_value_symbolic_sp32"[(set (match_operand 0 "" "=rf")(call (mem:SI (match_operand:SI 1 "symbolic_operand" "s"))(match_operand 2 "" "")))(clobber (reg:SI O7_REG))];;- Do not use operand 2 for most machines."! TARGET_ARCH64""call\t%a1, %2%#"[(set_attr "type" "call")])(define_insn "*call_value_address_sp64"[(set (match_operand 0 "" "")(call (mem:DI (match_operand:DI 1 "address_operand" "p"))(match_operand 2 "" "")))(clobber (reg:DI O7_REG))];;- Do not use operand 2 for most machines."TARGET_ARCH64""call\t%a1, %2%#"[(set_attr "type" "call")])(define_insn "*call_value_symbolic_sp64"[(set (match_operand 0 "" "")(call (mem:DI (match_operand:DI 1 "symbolic_operand" "s"))(match_operand 2 "" "")))(clobber (reg:DI O7_REG))];;- Do not use operand 2 for most machines."TARGET_ARCH64""call\t%a1, %2%#"[(set_attr "type" "call")])(define_expand "untyped_call"[(parallel [(call (match_operand 0 "" "")(const_int 0))(match_operand:BLK 1 "memory_operand" "")(match_operand 2 "" "")])]""{rtx valreg1 = gen_rtx_REG (DImode, 8);rtx valreg2 = gen_rtx_REG (TARGET_ARCH64 ? TFmode : DFmode, 32);rtx result = operands[1];/* Pass constm1 to indicate that it may expect a structure value, butwe don't know what size it is. */emit_call_insn (GEN_CALL (operands[0], const0_rtx, NULL, constm1_rtx));/* Save the function value registers. */emit_move_insn (adjust_address (result, DImode, 0), valreg1);emit_move_insn (adjust_address (result, TARGET_ARCH64 ? TFmode : DFmode, 8),valreg2);/* The optimizer does not know that the call sets the function valueregisters we stored in the result block. We avoid problems byclaiming that all hard registers are used and clobbered at thispoint. */emit_insn (gen_blockage ());DONE;});; Tail call instructions.(define_expand "sibcall"[(parallel [(call (match_operand 0 "call_operand" "") (const_int 0))(return)])]"""")(define_insn "*sibcall_symbolic_sp32"[(call (mem:SI (match_operand:SI 0 "symbolic_operand" "s"))(match_operand 1 "" ""))(return)]"! TARGET_ARCH64""* return output_sibcall(insn, operands[0]);"[(set_attr "type" "sibcall")])(define_insn "*sibcall_symbolic_sp64"[(call (mem:DI (match_operand:DI 0 "symbolic_operand" "s"))(match_operand 1 "" ""))(return)]"TARGET_ARCH64""* return output_sibcall(insn, operands[0]);"[(set_attr "type" "sibcall")])(define_expand "sibcall_value"[(parallel [(set (match_operand 0 "register_operand" "=rf")(call (match_operand 1 "" "") (const_int 0)))(return)])]"""")(define_insn "*sibcall_value_symbolic_sp32"[(set (match_operand 0 "" "=rf")(call (mem:SI (match_operand:SI 1 "symbolic_operand" "s"))(match_operand 2 "" "")))(return)]"! TARGET_ARCH64""* return output_sibcall(insn, operands[1]);"[(set_attr "type" "sibcall")])(define_insn "*sibcall_value_symbolic_sp64"[(set (match_operand 0 "" "")(call (mem:DI (match_operand:DI 1 "symbolic_operand" "s"))(match_operand 2 "" "")))(return)]"TARGET_ARCH64""* return output_sibcall(insn, operands[1]);"[(set_attr "type" "sibcall")]);; Special instructions.(define_expand "prologue"[(const_int 0)]""{if (TARGET_FLAT)sparc_flat_expand_prologue ();elsesparc_expand_prologue ();DONE;});; The "register window save" insn is modelled as follows. The dwarf2;; information is manually added in emit_window_save.(define_insn "window_save"[(unspec_volatile[(match_operand 0 "arith_operand" "rI")]UNSPECV_SAVEW)]"!TARGET_FLAT""save\t%%sp, %0, %%sp"[(set_attr "type" "savew")])(define_expand "epilogue"[(return)]""{if (TARGET_FLAT)sparc_flat_expand_epilogue (false);elsesparc_expand_epilogue (false);})(define_expand "sibcall_epilogue"[(return)]""{if (TARGET_FLAT)sparc_flat_expand_epilogue (false);elsesparc_expand_epilogue (false);DONE;})(define_expand "eh_return"[(use (match_operand 0 "general_operand" ""))]""{emit_move_insn (gen_rtx_REG (Pmode, RETURN_ADDR_REGNUM), operands[0]);emit_jump_insn (gen_eh_return_internal ());emit_barrier ();DONE;})(define_insn_and_split "eh_return_internal"[(eh_return)]"""#""epilogue_completed"[(return)]{if (TARGET_FLAT)sparc_flat_expand_epilogue (true);elsesparc_expand_epilogue (true);})(define_expand "return"[(return)]"sparc_can_use_return_insn_p ()""")(define_insn "*return_internal"[(return)]"""* return output_return (insn);"[(set_attr "type" "return")(set (attr "length")(cond [(eq_attr "calls_eh_return" "true")(if_then_else (eq_attr "delayed_branch" "true")(if_then_else (ior (eq_attr "isa" "v9")(eq_attr "flat" "true"))(const_int 2)(const_int 3))(if_then_else (eq_attr "flat" "true")(const_int 3)(const_int 4)))(ior (eq_attr "leaf_function" "true") (eq_attr "flat" "true"))(if_then_else (eq_attr "empty_delay_slot" "true")(const_int 2)(const_int 1))(eq_attr "empty_delay_slot" "true")(if_then_else (eq_attr "delayed_branch" "true")(const_int 2)(const_int 3))] (const_int 1)))]);; UNSPEC_VOLATILE is considered to use and clobber all hard registers and;; all of memory. This blocks insns from being moved across this point.(define_insn "blockage"[(unspec_volatile [(const_int 0)] UNSPECV_BLOCKAGE)]""""[(set_attr "length" "0")]);; Do not schedule instructions accessing memory before this point.(define_expand "frame_blockage"[(set (match_dup 0)(unspec:BLK [(match_dup 1)] UNSPEC_FRAME_BLOCKAGE))]""{operands[0] = gen_rtx_MEM (BLKmode, gen_rtx_SCRATCH (Pmode));MEM_VOLATILE_P (operands[0]) = 1;operands[1] = stack_pointer_rtx;})(define_insn "*frame_blockage<P:mode>"[(set (match_operand:BLK 0 "" "")(unspec:BLK [(match_operand:P 1 "" "")] UNSPEC_FRAME_BLOCKAGE))]""""[(set_attr "length" "0")])(define_expand "probe_stack"[(set (match_operand 0 "memory_operand" "") (const_int 0))]""{operands[0]= adjust_address (operands[0], GET_MODE (operands[0]), SPARC_STACK_BIAS);})(define_insn "probe_stack_range<P:mode>"[(set (match_operand:P 0 "register_operand" "=r")(unspec_volatile:P [(match_operand:P 1 "register_operand" "0")(match_operand:P 2 "register_operand" "r")]UNSPECV_PROBE_STACK_RANGE))]"""* return output_probe_stack_range (operands[0], operands[2]);"[(set_attr "type" "multi")]);; Prepare to return any type including a structure value.(define_expand "untyped_return"[(match_operand:BLK 0 "memory_operand" "")(match_operand 1 "" "")]""{rtx valreg1 = gen_rtx_REG (DImode, 24);rtx valreg2 = gen_rtx_REG (TARGET_ARCH64 ? TFmode : DFmode, 32);rtx result = operands[0];if (! TARGET_ARCH64){rtx rtnreg = gen_rtx_REG (SImode, RETURN_ADDR_REGNUM);rtx value = gen_reg_rtx (SImode);/* Fetch the instruction where we will return to and see if it's an unimpinstruction (the most significant 10 bits will be zero). If so,update the return address to skip the unimp instruction. */emit_move_insn (value,gen_rtx_MEM (SImode, plus_constant (rtnreg, 8)));emit_insn (gen_lshrsi3 (value, value, GEN_INT (22)));emit_insn (gen_update_return (rtnreg, value));}/* Reload the function value registers. */emit_move_insn (valreg1, adjust_address (result, DImode, 0));emit_move_insn (valreg2,adjust_address (result, TARGET_ARCH64 ? TFmode : DFmode, 8));/* Put USE insns before the return. */emit_use (valreg1);emit_use (valreg2);/* Construct the return. */expand_naked_return ();DONE;});; Adjust the return address conditionally. If the value of op1 is equal;; to all zero then adjust the return address i.e. op0 = op0 + 4.;; This is technically *half* the check required by the 32-bit SPARC;; psABI. This check only ensures that an "unimp" insn was written by;; the caller, but doesn't check to see if the expected size matches;; (this is encoded in the 12 lower bits). This check is obsolete and;; only used by the above code "untyped_return".(define_insn "update_return"[(unspec:SI [(match_operand:SI 0 "register_operand" "r")(match_operand:SI 1 "register_operand" "r")] UNSPEC_UPDATE_RETURN)]"! TARGET_ARCH64"{if (flag_delayed_branch)return "cmp\t%1, 0\n\tbe,a\t.+8\n\t add\t%0, 4, %0";elsereturn "cmp\t%1, 0\n\tbne\t.+12\n\t nop\n\tadd\t%0, 4, %0";}[(set (attr "type") (const_string "multi"))(set (attr "length")(if_then_else (eq_attr "delayed_branch" "true")(const_int 3)(const_int 4)))])(define_insn "nop"[(const_int 0)]"""nop")(define_expand "indirect_jump"[(set (pc) (match_operand 0 "address_operand" "p"))]"""")(define_insn "*branch_sp32"[(set (pc) (match_operand:SI 0 "address_operand" "p"))]"! TARGET_ARCH64""jmp\t%a0%#"[(set_attr "type" "uncond_branch")])(define_insn "*branch_sp64"[(set (pc) (match_operand:DI 0 "address_operand" "p"))]"TARGET_ARCH64""jmp\t%a0%#"[(set_attr "type" "uncond_branch")])(define_expand "save_stack_nonlocal"[(set (match_operand 0 "memory_operand" "")(match_operand 1 "register_operand" ""))(set (match_dup 2) (match_dup 3))]""{operands[0] = adjust_address_nv (operands[0], Pmode, 0);operands[2] = adjust_address_nv (operands[0], Pmode, GET_MODE_SIZE (Pmode));operands[3] = gen_rtx_REG (Pmode, RETURN_ADDR_REGNUM);})(define_expand "restore_stack_nonlocal"[(set (match_operand 0 "register_operand" "")(match_operand 1 "memory_operand" ""))]""{operands[1] = adjust_address_nv (operands[1], Pmode, 0);})(define_expand "nonlocal_goto"[(match_operand 0 "general_operand" "")(match_operand 1 "general_operand" "")(match_operand 2 "memory_operand" "")(match_operand 3 "memory_operand" "")]""{rtx i7 = gen_rtx_REG (Pmode, RETURN_ADDR_REGNUM);rtx r_label = copy_to_reg (operands[1]);rtx r_sp = adjust_address_nv (operands[2], Pmode, 0);rtx r_fp = operands[3];rtx r_i7 = adjust_address_nv (operands[2], Pmode, GET_MODE_SIZE (Pmode));/* We need to flush all the register windows so that their contents willbe re-synchronized by the restore insn of the target function. */if (!TARGET_FLAT)emit_insn (gen_flush_register_windows ());emit_clobber (gen_rtx_MEM (BLKmode, gen_rtx_SCRATCH (VOIDmode)));emit_clobber (gen_rtx_MEM (BLKmode, hard_frame_pointer_rtx));/* Restore frame pointer for containing function. */emit_move_insn (hard_frame_pointer_rtx, r_fp);emit_stack_restore (SAVE_NONLOCAL, r_sp);emit_move_insn (i7, r_i7);/* USE of hard_frame_pointer_rtx added for consistency;not clear if really needed. */emit_use (hard_frame_pointer_rtx);emit_use (stack_pointer_rtx);emit_use (i7);emit_jump_insn (gen_indirect_jump (r_label));emit_barrier ();DONE;})(define_expand "builtin_setjmp_receiver"[(label_ref (match_operand 0 "" ""))]"flag_pic"{load_got_register ();DONE;});; Special insn to flush register windows.(define_insn "flush_register_windows"[(unspec_volatile [(const_int 0)] UNSPECV_FLUSHW)]""{ return TARGET_V9 ? "flushw" : "ta\t3"; }[(set_attr "type" "flushw")]);; Special pattern for the FLUSH instruction.; We do SImode and DImode versions of this to quiet down genrecog's complaints; of the define_insn otherwise missing a mode. We make "flush", aka; gen_flush, the default one since sparc_initialize_trampoline uses; it on SImode mem values.(define_insn "flush"[(unspec_volatile [(match_operand:SI 0 "memory_operand" "m")] UNSPECV_FLUSH)]""{ return TARGET_V9 ? "flush\t%f0" : "iflush\t%f0"; }[(set_attr "type" "iflush")])(define_insn "flushdi"[(unspec_volatile [(match_operand:DI 0 "memory_operand" "m")] UNSPECV_FLUSH)]""{ return TARGET_V9 ? "flush\t%f0" : "iflush\t%f0"; }[(set_attr "type" "iflush")]);; Find first set instructions.;; The scan instruction searches from the most significant bit while ffs;; searches from the least significant bit. The bit index and treatment of;; zero also differ. It takes at least 7 instructions to get the proper;; result. Here is an obvious 8 instruction sequence.;; XXX(define_insn "ffssi2"[(set (match_operand:SI 0 "register_operand" "=&r")(ffs:SI (match_operand:SI 1 "register_operand" "r")))(clobber (match_scratch:SI 2 "=&r"))]"TARGET_SPARCLITE || TARGET_SPARCLET"{return "sub\t%%g0, %1, %0\;and\t%0, %1, %0\;scan\t%0, 0, %0\;mov\t32, %2\;sub\t%2, %0, %0\;sra\t%0, 31, %2\;and\t%2, 31, %2\;add\t%2, %0, %0";}[(set_attr "type" "multi")(set_attr "length" "8")])(define_expand "popcountdi2"[(set (match_operand:DI 0 "register_operand" "")(popcount:DI (match_operand:DI 1 "register_operand" "")))]"TARGET_POPC"{if (! TARGET_ARCH64){emit_insn (gen_popcountdi_v8plus (operands[0], operands[1]));DONE;}})(define_insn "*popcountdi_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(popcount:DI (match_operand:DI 1 "register_operand" "r")))]"TARGET_POPC && TARGET_ARCH64""popc\t%1, %0")(define_insn "popcountdi_v8plus"[(set (match_operand:DI 0 "register_operand" "=r")(popcount:DI (match_operand:DI 1 "register_operand" "r")))(clobber (match_scratch:SI 2 "=&h"))]"TARGET_POPC && ! TARGET_ARCH64"{if (sparc_check_64 (operands[1], insn) <= 0)output_asm_insn ("srl\t%L1, 0, %L1", operands);return "sllx\t%H1, 32, %2\n\tor\t%L1, %2, %2\n\tpopc\t%2, %L0\n\tclr\t%H0";}[(set_attr "type" "multi")(set_attr "length" "5")])(define_expand "popcountsi2"[(set (match_dup 2)(zero_extend:DI (match_operand:SI 1 "register_operand" "")))(set (match_operand:SI 0 "register_operand" "")(truncate:SI (popcount:DI (match_dup 2))))]"TARGET_POPC"{if (! TARGET_ARCH64){emit_insn (gen_popcountsi_v8plus (operands[0], operands[1]));DONE;}elseoperands[2] = gen_reg_rtx (DImode);})(define_insn "*popcountsi_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(truncate:SI(popcount:DI (match_operand:DI 1 "register_operand" "r"))))]"TARGET_POPC && TARGET_ARCH64""popc\t%1, %0")(define_insn "popcountsi_v8plus"[(set (match_operand:SI 0 "register_operand" "=r")(popcount:SI (match_operand:SI 1 "register_operand" "r")))]"TARGET_POPC && ! TARGET_ARCH64"{if (sparc_check_64 (operands[1], insn) <= 0)output_asm_insn ("srl\t%1, 0, %1", operands);return "popc\t%1, %0";}[(set_attr "type" "multi")(set_attr "length" "2")])(define_expand "clzdi2"[(set (match_operand:DI 0 "register_operand" "")(clz:DI (match_operand:DI 1 "register_operand" "")))]"TARGET_VIS3"{if (! TARGET_ARCH64){emit_insn (gen_clzdi_v8plus (operands[0], operands[1]));DONE;}})(define_insn "*clzdi_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(clz:DI (match_operand:DI 1 "register_operand" "r")))]"TARGET_VIS3 && TARGET_ARCH64""lzd\t%1, %0")(define_insn "clzdi_v8plus"[(set (match_operand:DI 0 "register_operand" "=r")(clz:DI (match_operand:DI 1 "register_operand" "r")))(clobber (match_scratch:SI 2 "=&h"))]"TARGET_VIS3 && ! TARGET_ARCH64"{if (sparc_check_64 (operands[1], insn) <= 0)output_asm_insn ("srl\t%L1, 0, %L1", operands);return "sllx\t%H1, 32, %2\n\tor\t%L1, %2, %2\n\tlzd\t%2, %L0\n\tclr\t%H0";}[(set_attr "type" "multi")(set_attr "length" "5")])(define_expand "clzsi2"[(set (match_dup 2)(zero_extend:DI (match_operand:SI 1 "register_operand" "")))(set (match_dup 3)(truncate:SI (clz:DI (match_dup 2))))(set (match_operand:SI 0 "register_operand" "")(minus:SI (match_dup 3) (const_int 32)))]"TARGET_VIS3"{if (! TARGET_ARCH64){emit_insn (gen_clzsi_v8plus (operands[0], operands[1]));DONE;}else{operands[2] = gen_reg_rtx (DImode);operands[3] = gen_reg_rtx (SImode);}})(define_insn "*clzsi_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(truncate:SI(clz:DI (match_operand:DI 1 "register_operand" "r"))))]"TARGET_VIS3 && TARGET_ARCH64""lzd\t%1, %0")(define_insn "clzsi_v8plus"[(set (match_operand:SI 0 "register_operand" "=r")(clz:SI (match_operand:SI 1 "register_operand" "r")))]"TARGET_VIS3 && ! TARGET_ARCH64"{if (sparc_check_64 (operands[1], insn) <= 0)output_asm_insn ("srl\t%1, 0, %1", operands);return "lzd\t%1, %0\n\tsub\t%0, 32, %0";}[(set_attr "type" "multi")(set_attr "length" "3")]);; Peepholes go at the end.;; Optimize consecutive loads or stores into ldd and std when possible.;; The conditions in which we do this are very restricted and are;; explained in the code for {registers,memory}_ok_for_ldd functions.(define_peephole2[(set (match_operand:SI 0 "memory_operand" "")(const_int 0))(set (match_operand:SI 1 "memory_operand" "")(const_int 0))]"TARGET_V9&& mems_ok_for_ldd_peep (operands[0], operands[1], NULL_RTX)"[(set (match_dup 0)(const_int 0))]"operands[0] = widen_memory_access (operands[0], DImode, 0);")(define_peephole2[(set (match_operand:SI 0 "memory_operand" "")(const_int 0))(set (match_operand:SI 1 "memory_operand" "")(const_int 0))]"TARGET_V9&& mems_ok_for_ldd_peep (operands[1], operands[0], NULL_RTX)"[(set (match_dup 1)(const_int 0))]"operands[1] = widen_memory_access (operands[1], DImode, 0);")(define_peephole2[(set (match_operand:SI 0 "register_operand" "")(match_operand:SI 1 "memory_operand" ""))(set (match_operand:SI 2 "register_operand" "")(match_operand:SI 3 "memory_operand" ""))]"registers_ok_for_ldd_peep (operands[0], operands[2])&& mems_ok_for_ldd_peep (operands[1], operands[3], operands[0])"[(set (match_dup 0)(match_dup 1))]"operands[1] = widen_memory_access (operands[1], DImode, 0);operands[0] = gen_rtx_REG (DImode, REGNO (operands[0]));")(define_peephole2[(set (match_operand:SI 0 "memory_operand" "")(match_operand:SI 1 "register_operand" ""))(set (match_operand:SI 2 "memory_operand" "")(match_operand:SI 3 "register_operand" ""))]"registers_ok_for_ldd_peep (operands[1], operands[3])&& mems_ok_for_ldd_peep (operands[0], operands[2], NULL_RTX)"[(set (match_dup 0)(match_dup 1))]"operands[0] = widen_memory_access (operands[0], DImode, 0);operands[1] = gen_rtx_REG (DImode, REGNO (operands[1]));")(define_peephole2[(set (match_operand:SF 0 "register_operand" "")(match_operand:SF 1 "memory_operand" ""))(set (match_operand:SF 2 "register_operand" "")(match_operand:SF 3 "memory_operand" ""))]"registers_ok_for_ldd_peep (operands[0], operands[2])&& mems_ok_for_ldd_peep (operands[1], operands[3], operands[0])"[(set (match_dup 0)(match_dup 1))]"operands[1] = widen_memory_access (operands[1], DFmode, 0);operands[0] = gen_rtx_REG (DFmode, REGNO (operands[0]));")(define_peephole2[(set (match_operand:SF 0 "memory_operand" "")(match_operand:SF 1 "register_operand" ""))(set (match_operand:SF 2 "memory_operand" "")(match_operand:SF 3 "register_operand" ""))]"registers_ok_for_ldd_peep (operands[1], operands[3])&& mems_ok_for_ldd_peep (operands[0], operands[2], NULL_RTX)"[(set (match_dup 0)(match_dup 1))]"operands[0] = widen_memory_access (operands[0], DFmode, 0);operands[1] = gen_rtx_REG (DFmode, REGNO (operands[1]));")(define_peephole2[(set (match_operand:SI 0 "register_operand" "")(match_operand:SI 1 "memory_operand" ""))(set (match_operand:SI 2 "register_operand" "")(match_operand:SI 3 "memory_operand" ""))]"registers_ok_for_ldd_peep (operands[2], operands[0])&& mems_ok_for_ldd_peep (operands[3], operands[1], operands[0])"[(set (match_dup 2)(match_dup 3))]"operands[3] = widen_memory_access (operands[3], DImode, 0);operands[2] = gen_rtx_REG (DImode, REGNO (operands[2]));")(define_peephole2[(set (match_operand:SI 0 "memory_operand" "")(match_operand:SI 1 "register_operand" ""))(set (match_operand:SI 2 "memory_operand" "")(match_operand:SI 3 "register_operand" ""))]"registers_ok_for_ldd_peep (operands[3], operands[1])&& mems_ok_for_ldd_peep (operands[2], operands[0], NULL_RTX)"[(set (match_dup 2)(match_dup 3))]"operands[2] = widen_memory_access (operands[2], DImode, 0);operands[3] = gen_rtx_REG (DImode, REGNO (operands[3]));")(define_peephole2[(set (match_operand:SF 0 "register_operand" "")(match_operand:SF 1 "memory_operand" ""))(set (match_operand:SF 2 "register_operand" "")(match_operand:SF 3 "memory_operand" ""))]"registers_ok_for_ldd_peep (operands[2], operands[0])&& mems_ok_for_ldd_peep (operands[3], operands[1], operands[0])"[(set (match_dup 2)(match_dup 3))]"operands[3] = widen_memory_access (operands[3], DFmode, 0);operands[2] = gen_rtx_REG (DFmode, REGNO (operands[2]));")(define_peephole2[(set (match_operand:SF 0 "memory_operand" "")(match_operand:SF 1 "register_operand" ""))(set (match_operand:SF 2 "memory_operand" "")(match_operand:SF 3 "register_operand" ""))]"registers_ok_for_ldd_peep (operands[3], operands[1])&& mems_ok_for_ldd_peep (operands[2], operands[0], NULL_RTX)"[(set (match_dup 2)(match_dup 3))]"operands[2] = widen_memory_access (operands[2], DFmode, 0);operands[3] = gen_rtx_REG (DFmode, REGNO (operands[3]));");; Optimize the case of following a reg-reg move with a test;; of reg just moved. Don't allow floating point regs for operand 0 or 1.;; This can result from a float to fix conversion.(define_peephole2[(set (match_operand:SI 0 "register_operand" "")(match_operand:SI 1 "register_operand" ""))(set (reg:CC CC_REG)(compare:CC (match_operand:SI 2 "register_operand" "")(const_int 0)))]"(rtx_equal_p (operands[2], operands[0])|| rtx_equal_p (operands[2], operands[1]))&& ! SPARC_FP_REG_P (REGNO (operands[0]))&& ! SPARC_FP_REG_P (REGNO (operands[1]))"[(parallel [(set (match_dup 0) (match_dup 1))(set (reg:CC CC_REG)(compare:CC (match_dup 1) (const_int 0)))])]"")(define_peephole2[(set (match_operand:DI 0 "register_operand" "")(match_operand:DI 1 "register_operand" ""))(set (reg:CCX CC_REG)(compare:CCX (match_operand:DI 2 "register_operand" "")(const_int 0)))]"TARGET_ARCH64&& (rtx_equal_p (operands[2], operands[0])|| rtx_equal_p (operands[2], operands[1]))&& ! SPARC_FP_REG_P (REGNO (operands[0]))&& ! SPARC_FP_REG_P (REGNO (operands[1]))"[(parallel [(set (match_dup 0) (match_dup 1))(set (reg:CCX CC_REG)(compare:CCX (match_dup 1) (const_int 0)))])]"");; Prefetch instructions.;; ??? UltraSPARC-III note: A memory operation loading into the floating point register;; ??? file, if it hits the prefetch cache, has a chance to dual-issue with other memory;; ??? operations. With DFA we might be able to model this, but it requires a lot of;; ??? state.(define_expand "prefetch"[(match_operand 0 "address_operand" "")(match_operand 1 "const_int_operand" "")(match_operand 2 "const_int_operand" "")]"TARGET_V9"{if (TARGET_ARCH64)emit_insn (gen_prefetch_64 (operands[0], operands[1], operands[2]));elseemit_insn (gen_prefetch_32 (operands[0], operands[1], operands[2]));DONE;})(define_insn "prefetch_64"[(prefetch (match_operand:DI 0 "address_operand" "p")(match_operand:DI 1 "const_int_operand" "n")(match_operand:DI 2 "const_int_operand" "n"))]""{static const char * const prefetch_instr[2][2] = {{"prefetch\t[%a0], 1", /* no locality: prefetch for one read */"prefetch\t[%a0], 0", /* medium to high locality: prefetch for several reads */},{"prefetch\t[%a0], 3", /* no locality: prefetch for one write */"prefetch\t[%a0], 2", /* medium to high locality: prefetch for several writes */}};int read_or_write = INTVAL (operands[1]);int locality = INTVAL (operands[2]);gcc_assert (read_or_write == 0 || read_or_write == 1);gcc_assert (locality >= 0 && locality < 4);return prefetch_instr [read_or_write][locality == 0 ? 0 : 1];}[(set_attr "type" "load")])(define_insn "prefetch_32"[(prefetch (match_operand:SI 0 "address_operand" "p")(match_operand:SI 1 "const_int_operand" "n")(match_operand:SI 2 "const_int_operand" "n"))]""{static const char * const prefetch_instr[2][2] = {{"prefetch\t[%a0], 1", /* no locality: prefetch for one read */"prefetch\t[%a0], 0", /* medium to high locality: prefetch for several reads */},{"prefetch\t[%a0], 3", /* no locality: prefetch for one write */"prefetch\t[%a0], 2", /* medium to high locality: prefetch for several writes */}};int read_or_write = INTVAL (operands[1]);int locality = INTVAL (operands[2]);gcc_assert (read_or_write == 0 || read_or_write == 1);gcc_assert (locality >= 0 && locality < 4);return prefetch_instr [read_or_write][locality == 0 ? 0 : 1];}[(set_attr "type" "load")]);; Trap instructions.(define_insn "trap"[(trap_if (const_int 1) (const_int 5))]"""ta\t5"[(set_attr "type" "trap")])(define_expand "ctrapsi4"[(trap_if (match_operator 0 "noov_compare_operator"[(match_operand:SI 1 "compare_operand" "")(match_operand:SI 2 "arith_operand" "")])(match_operand 3 ""))]"""operands[1] = gen_compare_reg (operands[0]);if (GET_MODE (operands[1]) != CCmode && GET_MODE (operands[1]) != CCXmode)FAIL;operands[2] = const0_rtx;")(define_expand "ctrapdi4"[(trap_if (match_operator 0 "noov_compare_operator"[(match_operand:DI 1 "compare_operand" "")(match_operand:DI 2 "arith_operand" "")])(match_operand 3 ""))]"TARGET_ARCH64""operands[1] = gen_compare_reg (operands[0]);if (GET_MODE (operands[1]) != CCmode && GET_MODE (operands[1]) != CCXmode)FAIL;operands[2] = const0_rtx;")(define_insn ""[(trap_if (match_operator 0 "noov_compare_operator" [(reg:CC CC_REG) (const_int 0)])(match_operand:SI 1 "arith_operand" "rM"))]""{if (TARGET_V9)return "t%C0\t%%icc, %1";elsereturn "t%C0\t%1";}[(set_attr "type" "trap")])(define_insn ""[(trap_if (match_operator 0 "noov_compare_operator" [(reg:CCX CC_REG) (const_int 0)])(match_operand:SI 1 "arith_operand" "rM"))]"TARGET_V9""t%C0\t%%xcc, %1"[(set_attr "type" "trap")]);; TLS support instructions.(define_insn "tgd_hi22"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (unspec:SI [(match_operand 1 "tgd_symbolic_operand" "")]UNSPEC_TLSGD)))]"TARGET_TLS""sethi\\t%%tgd_hi22(%a1), %0")(define_insn "tgd_lo10"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand 2 "tgd_symbolic_operand" "")]UNSPEC_TLSGD)))]"TARGET_TLS""add\\t%1, %%tgd_lo10(%a2), %0")(define_insn "tgd_add32"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tgd_symbolic_operand" "")]UNSPEC_TLSGD)))]"TARGET_TLS && TARGET_ARCH32""add\\t%1, %2, %0, %%tgd_add(%a3)")(define_insn "tgd_add64"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tgd_symbolic_operand" "")]UNSPEC_TLSGD)))]"TARGET_TLS && TARGET_ARCH64""add\\t%1, %2, %0, %%tgd_add(%a3)")(define_insn "tgd_call32"[(set (match_operand 0 "register_operand" "=r")(call (mem:SI (unspec:SI [(match_operand:SI 1 "symbolic_operand" "s")(match_operand 2 "tgd_symbolic_operand" "")]UNSPEC_TLSGD))(match_operand 3 "" "")))(clobber (reg:SI O7_REG))]"TARGET_TLS && TARGET_ARCH32""call\t%a1, %%tgd_call(%a2)%#"[(set_attr "type" "call")])(define_insn "tgd_call64"[(set (match_operand 0 "register_operand" "=r")(call (mem:DI (unspec:DI [(match_operand:DI 1 "symbolic_operand" "s")(match_operand 2 "tgd_symbolic_operand" "")]UNSPEC_TLSGD))(match_operand 3 "" "")))(clobber (reg:DI O7_REG))]"TARGET_TLS && TARGET_ARCH64""call\t%a1, %%tgd_call(%a2)%#"[(set_attr "type" "call")])(define_insn "tldm_hi22"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (unspec:SI [(const_int 0)] UNSPEC_TLSLDM)))]"TARGET_TLS""sethi\\t%%tldm_hi22(%&), %0")(define_insn "tldm_lo10"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(const_int 0)] UNSPEC_TLSLDM)))]"TARGET_TLS""add\\t%1, %%tldm_lo10(%&), %0")(define_insn "tldm_add32"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand:SI 2 "register_operand" "r")]UNSPEC_TLSLDM)))]"TARGET_TLS && TARGET_ARCH32""add\\t%1, %2, %0, %%tldm_add(%&)")(define_insn "tldm_add64"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:SI 2 "register_operand" "r")]UNSPEC_TLSLDM)))]"TARGET_TLS && TARGET_ARCH64""add\\t%1, %2, %0, %%tldm_add(%&)")(define_insn "tldm_call32"[(set (match_operand 0 "register_operand" "=r")(call (mem:SI (unspec:SI [(match_operand:SI 1 "symbolic_operand" "s")]UNSPEC_TLSLDM))(match_operand 2 "" "")))(clobber (reg:SI O7_REG))]"TARGET_TLS && TARGET_ARCH32""call\t%a1, %%tldm_call(%&)%#"[(set_attr "type" "call")])(define_insn "tldm_call64"[(set (match_operand 0 "register_operand" "=r")(call (mem:DI (unspec:DI [(match_operand:DI 1 "symbolic_operand" "s")]UNSPEC_TLSLDM))(match_operand 2 "" "")))(clobber (reg:DI O7_REG))]"TARGET_TLS && TARGET_ARCH64""call\t%a1, %%tldm_call(%&)%#"[(set_attr "type" "call")])(define_insn "tldo_hix22"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (unspec:SI [(match_operand 1 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)))]"TARGET_TLS""sethi\\t%%tldo_hix22(%a1), %0")(define_insn "tldo_lox10"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand 2 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)))]"TARGET_TLS""xor\\t%1, %%tldo_lox10(%a2), %0")(define_insn "tldo_add32"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)))]"TARGET_TLS && TARGET_ARCH32""add\\t%1, %2, %0, %%tldo_add(%a3)")(define_insn "tldo_add64"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)))]"TARGET_TLS && TARGET_ARCH64""add\\t%1, %2, %0, %%tldo_add(%a3)")(define_insn "tie_hi22"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (unspec:SI [(match_operand 1 "tie_symbolic_operand" "")]UNSPEC_TLSIE)))]"TARGET_TLS""sethi\\t%%tie_hi22(%a1), %0")(define_insn "tie_lo10"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand 2 "tie_symbolic_operand" "")]UNSPEC_TLSIE)))]"TARGET_TLS""add\\t%1, %%tie_lo10(%a2), %0")(define_insn "tie_ld32"[(set (match_operand:SI 0 "register_operand" "=r")(unspec:SI [(match_operand:SI 1 "register_operand" "r")(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tie_symbolic_operand" "")]UNSPEC_TLSIE))]"TARGET_TLS && TARGET_ARCH32""ld\\t[%1 + %2], %0, %%tie_ld(%a3)"[(set_attr "type" "load")])(define_insn "tie_ld64"[(set (match_operand:DI 0 "register_operand" "=r")(unspec:DI [(match_operand:DI 1 "register_operand" "r")(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tie_symbolic_operand" "")]UNSPEC_TLSIE))]"TARGET_TLS && TARGET_ARCH64""ldx\\t[%1 + %2], %0, %%tie_ldx(%a3)"[(set_attr "type" "load")])(define_insn "tie_add32"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tie_symbolic_operand" "")]UNSPEC_TLSIE)))]"TARGET_SUN_TLS && TARGET_ARCH32""add\\t%1, %2, %0, %%tie_add(%a3)")(define_insn "tie_add64"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand:DI 2 "register_operand" "r")(match_operand 3 "tie_symbolic_operand" "")]UNSPEC_TLSIE)))]"TARGET_SUN_TLS && TARGET_ARCH64""add\\t%1, %2, %0, %%tie_add(%a3)")(define_insn "tle_hix22_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(high:SI (unspec:SI [(match_operand 1 "tle_symbolic_operand" "")]UNSPEC_TLSLE)))]"TARGET_TLS && TARGET_ARCH32""sethi\\t%%tle_hix22(%a1), %0")(define_insn "tle_lox10_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(lo_sum:SI (match_operand:SI 1 "register_operand" "r")(unspec:SI [(match_operand 2 "tle_symbolic_operand" "")]UNSPEC_TLSLE)))]"TARGET_TLS && TARGET_ARCH32""xor\\t%1, %%tle_lox10(%a2), %0")(define_insn "tle_hix22_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(high:DI (unspec:DI [(match_operand 1 "tle_symbolic_operand" "")]UNSPEC_TLSLE)))]"TARGET_TLS && TARGET_ARCH64""sethi\\t%%tle_hix22(%a1), %0")(define_insn "tle_lox10_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(lo_sum:DI (match_operand:DI 1 "register_operand" "r")(unspec:DI [(match_operand 2 "tle_symbolic_operand" "")]UNSPEC_TLSLE)))]"TARGET_TLS && TARGET_ARCH64""xor\\t%1, %%tle_lox10(%a2), %0");; Now patterns combining tldo_add{32,64} with some integer loads or stores(define_insn "*tldo_ldub_sp32"[(set (match_operand:QI 0 "register_operand" "=r")(mem:QI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH32""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldub1_sp32"[(set (match_operand:HI 0 "register_operand" "=r")(zero_extend:HI (mem:QI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH32""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldub2_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (mem:QI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH32""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsb1_sp32"[(set (match_operand:HI 0 "register_operand" "=r")(sign_extend:HI (mem:QI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH32""ldsb\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsb2_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(sign_extend:SI (mem:QI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH32""ldsb\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldub_sp64"[(set (match_operand:QI 0 "register_operand" "=r")(mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH64""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldub1_sp64"[(set (match_operand:HI 0 "register_operand" "=r")(zero_extend:HI (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldub2_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldub3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldub\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsb1_sp64"[(set (match_operand:HI 0 "register_operand" "=r")(sign_extend:HI (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldsb\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsb2_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(sign_extend:SI (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldsb\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsb3_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldsb\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_lduh_sp32"[(set (match_operand:HI 0 "register_operand" "=r")(mem:HI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH32""lduh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_lduh1_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (mem:HI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH32""lduh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsh1_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(sign_extend:SI (mem:HI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH32""ldsh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_lduh_sp64"[(set (match_operand:HI 0 "register_operand" "=r")(mem:HI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH64""lduh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_lduh1_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(zero_extend:SI (mem:HI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""lduh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_lduh2_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (mem:HI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""lduh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsh1_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(sign_extend:SI (mem:HI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldsh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldsh2_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (mem:HI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldsh\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_lduw_sp32"[(set (match_operand:SI 0 "register_operand" "=r")(mem:SI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH32""ld\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")])(define_insn "*tldo_lduw_sp64"[(set (match_operand:SI 0 "register_operand" "=r")(mem:SI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH64""lduw\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")])(define_insn "*tldo_lduw1_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(zero_extend:DI (mem:SI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""lduw\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")])(define_insn "*tldo_ldsw1_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(sign_extend:DI (mem:SI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))))]"TARGET_TLS && TARGET_ARCH64""ldsw\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "sload")(set_attr "us3load_type" "3cycle")])(define_insn "*tldo_ldx_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(mem:DI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r"))))]"TARGET_TLS && TARGET_ARCH64""ldx\t[%1 + %2], %0, %%tldo_add(%3)"[(set_attr "type" "load")])(define_insn "*tldo_stb_sp32"[(set (mem:QI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))(match_operand:QI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH32""stb\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")])(define_insn "*tldo_stb_sp64"[(set (mem:QI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))(match_operand:QI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH64""stb\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")])(define_insn "*tldo_sth_sp32"[(set (mem:HI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))(match_operand:HI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH32""sth\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")])(define_insn "*tldo_sth_sp64"[(set (mem:HI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))(match_operand:HI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH64""sth\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")])(define_insn "*tldo_stw_sp32"[(set (mem:SI (plus:SI (unspec:SI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:SI 1 "register_operand" "r")))(match_operand:SI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH32""st\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")])(define_insn "*tldo_stw_sp64"[(set (mem:SI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))(match_operand:SI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH64""stw\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")])(define_insn "*tldo_stx_sp64"[(set (mem:DI (plus:DI (unspec:DI [(match_operand:SI 2 "register_operand" "r")(match_operand 3 "tld_symbolic_operand" "")]UNSPEC_TLSLDO)(match_operand:DI 1 "register_operand" "r")))(match_operand:DI 0 "register_operand" "=r"))]"TARGET_TLS && TARGET_ARCH64""stx\t%0, [%1 + %2], %%tldo_add(%3)"[(set_attr "type" "store")]);; Stack protector instructions.(define_expand "stack_protect_set"[(match_operand 0 "memory_operand" "")(match_operand 1 "memory_operand" "")]""{#ifdef TARGET_THREAD_SSP_OFFSETrtx tlsreg = gen_rtx_REG (Pmode, 7);rtx addr = gen_rtx_PLUS (Pmode, tlsreg, GEN_INT (TARGET_THREAD_SSP_OFFSET));operands[1] = gen_rtx_MEM (Pmode, addr);#endifif (TARGET_ARCH64)emit_insn (gen_stack_protect_setdi (operands[0], operands[1]));elseemit_insn (gen_stack_protect_setsi (operands[0], operands[1]));DONE;})(define_insn "stack_protect_setsi"[(set (match_operand:SI 0 "memory_operand" "=m")(unspec:SI [(match_operand:SI 1 "memory_operand" "m")] UNSPEC_SP_SET))(set (match_scratch:SI 2 "=&r") (const_int 0))]"TARGET_ARCH32""ld\t%1, %2\;st\t%2, %0\;mov\t0, %2"[(set_attr "type" "multi")(set_attr "length" "3")])(define_insn "stack_protect_setdi"[(set (match_operand:DI 0 "memory_operand" "=m")(unspec:DI [(match_operand:DI 1 "memory_operand" "m")] UNSPEC_SP_SET))(set (match_scratch:DI 2 "=&r") (const_int 0))]"TARGET_ARCH64""ldx\t%1, %2\;stx\t%2, %0\;mov\t0, %2"[(set_attr "type" "multi")(set_attr "length" "3")])(define_expand "stack_protect_test"[(match_operand 0 "memory_operand" "")(match_operand 1 "memory_operand" "")(match_operand 2 "" "")]""{rtx result, test;#ifdef TARGET_THREAD_SSP_OFFSETrtx tlsreg = gen_rtx_REG (Pmode, 7);rtx addr = gen_rtx_PLUS (Pmode, tlsreg, GEN_INT (TARGET_THREAD_SSP_OFFSET));operands[1] = gen_rtx_MEM (Pmode, addr);#endifif (TARGET_ARCH64){result = gen_reg_rtx (Pmode);emit_insn (gen_stack_protect_testdi (result, operands[0], operands[1]));test = gen_rtx_EQ (VOIDmode, result, const0_rtx);emit_jump_insn (gen_cbranchdi4 (test, result, const0_rtx, operands[2]));}else{emit_insn (gen_stack_protect_testsi (operands[0], operands[1]));result = gen_rtx_REG (CCmode, SPARC_ICC_REG);test = gen_rtx_EQ (VOIDmode, result, const0_rtx);emit_jump_insn (gen_cbranchcc4 (test, result, const0_rtx, operands[2]));}DONE;})(define_insn "stack_protect_testsi"[(set (reg:CC CC_REG)(unspec:CC [(match_operand:SI 0 "memory_operand" "m")(match_operand:SI 1 "memory_operand" "m")]UNSPEC_SP_TEST))(set (match_scratch:SI 3 "=r") (const_int 0))(clobber (match_scratch:SI 2 "=&r"))]"TARGET_ARCH32""ld\t%0, %2\;ld\t%1, %3\;xorcc\t%2, %3, %2\;mov\t0, %3"[(set_attr "type" "multi")(set_attr "length" "4")])(define_insn "stack_protect_testdi"[(set (match_operand:DI 0 "register_operand" "=&r")(unspec:DI [(match_operand:DI 1 "memory_operand" "m")(match_operand:DI 2 "memory_operand" "m")]UNSPEC_SP_TEST))(set (match_scratch:DI 3 "=r") (const_int 0))]"TARGET_ARCH64""ldx\t%1, %0\;ldx\t%2, %3\;xor\t%0, %3, %0\;mov\t0, %3"[(set_attr "type" "multi")(set_attr "length" "4")]);; Vector instructions.(define_mode_iterator VM32 [V1SI V2HI V4QI])(define_mode_iterator VM64 [V1DI V2SI V4HI V8QI])(define_mode_iterator VMALL [V1SI V2HI V4QI V1DI V2SI V4HI V8QI])(define_mode_attr vbits [(V2SI "32") (V4HI "16") (V1SI "32s") (V2HI "16s")])(define_mode_attr vconstr [(V1SI "f") (V2HI "f") (V4QI "f")(V1DI "e") (V2SI "e") (V4HI "e") (V8QI "e")])(define_mode_attr vfptype [(V1SI "single") (V2HI "single") (V4QI "single")(V1DI "double") (V2SI "double") (V4HI "double")(V8QI "double")])(define_expand "mov<VMALL:mode>"[(set (match_operand:VMALL 0 "nonimmediate_operand" "")(match_operand:VMALL 1 "general_operand" ""))]"TARGET_VIS"{if (sparc_expand_move (<VMALL:MODE>mode, operands))DONE;})(define_insn "*mov<VM32:mode>_insn"[(set (match_operand:VM32 0 "nonimmediate_operand" "=f,f,f,f,m,m,*r, m,*r,*r, f")(match_operand:VM32 1 "input_operand" "Y,Z,f,m,f,Y, m,*r,*r, f,*r"))]"TARGET_VIS&& (register_operand (operands[0], <VM32:MODE>mode)|| register_or_zero_or_all_ones_operand (operands[1], <VM32:MODE>mode))""@fzeros\t%0fones\t%0fsrc1s\t%1, %0ld\t%1, %0st\t%1, %0st\t%r1, %0ld\t%1, %0st\t%1, %0mov\t%1, %0movstouw\t%1, %0movwtos\t%1, %0"[(set_attr "type" "fga,fga,fga,fpload,fpstore,store,load,store,*,*,*")(set_attr "cpu_feature" "vis,vis,vis,*,*,*,*,*,*,vis3,vis3")])(define_insn "*mov<VM64:mode>_insn_sp64"[(set (match_operand:VM64 0 "nonimmediate_operand" "=e,e,e,e,m,m,*r, m,*r, e,*r")(match_operand:VM64 1 "input_operand" "Y,C,e,m,e,Y, m,*r, e,*r,*r"))]"TARGET_VIS&& TARGET_ARCH64&& (register_operand (operands[0], <VM64:MODE>mode)|| register_or_zero_or_all_ones_operand (operands[1], <VM64:MODE>mode))""@fzero\t%0fone\t%0fsrc1\t%1, %0ldd\t%1, %0std\t%1, %0stx\t%r1, %0ldx\t%1, %0stx\t%1, %0movdtox\t%1, %0movxtod\t%1, %0mov\t%1, %0"[(set_attr "type" "fga,fga,fga,fpload,fpstore,store,load,store,*,*,*")(set_attr "cpu_feature" "vis,vis,vis,*,*,*,*,*,vis3,vis3,*")])(define_insn "*mov<VM64:mode>_insn_sp32"[(set (match_operand:VM64 0 "nonimmediate_operand" "=e,e,e,*r, f,e,m,m,U,T, o,*r")(match_operand:VM64 1 "input_operand" "Y,C,e, f,*r,m,e,Y,T,U,*r,*r"))]"TARGET_VIS&& ! TARGET_ARCH64&& (register_operand (operands[0], <VM64:MODE>mode)|| register_or_zero_or_all_ones_operand (operands[1], <VM64:MODE>mode))""@fzero\t%0fone\t%0fsrc1\t%1, %0##ldd\t%1, %0std\t%1, %0stx\t%r1, %0ldd\t%1, %0std\t%1, %0##"[(set_attr "type" "fga,fga,fga,*,*,fpload,fpstore,store,load,store,*,*")(set_attr "length" "*,*,*,2,2,*,*,*,*,*,2,2")(set_attr "cpu_feature" "vis,vis,vis,vis3,vis3,*,*,*,*,*,*,*")])(define_split[(set (match_operand:VM64 0 "memory_operand" "")(match_operand:VM64 1 "register_operand" ""))]"reload_completed&& TARGET_VIS&& ! TARGET_ARCH64&& (((REGNO (operands[1]) % 2) != 0)|| ! mem_min_alignment (operands[0], 8))&& offsettable_memref_p (operands[0])"[(clobber (const_int 0))]{rtx word0, word1;word0 = adjust_address (operands[0], SImode, 0);word1 = adjust_address (operands[0], SImode, 4);emit_move_insn_1 (word0, gen_highpart (SImode, operands[1]));emit_move_insn_1 (word1, gen_lowpart (SImode, operands[1]));DONE;})(define_split[(set (match_operand:VM64 0 "register_operand" "")(match_operand:VM64 1 "register_operand" ""))]"reload_completed&& TARGET_VIS&& ! TARGET_ARCH64&& sparc_split_regreg_legitimate (operands[0], operands[1])"[(clobber (const_int 0))]{rtx set_dest = operands[0];rtx set_src = operands[1];rtx dest1, dest2;rtx src1, src2;dest1 = gen_highpart (SImode, set_dest);dest2 = gen_lowpart (SImode, set_dest);src1 = gen_highpart (SImode, set_src);src2 = gen_lowpart (SImode, set_src);/* Now emit using the real source and destination we found, swappingthe order if we detect overlap. */if (reg_overlap_mentioned_p (dest1, src2)){emit_insn (gen_movsi (dest2, src2));emit_insn (gen_movsi (dest1, src1));}else{emit_insn (gen_movsi (dest1, src1));emit_insn (gen_movsi (dest2, src2));}DONE;})(define_expand "vec_init<mode>"[(match_operand:VMALL 0 "register_operand" "")(match_operand:VMALL 1 "" "")]"TARGET_VIS"{sparc_expand_vector_init (operands[0], operands[1]);DONE;})(define_code_iterator plusminus [plus minus])(define_code_attr plusminus_insn [(plus "add") (minus "sub")])(define_mode_iterator VADDSUB [V1SI V2SI V2HI V4HI])(define_insn "<plusminus_insn><mode>3"[(set (match_operand:VADDSUB 0 "register_operand" "=<vconstr>")(plusminus:VADDSUB (match_operand:VADDSUB 1 "register_operand" "<vconstr>")(match_operand:VADDSUB 2 "register_operand" "<vconstr>")))]"TARGET_VIS""fp<plusminus_insn><vbits>\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")])(define_mode_iterator VL [V1SI V2HI V4QI V1DI V2SI V4HI V8QI])(define_mode_attr vlsuf [(V1SI "s") (V2HI "s") (V4QI "s")(V1DI "") (V2SI "") (V4HI "") (V8QI "")])(define_code_iterator vlop [ior and xor])(define_code_attr vlinsn [(ior "or") (and "and") (xor "xor")])(define_code_attr vlninsn [(ior "nor") (and "nand") (xor "xnor")])(define_insn "<code><mode>3"[(set (match_operand:VL 0 "register_operand" "=<vconstr>")(vlop:VL (match_operand:VL 1 "register_operand" "<vconstr>")(match_operand:VL 2 "register_operand" "<vconstr>")))]"TARGET_VIS""f<vlinsn><vlsuf>\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")])(define_insn "*not_<code><mode>3"[(set (match_operand:VL 0 "register_operand" "=<vconstr>")(not:VL (vlop:VL (match_operand:VL 1 "register_operand" "<vconstr>")(match_operand:VL 2 "register_operand" "<vconstr>"))))]"TARGET_VIS""f<vlninsn><vlsuf>\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")]);; (ior (not (op1)) (not (op2))) is the canonical form of NAND.(define_insn "*nand<mode>_vis"[(set (match_operand:VL 0 "register_operand" "=<vconstr>")(ior:VL (not:VL (match_operand:VL 1 "register_operand" "<vconstr>"))(not:VL (match_operand:VL 2 "register_operand" "<vconstr>"))))]"TARGET_VIS""fnand<vlsuf>\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")])(define_code_iterator vlnotop [ior and])(define_insn "*<code>_not1<mode>_vis"[(set (match_operand:VL 0 "register_operand" "=<vconstr>")(vlnotop:VL (not:VL (match_operand:VL 1 "register_operand" "<vconstr>"))(match_operand:VL 2 "register_operand" "<vconstr>")))]"TARGET_VIS""f<vlinsn>not1<vlsuf>\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")])(define_insn "*<code>_not2<mode>_vis"[(set (match_operand:VL 0 "register_operand" "=<vconstr>")(vlnotop:VL (match_operand:VL 1 "register_operand" "<vconstr>")(not:VL (match_operand:VL 2 "register_operand" "<vconstr>"))))]"TARGET_VIS""f<vlinsn>not2<vlsuf>\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")])(define_insn "one_cmpl<mode>2"[(set (match_operand:VL 0 "register_operand" "=<vconstr>")(not:VL (match_operand:VL 1 "register_operand" "<vconstr>")))]"TARGET_VIS""fnot1<vlsuf>\t%1, %0"[(set_attr "type" "fga")(set_attr "fptype" "<vfptype>")]);; Hard to generate VIS instructions. We have builtins for these.(define_insn "fpack16_vis"[(set (match_operand:V4QI 0 "register_operand" "=f")(unspec:V4QI [(match_operand:V4HI 1 "register_operand" "e")(reg:DI GSR_REG)]UNSPEC_FPACK16))]"TARGET_VIS""fpack16\t%1, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "fpackfix_vis"[(set (match_operand:V2HI 0 "register_operand" "=f")(unspec:V2HI [(match_operand:V2SI 1 "register_operand" "e")(reg:DI GSR_REG)]UNSPEC_FPACKFIX))]"TARGET_VIS""fpackfix\t%1, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "fpack32_vis"[(set (match_operand:V8QI 0 "register_operand" "=e")(unspec:V8QI [(match_operand:V2SI 1 "register_operand" "e")(match_operand:V8QI 2 "register_operand" "e")(reg:DI GSR_REG)]UNSPEC_FPACK32))]"TARGET_VIS""fpack32\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "fexpand_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V4QI 1 "register_operand" "f")]UNSPEC_FEXPAND))]"TARGET_VIS""fexpand\t%1, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "fpmerge_vis"[(set (match_operand:V8QI 0 "register_operand" "=e")(vec_select:V8QI(vec_concat:V8QI (match_operand:V4QI 1 "register_operand" "f")(match_operand:V4QI 2 "register_operand" "f"))(parallel [(const_int 0) (const_int 4)(const_int 1) (const_int 5)(const_int 2) (const_int 6)(const_int 3) (const_int 7)])))]"TARGET_VIS""fpmerge\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "vec_interleave_lowv8qi"[(set (match_operand:V8QI 0 "register_operand" "=e")(vec_select:V8QI(vec_concat:V16QI (match_operand:V8QI 1 "register_operand" "f")(match_operand:V8QI 2 "register_operand" "f"))(parallel [(const_int 0) (const_int 8)(const_int 1) (const_int 9)(const_int 2) (const_int 10)(const_int 3) (const_int 11)])))]"TARGET_VIS""fpmerge\t%L1, %L2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "vec_interleave_highv8qi"[(set (match_operand:V8QI 0 "register_operand" "=e")(vec_select:V8QI(vec_concat:V16QI (match_operand:V8QI 1 "register_operand" "f")(match_operand:V8QI 2 "register_operand" "f"))(parallel [(const_int 4) (const_int 12)(const_int 5) (const_int 13)(const_int 6) (const_int 14)(const_int 7) (const_int 15)])))]"TARGET_VIS""fpmerge\t%H1, %H2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")]);; Partitioned multiply instructions(define_insn "fmul8x16_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V4QI 1 "register_operand" "f")(match_operand:V4HI 2 "register_operand" "e")]UNSPEC_MUL8))]"TARGET_VIS""fmul8x16\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fmul8x16au_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V4QI 1 "register_operand" "f")(match_operand:V2HI 2 "register_operand" "f")]UNSPEC_MUL16AU))]"TARGET_VIS""fmul8x16au\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fmul8x16al_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V4QI 1 "register_operand" "f")(match_operand:V2HI 2 "register_operand" "f")]UNSPEC_MUL16AL))]"TARGET_VIS""fmul8x16al\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fmul8sux16_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V8QI 1 "register_operand" "e")(match_operand:V4HI 2 "register_operand" "e")]UNSPEC_MUL8SU))]"TARGET_VIS""fmul8sux16\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fmul8ulx16_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V8QI 1 "register_operand" "e")(match_operand:V4HI 2 "register_operand" "e")]UNSPEC_MUL8UL))]"TARGET_VIS""fmul8ulx16\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fmuld8sux16_vis"[(set (match_operand:V2SI 0 "register_operand" "=e")(unspec:V2SI [(match_operand:V4QI 1 "register_operand" "f")(match_operand:V2HI 2 "register_operand" "f")]UNSPEC_MULDSU))]"TARGET_VIS""fmuld8sux16\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fmuld8ulx16_vis"[(set (match_operand:V2SI 0 "register_operand" "=e")(unspec:V2SI [(match_operand:V4QI 1 "register_operand" "f")(match_operand:V2HI 2 "register_operand" "f")]UNSPEC_MULDUL))]"TARGET_VIS""fmuld8ulx16\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_expand "wrgsr_vis"[(set (reg:DI GSR_REG) (match_operand:DI 0 "arith_operand" ""))]"TARGET_VIS"{if (! TARGET_ARCH64){emit_insn (gen_wrgsr_v8plus (operands[0]));DONE;}})(define_insn "*wrgsr_sp64"[(set (reg:DI GSR_REG) (match_operand:DI 0 "arith_operand" "rI"))]"TARGET_VIS && TARGET_ARCH64""wr\t%%g0, %0, %%gsr"[(set_attr "type" "gsr")])(define_insn "wrgsr_v8plus"[(set (reg:DI GSR_REG) (match_operand:DI 0 "arith_operand" "I,r"))(clobber (match_scratch:SI 1 "=X,&h"))]"TARGET_VIS && ! TARGET_ARCH64"{if (GET_CODE (operands[0]) == CONST_INT|| sparc_check_64 (operands[0], insn))return "wr\t%%g0, %0, %%gsr";output_asm_insn("srl\t%L0, 0, %L0", operands);return "sllx\t%H0, 32, %1\n\tor\t%L0, %1, %1\n\twr\t%%g0, %1, %%gsr";}[(set_attr "type" "multi")])(define_expand "rdgsr_vis"[(set (match_operand:DI 0 "register_operand" "") (reg:DI GSR_REG))]"TARGET_VIS"{if (! TARGET_ARCH64){emit_insn (gen_rdgsr_v8plus (operands[0]));DONE;}})(define_insn "*rdgsr_sp64"[(set (match_operand:DI 0 "register_operand" "=r") (reg:DI GSR_REG))]"TARGET_VIS && TARGET_ARCH64""rd\t%%gsr, %0"[(set_attr "type" "gsr")])(define_insn "rdgsr_v8plus"[(set (match_operand:DI 0 "register_operand" "=r") (reg:DI GSR_REG))(clobber (match_scratch:SI 1 "=&h"))]"TARGET_VIS && ! TARGET_ARCH64"{return "rd\t%%gsr, %1\n\tsrlx\t%1, 32, %H0\n\tmov %1, %L0";}[(set_attr "type" "multi")]);; Using faligndata only makes sense after an alignaddr since the choice of;; bytes to take out of each operand is dependent on the results of the last;; alignaddr.(define_insn "faligndata<VM64:mode>_vis"[(set (match_operand:VM64 0 "register_operand" "=e")(unspec:VM64 [(match_operand:VM64 1 "register_operand" "e")(match_operand:VM64 2 "register_operand" "e")(reg:DI GSR_REG)]UNSPEC_ALIGNDATA))]"TARGET_VIS""faligndata\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")])(define_insn "alignaddrsi_vis"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "register_or_zero_operand" "rJ")))(set (zero_extract:DI (reg:DI GSR_REG) (const_int 3) (const_int 0))(zero_extend:DI (plus:SI (match_dup 1) (match_dup 2))))]"TARGET_VIS""alignaddr\t%r1, %r2, %0")(define_insn "alignaddrdi_vis"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_or_zero_operand" "rJ")(match_operand:DI 2 "register_or_zero_operand" "rJ")))(set (zero_extract:DI (reg:DI GSR_REG) (const_int 3) (const_int 0))(plus:DI (match_dup 1) (match_dup 2)))]"TARGET_VIS""alignaddr\t%r1, %r2, %0")(define_insn "alignaddrlsi_vis"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "register_or_zero_operand" "rJ")))(set (zero_extract:DI (reg:DI GSR_REG) (const_int 3) (const_int 0))(xor:DI (zero_extend:DI (plus:SI (match_dup 1) (match_dup 2)))(const_int 7)))]"TARGET_VIS""alignaddrl\t%r1, %r2, %0")(define_insn "alignaddrldi_vis"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_or_zero_operand" "rJ")(match_operand:DI 2 "register_or_zero_operand" "rJ")))(set (zero_extract:DI (reg:DI GSR_REG) (const_int 3) (const_int 0))(xor:DI (plus:DI (match_dup 1) (match_dup 2))(const_int 7)))]"TARGET_VIS""alignaddrl\t%r1, %r2, %0")(define_insn "pdist_vis"[(set (match_operand:DI 0 "register_operand" "=e")(unspec:DI [(match_operand:V8QI 1 "register_operand" "e")(match_operand:V8QI 2 "register_operand" "e")(match_operand:DI 3 "register_operand" "0")]UNSPEC_PDIST))]"TARGET_VIS""pdist\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")]);; Edge instructions produce condition codes equivalent to a 'subcc';; with the same operands.(define_insn "edge8<P:mode>_vis"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:P (match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ"))(const_int 0)))(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_dup 1) (match_dup 2)] UNSPEC_EDGE8))]"TARGET_VIS""edge8\t%r1, %r2, %0"[(set_attr "type" "edge")])(define_insn "edge8l<P:mode>_vis"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:P (match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ"))(const_int 0)))(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_dup 1) (match_dup 2)] UNSPEC_EDGE8L))]"TARGET_VIS""edge8l\t%r1, %r2, %0"[(set_attr "type" "edge")])(define_insn "edge16<P:mode>_vis"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:P (match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ"))(const_int 0)))(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_dup 1) (match_dup 2)] UNSPEC_EDGE16))]"TARGET_VIS""edge16\t%r1, %r2, %0"[(set_attr "type" "edge")])(define_insn "edge16l<P:mode>_vis"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:P (match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ"))(const_int 0)))(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_dup 1) (match_dup 2)] UNSPEC_EDGE16L))]"TARGET_VIS""edge16l\t%r1, %r2, %0"[(set_attr "type" "edge")])(define_insn "edge32<P:mode>_vis"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:P (match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ"))(const_int 0)))(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_dup 1) (match_dup 2)] UNSPEC_EDGE32))]"TARGET_VIS""edge32\t%r1, %r2, %0"[(set_attr "type" "edge")])(define_insn "edge32l<P:mode>_vis"[(set (reg:CC_NOOV CC_REG)(compare:CC_NOOV (minus:P (match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ"))(const_int 0)))(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_dup 1) (match_dup 2)] UNSPEC_EDGE32L))]"TARGET_VIS""edge32l\t%r1, %r2, %0"[(set_attr "type" "edge")])(define_code_iterator gcond [le ne gt eq])(define_mode_iterator GCM [V4HI V2SI])(define_mode_attr gcm_name [(V4HI "16") (V2SI "32")])(define_insn "fcmp<code><GCM:gcm_name><P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(gcond:GCM (match_operand:GCM 1 "register_operand" "e")(match_operand:GCM 2 "register_operand" "e"))]UNSPEC_FCMP))]"TARGET_VIS""fcmp<code><GCM:gcm_name>\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_expand "vcond<mode><mode>"[(match_operand:GCM 0 "register_operand" "")(match_operand:GCM 1 "register_operand" "")(match_operand:GCM 2 "register_operand" "")(match_operator 3 ""[(match_operand:GCM 4 "register_operand" "")(match_operand:GCM 5 "register_operand" "")])]"TARGET_VIS3"{sparc_expand_vcond (<MODE>mode, operands,UNSPEC_CMASK<gcm_name>,UNSPEC_FCMP);DONE;})(define_expand "vconduv8qiv8qi"[(match_operand:V8QI 0 "register_operand" "")(match_operand:V8QI 1 "register_operand" "")(match_operand:V8QI 2 "register_operand" "")(match_operator 3 ""[(match_operand:V8QI 4 "register_operand" "")(match_operand:V8QI 5 "register_operand" "")])]"TARGET_VIS3"{sparc_expand_vcond (V8QImode, operands,UNSPEC_CMASK8,UNSPEC_FUCMP);DONE;})(define_insn "array8<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_ARRAY8))]"TARGET_VIS""array8\t%r1, %r2, %0"[(set_attr "type" "array")])(define_insn "array16<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_ARRAY16))]"TARGET_VIS""array16\t%r1, %r2, %0"[(set_attr "type" "array")])(define_insn "array32<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_ARRAY32))]"TARGET_VIS""array32\t%r1, %r2, %0"[(set_attr "type" "array")])(define_insn "bmaskdi_vis"[(set (match_operand:DI 0 "register_operand" "=r")(plus:DI (match_operand:DI 1 "register_or_zero_operand" "rJ")(match_operand:DI 2 "register_or_zero_operand" "rJ")))(set (zero_extract:DI (reg:DI GSR_REG) (const_int 32) (const_int 32))(plus:DI (match_dup 1) (match_dup 2)))]"TARGET_VIS2""bmask\t%r1, %r2, %0"[(set_attr "type" "array")])(define_insn "bmasksi_vis"[(set (match_operand:SI 0 "register_operand" "=r")(plus:SI (match_operand:SI 1 "register_or_zero_operand" "rJ")(match_operand:SI 2 "register_or_zero_operand" "rJ")))(set (zero_extract:DI (reg:DI GSR_REG) (const_int 32) (const_int 32))(zero_extend:DI (plus:SI (match_dup 1) (match_dup 2))))]"TARGET_VIS2""bmask\t%r1, %r2, %0"[(set_attr "type" "array")])(define_insn "bshuffle<VM64:mode>_vis"[(set (match_operand:VM64 0 "register_operand" "=e")(unspec:VM64 [(match_operand:VM64 1 "register_operand" "e")(match_operand:VM64 2 "register_operand" "e")(reg:DI GSR_REG)]UNSPEC_BSHUFFLE))]"TARGET_VIS2""bshuffle\t%1, %2, %0"[(set_attr "type" "fga")(set_attr "fptype" "double")]);; The rtl expanders will happily convert constant permutations on other;; modes down to V8QI. Rely on this to avoid the complexity of the byte;; order of the permutation.(define_expand "vec_perm_constv8qi"[(match_operand:V8QI 0 "register_operand" "")(match_operand:V8QI 1 "register_operand" "")(match_operand:V8QI 2 "register_operand" "")(match_operand:V8QI 3 "" "")]"TARGET_VIS2"{unsigned int i, mask;rtx sel = operands[3];for (i = mask = 0; i < 8; ++i)mask |= (INTVAL (XVECEXP (sel, 0, i)) & 0xf) << (28 - i*4);sel = force_reg (SImode, gen_int_mode (mask, SImode));emit_insn (gen_bmasksi_vis (gen_reg_rtx (SImode), sel, const0_rtx));emit_insn (gen_bshufflev8qi_vis (operands[0], operands[1], operands[2]));DONE;});; Unlike constant permutation, we can vastly simplify the compression of;; the 64-bit selector input to the 32-bit %gsr value by knowing what the;; width of the input is.(define_expand "vec_perm<mode>"[(match_operand:VM64 0 "register_operand" "")(match_operand:VM64 1 "register_operand" "")(match_operand:VM64 2 "register_operand" "")(match_operand:VM64 3 "register_operand" "")]"TARGET_VIS2"{sparc_expand_vec_perm_bmask (<MODE>mode, operands[3]);emit_insn (gen_bshuffle<mode>_vis (operands[0], operands[1], operands[2]));DONE;});; VIS 2.0 adds edge variants which do not set the condition codes(define_insn "edge8n<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_EDGE8N))]"TARGET_VIS2""edge8n\t%r1, %r2, %0"[(set_attr "type" "edgen")])(define_insn "edge8ln<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_EDGE8LN))]"TARGET_VIS2""edge8ln\t%r1, %r2, %0"[(set_attr "type" "edgen")])(define_insn "edge16n<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_EDGE16N))]"TARGET_VIS2""edge16n\t%r1, %r2, %0"[(set_attr "type" "edgen")])(define_insn "edge16ln<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_EDGE16LN))]"TARGET_VIS2""edge16ln\t%r1, %r2, %0"[(set_attr "type" "edgen")])(define_insn "edge32n<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_EDGE32N))]"TARGET_VIS2""edge32n\t%r1, %r2, %0"[(set_attr "type" "edgen")])(define_insn "edge32ln<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:P 1 "register_or_zero_operand" "rJ")(match_operand:P 2 "register_or_zero_operand" "rJ")]UNSPEC_EDGE32LN))]"TARGET_VIS2""edge32ln\t%r1, %r2, %0"[(set_attr "type" "edge")]);; Conditional moves are possible via fcmpX --> cmaskX -> bshuffle(define_insn "cmask8<P:mode>_vis"[(set (reg:DI GSR_REG)(unspec:DI [(match_operand:P 0 "register_or_zero_operand" "rJ")(reg:DI GSR_REG)]UNSPEC_CMASK8))]"TARGET_VIS3""cmask8\t%r0")(define_insn "cmask16<P:mode>_vis"[(set (reg:DI GSR_REG)(unspec:DI [(match_operand:P 0 "register_or_zero_operand" "rJ")(reg:DI GSR_REG)]UNSPEC_CMASK16))]"TARGET_VIS3""cmask16\t%r0")(define_insn "cmask32<P:mode>_vis"[(set (reg:DI GSR_REG)(unspec:DI [(match_operand:P 0 "register_or_zero_operand" "rJ")(reg:DI GSR_REG)]UNSPEC_CMASK32))]"TARGET_VIS3""cmask32\t%r0")(define_insn "fchksm16_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(unspec:V4HI [(match_operand:V4HI 1 "register_operand" "e")(match_operand:V4HI 2 "register_operand" "e")]UNSPEC_FCHKSM16))]"TARGET_VIS3""fchksm16\t%1, %2, %0")(define_code_iterator vis3_shift [ashift ss_ashift lshiftrt ashiftrt])(define_code_attr vis3_shift_insn[(ashift "fsll") (ss_ashift "fslas") (lshiftrt "fsrl") (ashiftrt "fsra")])(define_code_attr vis3_shift_patname[(ashift "ashl") (ss_ashift "ssashl") (lshiftrt "lshr") (ashiftrt "ashr")])(define_insn "v<vis3_shift_patname><mode>3"[(set (match_operand:GCM 0 "register_operand" "=<vconstr>")(vis3_shift:GCM (match_operand:GCM 1 "register_operand" "<vconstr>")(match_operand:GCM 2 "register_operand" "<vconstr>")))]"TARGET_VIS3""<vis3_shift_insn><vbits>\t%1, %2, %0")(define_insn "pdistn<mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(match_operand:V8QI 1 "register_operand" "e")(match_operand:V8QI 2 "register_operand" "e")]UNSPEC_PDISTN))]"TARGET_VIS3""pdistn\t%1, %2, %0")(define_insn "fmean16_vis"[(set (match_operand:V4HI 0 "register_operand" "=e")(truncate:V4HI(lshiftrt:V4SI(plus:V4SI(plus:V4SI(zero_extend:V4SI(match_operand:V4HI 1 "register_operand" "e"))(zero_extend:V4SI(match_operand:V4HI 2 "register_operand" "e")))(const_vector:V4SI [(const_int 1) (const_int 1)(const_int 1) (const_int 1)]))(const_int 1))))]"TARGET_VIS3""fmean16\t%1, %2, %0")(define_insn "fp<plusminus_insn>64_vis"[(set (match_operand:V1DI 0 "register_operand" "=e")(plusminus:V1DI (match_operand:V1DI 1 "register_operand" "e")(match_operand:V1DI 2 "register_operand" "e")))]"TARGET_VIS3""fp<plusminus_insn>64\t%1, %2, %0")(define_mode_iterator VASS [V4HI V2SI V2HI V1SI])(define_code_iterator vis3_addsub_ss [ss_plus ss_minus])(define_code_attr vis3_addsub_ss_insn[(ss_plus "fpadds") (ss_minus "fpsubs")])(define_code_attr vis3_addsub_ss_patname[(ss_plus "ssadd") (ss_minus "sssub")])(define_insn "<vis3_addsub_ss_patname><mode>3"[(set (match_operand:VASS 0 "register_operand" "=<vconstr>")(vis3_addsub_ss:VASS (match_operand:VASS 1 "register_operand" "<vconstr>")(match_operand:VASS 2 "register_operand" "<vconstr>")))]"TARGET_VIS3""<vis3_addsub_ss_insn><vbits>\t%1, %2, %0")(define_insn "fucmp<code>8<P:mode>_vis"[(set (match_operand:P 0 "register_operand" "=r")(unspec:P [(gcond:V8QI (match_operand:V8QI 1 "register_operand" "e")(match_operand:V8QI 2 "register_operand" "e"))]UNSPEC_FUCMP))]"TARGET_VIS3""fucmp<code>8\t%1, %2, %0")(define_insn "*naddsf3"[(set (match_operand:SF 0 "register_operand" "=f")(neg:SF (plus:SF (match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f"))))]"TARGET_VIS3""fnadds\t%1, %2, %0"[(set_attr "type" "fp")])(define_insn "*nadddf3"[(set (match_operand:DF 0 "register_operand" "=e")(neg:DF (plus:DF (match_operand:DF 1 "register_operand" "e")(match_operand:DF 2 "register_operand" "e"))))]"TARGET_VIS3""fnaddd\t%1, %2, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "*nmulsf3"[(set (match_operand:SF 0 "register_operand" "=f")(mult:SF (neg:SF (match_operand:SF 1 "register_operand" "f"))(match_operand:SF 2 "register_operand" "f")))]"TARGET_VIS3""fnmuls\t%1, %2, %0"[(set_attr "type" "fpmul")])(define_insn "*nmuldf3"[(set (match_operand:DF 0 "register_operand" "=e")(mult:DF (neg:DF (match_operand:DF 1 "register_operand" "e"))(match_operand:DF 2 "register_operand" "e")))]"TARGET_VIS3""fnmuld\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "*nmuldf3_extend"[(set (match_operand:DF 0 "register_operand" "=e")(mult:DF (neg:DF (float_extend:DF(match_operand:SF 1 "register_operand" "f")))(float_extend:DF(match_operand:SF 2 "register_operand" "f"))))]"TARGET_VIS3""fnsmuld\t%1, %2, %0"[(set_attr "type" "fpmul")(set_attr "fptype" "double")])(define_insn "fhaddsf_vis"[(set (match_operand:SF 0 "register_operand" "=f")(unspec:SF [(match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")]UNSPEC_FHADD))]"TARGET_VIS3""fhadds\t%1, %2, %0"[(set_attr "type" "fp")])(define_insn "fhadddf_vis"[(set (match_operand:DF 0 "register_operand" "=f")(unspec:DF [(match_operand:DF 1 "register_operand" "f")(match_operand:DF 2 "register_operand" "f")]UNSPEC_FHADD))]"TARGET_VIS3""fhaddd\t%1, %2, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "fhsubsf_vis"[(set (match_operand:SF 0 "register_operand" "=f")(unspec:SF [(match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")]UNSPEC_FHSUB))]"TARGET_VIS3""fhsubs\t%1, %2, %0"[(set_attr "type" "fp")])(define_insn "fhsubdf_vis"[(set (match_operand:DF 0 "register_operand" "=f")(unspec:DF [(match_operand:DF 1 "register_operand" "f")(match_operand:DF 2 "register_operand" "f")]UNSPEC_FHSUB))]"TARGET_VIS3""fhsubd\t%1, %2, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_insn "fnhaddsf_vis"[(set (match_operand:SF 0 "register_operand" "=f")(neg:SF (unspec:SF [(match_operand:SF 1 "register_operand" "f")(match_operand:SF 2 "register_operand" "f")]UNSPEC_FHADD)))]"TARGET_VIS3""fnhadds\t%1, %2, %0"[(set_attr "type" "fp")])(define_insn "fnhadddf_vis"[(set (match_operand:DF 0 "register_operand" "=f")(neg:DF (unspec:DF [(match_operand:DF 1 "register_operand" "f")(match_operand:DF 2 "register_operand" "f")]UNSPEC_FHADD)))]"TARGET_VIS3""fnhaddd\t%1, %2, %0"[(set_attr "type" "fp")(set_attr "fptype" "double")])(define_expand "umulxhi_vis"[(set (match_operand:DI 0 "register_operand" "")(truncate:DI(lshiftrt:TI(mult:TI (zero_extend:TI(match_operand:DI 1 "arith_operand" ""))(zero_extend:TI(match_operand:DI 2 "arith_operand" "")))(const_int 64))))]"TARGET_VIS3"{if (! TARGET_ARCH64){emit_insn (gen_umulxhi_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*umulxhi_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(truncate:DI(lshiftrt:TI(mult:TI (zero_extend:TI(match_operand:DI 1 "arith_operand" "%r"))(zero_extend:TI(match_operand:DI 2 "arith_operand" "rI")))(const_int 64))))]"TARGET_VIS3 && TARGET_ARCH64""umulxhi\t%1, %2, %0"[(set_attr "type" "imul")])(define_insn "umulxhi_v8plus"[(set (match_operand:DI 0 "register_operand" "=r,h")(truncate:DI(lshiftrt:TI(mult:TI (zero_extend:TI(match_operand:DI 1 "arith_operand" "%r,0"))(zero_extend:TI(match_operand:DI 2 "arith_operand" "rI,rI")))(const_int 64))))(clobber (match_scratch:SI 3 "=&h,X"))(clobber (match_scratch:SI 4 "=&h,X"))]"TARGET_VIS3 && ! TARGET_ARCH64""* return output_v8plus_mult (insn, operands, \"umulxhi\");"[(set_attr "type" "imul")(set_attr "length" "9,8")])(define_expand "xmulx_vis"[(set (match_operand:DI 0 "register_operand" "")(truncate:DI(unspec:TI [(zero_extend:TI(match_operand:DI 1 "arith_operand" ""))(zero_extend:TI(match_operand:DI 2 "arith_operand" ""))]UNSPEC_XMUL)))]"TARGET_VIS3"{if (! TARGET_ARCH64){emit_insn (gen_xmulx_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*xmulx_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(truncate:DI(unspec:TI [(zero_extend:TI(match_operand:DI 1 "arith_operand" "%r"))(zero_extend:TI(match_operand:DI 2 "arith_operand" "rI"))]UNSPEC_XMUL)))]"TARGET_VIS3 && TARGET_ARCH64""xmulx\t%1, %2, %0"[(set_attr "type" "imul")])(define_insn "xmulx_v8plus"[(set (match_operand:DI 0 "register_operand" "=r,h")(truncate:DI(unspec:TI [(zero_extend:TI(match_operand:DI 1 "arith_operand" "%r,0"))(zero_extend:TI(match_operand:DI 2 "arith_operand" "rI,rI"))]UNSPEC_XMUL)))(clobber (match_scratch:SI 3 "=&h,X"))(clobber (match_scratch:SI 4 "=&h,X"))]"TARGET_VIS3 && ! TARGET_ARCH64""* return output_v8plus_mult (insn, operands, \"xmulx\");"[(set_attr "type" "imul")(set_attr "length" "9,8")])(define_expand "xmulxhi_vis"[(set (match_operand:DI 0 "register_operand" "")(truncate:DI(lshiftrt:TI(unspec:TI [(zero_extend:TI(match_operand:DI 1 "arith_operand" ""))(zero_extend:TI(match_operand:DI 2 "arith_operand" ""))]UNSPEC_XMUL)(const_int 64))))]"TARGET_VIS3"{if (! TARGET_ARCH64){emit_insn (gen_xmulxhi_v8plus (operands[0], operands[1], operands[2]));DONE;}})(define_insn "*xmulxhi_sp64"[(set (match_operand:DI 0 "register_operand" "=r")(truncate:DI(lshiftrt:TI(unspec:TI [(zero_extend:TI(match_operand:DI 1 "arith_operand" "%r"))(zero_extend:TI(match_operand:DI 2 "arith_operand" "rI"))]UNSPEC_XMUL)(const_int 64))))]"TARGET_VIS3 && TARGET_ARCH64""xmulxhi\t%1, %2, %0"[(set_attr "type" "imul")])(define_insn "xmulxhi_v8plus"[(set (match_operand:DI 0 "register_operand" "=r,h")(truncate:DI(lshiftrt:TI(unspec:TI [(zero_extend:TI(match_operand:DI 1 "arith_operand" "%r,0"))(zero_extend:TI(match_operand:DI 2 "arith_operand" "rI,rI"))]UNSPEC_XMUL)(const_int 64))))(clobber (match_scratch:SI 3 "=&h,X"))(clobber (match_scratch:SI 4 "=&h,X"))]"TARGET_VIS3 && !TARGET_ARCH64""* return output_v8plus_mult (insn, operands, \"xmulxhi\");"[(set_attr "type" "imul")(set_attr "length" "9,8")])(include "sync.md")