beta-0.89.2
[luatex.git] / source / libs / gmp / gmp-src / mpn / powerpc32 / eabi.m4
blobcd7633c6330ee34106eeb8b50cdb6208c68d5394
1 divert(-1)
2 dnl  m4 macros for powerpc32 eABI assembly.
4 dnl  Copyright 2003, 2005, 2006 Free Software Foundation, Inc.
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 modify
9 dnl  it under the terms of either:
10 dnl
11 dnl    * the GNU Lesser General Public License as published by the Free
12 dnl      Software Foundation; either version 3 of the License, or (at your
13 dnl      option) any later version.
14 dnl
15 dnl  or
16 dnl
17 dnl    * the GNU General Public License as published by the Free Software
18 dnl      Foundation; either version 2 of the License, or (at your option) any
19 dnl      later version.
20 dnl
21 dnl  or both in parallel, as here.
22 dnl
23 dnl  The GNU MP Library is distributed in the hope that it will be useful, but
24 dnl  WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
25 dnl  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
26 dnl  for more details.
27 dnl
28 dnl  You should have received copies of the GNU General Public License and the
29 dnl  GNU Lesser General Public License along with the GNU MP Library.  If not,
30 dnl  see https://www.gnu.org/licenses/.
32 define(`ASM_START',`')
34 dnl  Called: PROLOGUE_cpu(GSYM_PREFIX`'foo)
35 dnl          EPILOGUE_cpu(GSYM_PREFIX`'foo)
36 dnl
38 define(`PROLOGUE_cpu',
39 m4_assert_numargs(1)
40         `
41         .section        ".text"
42         .align  3
43         .globl  $1
44         .type   $1, @function
45 $1:')
47 define(`EPILOGUE_cpu',
48 m4_assert_numargs(1)
49 `       .size   $1, .-$1')
51 dnl  This ought to support PIC, but it is unclear how that is done for eABI
52 define(`LEA',
53 m4_assert_numargs(2)
55         lis     $1, $2@ha
56         la      $1, $2@l($1)
59 define(`EXTERN',
60 m4_assert_numargs(1)
61 `dnl')
63 define(`DEF_OBJECT',
64 m4_assert_numargs_range(1,2)
66         .section        .rodata
67         ALIGN(ifelse($#,1,2,$2))
68         .type   $1, @object
69 $1:
72 define(`END_OBJECT',
73 m4_assert_numargs(1)
74 `       .size   $1, .-$1')
76 define(`ASM_END', `dnl')
78 ifdef(`PIC',`
79 define(`PIC_SLOW')')
81 dnl  64-bit "long long" parameters are put in an even-odd pair, skipping an
82 dnl  even register if that was in turn.  I wish somebody could explain why that
83 dnl  is a good idea.
84 define(`BROKEN_LONGLONG_PARAM')
86 divert