1divert(-1) 2dnl m4 macros for AIX 64-bit assembly. 3 4dnl Copyright 2000, 2001, 2002, 2005, 2006 Free Software Foundation, Inc. 5dnl 6dnl This file is part of the GNU MP Library. 7dnl 8dnl The GNU MP Library is free software; you can redistribute it and/or 9dnl modify it under the terms of the GNU Lesser General Public License as 10dnl published by the Free Software Foundation; either version 3 of the 11dnl License, or (at your option) any later version. 12dnl 13dnl The GNU MP Library is distributed in the hope that it will be useful, 14dnl but WITHOUT ANY WARRANTY; without even the implied warranty of 15dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 16dnl Lesser General Public License for more details. 17dnl 18dnl You should have received a copy of the GNU Lesser General Public License 19dnl along with the GNU MP Library. If not, see http://www.gnu.org/licenses/. 20 21define(`ASM_START', 22 `.machine "ppc64" 23 .toc') 24 25dnl Called: PROLOGUE_cpu(GSYM_PREFIX`'foo) 26dnl EPILOGUE_cpu(GSYM_PREFIX`'foo) 27dnl 28dnl Don't want ELF style .size in the epilogue. 29 30define(`PROLOGUE_cpu', 31m4_assert_numargs(1) 32 ` 33 .globl $1 34 .globl .$1 35 .csect [DS], 3 36$1: 37 .llong .$1, TOC[tc0], 0 38 .csect [PR] 39 .align 4 40.$1:') 41 42define(`EPILOGUE_cpu', 43m4_assert_numargs(1) 44`') 45 46define(`TOC_ENTRY', `') 47 48define(`LEA', 49m4_assert_numargs(2) 50`define(`TOC_ENTRY', 51` .toc 52..$2: .tc $2[TC], $2')' 53 `ld $1, ..$2(2)') 54 55define(`LEAL', 56m4_assert_numargs(2) 57`LEA($1,$2)') 58 59 60define(`EXTERN', 61m4_assert_numargs(1) 62` .globl $1') 63 64define(`EXTERN_FUNC', 65m4_assert_numargs(1) 66` .globl .$1') 67 68define(`DEF_OBJECT', 69m4_assert_numargs_range(1,2) 70` .csect [RO], 3 71 ALIGN(ifelse($#,1,2,$2)) 72$1: 73') 74 75define(`END_OBJECT', 76m4_assert_numargs(1)) 77 78define(`CALL', 79 `bl .$1 80 nop') 81 82define(`ASM_END', `TOC_ENTRY') 83 84divert 85