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