98 lines
2.9 KiB
Plaintext
98 lines
2.9 KiB
Plaintext
divert(-1)
|
|
|
|
dnl m4 macros for SPARC assembler (32 and 64 bit).
|
|
|
|
|
|
dnl Copyright 2002, 2011, 2013, 2017, 2021 Free Software Foundation, Inc.
|
|
|
|
dnl This file is part of the GNU MP Library.
|
|
dnl
|
|
dnl The GNU MP Library is free software; you can redistribute it and/or modify
|
|
dnl it under the terms of either:
|
|
dnl
|
|
dnl * the GNU Lesser General Public License as published by the Free
|
|
dnl Software Foundation; either version 3 of the License, or (at your
|
|
dnl option) any later version.
|
|
dnl
|
|
dnl or
|
|
dnl
|
|
dnl * the GNU General Public License as published by the Free Software
|
|
dnl Foundation; either version 2 of the License, or (at your option) any
|
|
dnl later version.
|
|
dnl
|
|
dnl or both in parallel, as here.
|
|
dnl
|
|
dnl The GNU MP Library is distributed in the hope that it will be useful, but
|
|
dnl WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|
|
dnl or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
dnl for more details.
|
|
dnl
|
|
dnl You should have received copies of the GNU General Public License and the
|
|
dnl GNU Lesser General Public License along with the GNU MP Library. If not,
|
|
dnl see https://www.gnu.org/licenses/.
|
|
|
|
|
|
changecom(;) dnl cannot use default # since that's used in REGISTER decls
|
|
|
|
|
|
dnl Usage: REGISTER(reg,attr)
|
|
dnl
|
|
dnl Give a ".register reg,attr" directive, if the assembler supports it.
|
|
dnl HAVE_REGISTER comes from the GMP_ASM_SPARC_REGISTER configure test.
|
|
|
|
define(REGISTER,
|
|
m4_assert_numargs(2)
|
|
m4_assert_defined(`HAVE_REGISTER')
|
|
`ifelse(HAVE_REGISTER,yes,
|
|
`.register `$1',`$2'')')
|
|
|
|
|
|
C Testing mechanism for running newer code on older processors
|
|
ifdef(`FAKE_T3',`
|
|
include_mpn(`sparc64/ultrasparct3/missing.m4')
|
|
',`
|
|
define(`addxccc', ``addxccc' $1, $2, $3')
|
|
define(`addxc', ``addxc' $1, $2, $3')
|
|
define(`umulxhi', ``umulxhi' $1, $2, $3')
|
|
define(`lzcnt', ``lzd' $1, $2')
|
|
')
|
|
|
|
dnl Usage: LEA64(symbol,reg,pic_reg)
|
|
dnl
|
|
dnl Use whatever 64-bit code sequence is appropriate to load "symbol" into
|
|
dnl register "reg", potentially using register "pic_reg" to perform the
|
|
dnl calculations.
|
|
dnl
|
|
dnl Caveat: We used to use the setx pseudo insn here, but some GNU/Linux
|
|
dnl releases causes invalid code or relocs for that.
|
|
dnl
|
|
dnl Optimisation 1: Use thunk call instead of RDPC which causes pipeline
|
|
dnl replay for some sparcs.
|
|
dnl
|
|
dnl Optimisation 2: Do the two symbol building sequences in parallel instead
|
|
dnl of one after the other. That might need one more scratch register.
|
|
|
|
define(LEA64,
|
|
m4_assert_numargs(3)
|
|
`ifdef(`PIC',`
|
|
rd %pc, %`$2'
|
|
sethi %hi(_GLOBAL_OFFSET_TABLE_+4), %`$3'
|
|
add %`$3', %lo(_GLOBAL_OFFSET_TABLE_+8), %`$3'
|
|
add %`$2', %`$3', %`$3'
|
|
ifelse(HAVE_GDOP,yes,`
|
|
sethi %gdop_hix22(`$1'), %`$2'
|
|
xor %`$2', %gdop_lox10(`$1'), %`$2'
|
|
ldx [%`$3' + %`$2'], %`$2', %gdop(`$1')
|
|
',`
|
|
sethi %hi(`$1'), %`$2'
|
|
or %`$2', %lo(`$1'), %`$2'
|
|
ldx [%`$3' + %`$2'], %`$2'
|
|
')',`
|
|
sethi %h44(`$1'), %`$2'
|
|
or %`$2', %m44(`$1'), %`$2'
|
|
sllx %`$2', 12, %`$2'
|
|
or %`$2', %l44(`$1'), %$2
|
|
')')
|
|
|
|
divert
|