version 1.1.1.1, 2000/09/09 14:12:38 |
version 1.1.1.2, 2003/08/25 16:06:24 |
|
|
divert(-1) |
divert(-1) |
dnl m4 macros for AIX 32-bit assembly. |
dnl m4 macros for AIX 32-bit assembly. |
|
|
dnl Copyright (C) 2000 Free Software Foundation, Inc. |
dnl Copyright 2000, 2001, 2002 Free Software Foundation, Inc. |
dnl |
dnl |
dnl This file is part of the GNU MP Library. |
dnl This file is part of the GNU MP Library. |
dnl |
dnl |
dnl The GNU MP Library is free software; you can redistribute it and/or |
dnl The GNU MP Library is free software; you can redistribute it and/or |
Line 22 dnl Suite 330, Boston, MA 02111-1307, USA. |
|
Line 22 dnl Suite 330, Boston, MA 02111-1307, USA. |
|
|
|
define(`ASM_START', |
define(`ASM_START', |
`.toc') |
`.toc') |
|
|
define(`PROLOGUE', |
dnl Called: PROLOGUE_cpu(GSYM_PREFIX`'foo) |
|
dnl EPILOGUE_cpu(GSYM_PREFIX`'foo) |
|
dnl |
|
dnl Don't want ELF style .size in the epilogue. |
|
|
|
define(`PROLOGUE_cpu', |
|
m4_assert_numargs(1) |
` |
` |
.globl $1 |
.globl $1 |
.globl .$1 |
.globl .$1 |
.csect $1[DS],2 |
.csect [DS],2 |
$1: |
$1: |
.long .$1, TOC[tc0], 0 |
.long .$1, TOC[tc0], 0 |
.csect .text[PR] |
.csect [PR] |
.align 2 |
.align 2 |
.$1:') |
.$1:') |
|
|
define(`EPILOGUE', `') |
define(`EPILOGUE_cpu', |
|
m4_assert_numargs(1) |
|
`') |
|
|
divert |
divert |