powerpc-defs.m4
上传用户:qaz666999
上传日期:2022-08-06
资源大小:2570k
文件大小:3k
源码类别:

数学计算

开发平台:

Unix_Linux

  1. divert(-1)
  2. dnl  m4 macros for PowerPC assembler (32 and 64 bit).
  3. dnl  Copyright 2000, 2002, 2003 Free Software Foundation, Inc.
  4. dnl
  5. dnl  This file is part of the GNU MP Library.
  6. dnl
  7. dnl  The GNU MP Library is free software; you can redistribute it and/or
  8. dnl  modify it under the terms of the GNU Lesser General Public License as
  9. dnl  published by the Free Software Foundation; either version 3 of the
  10. dnl  License, or (at your option) any later version.
  11. dnl
  12. dnl  The GNU MP Library is distributed in the hope that it will be useful,
  13. dnl  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. dnl  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15. dnl  Lesser General Public License for more details.
  16. dnl
  17. dnl  You should have received a copy of the GNU Lesser General Public License
  18. dnl  along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.
  19. dnl  Called: PROLOGUE_cpu(GSYM_PREFIX`'foo)
  20. dnl
  21. dnl  This is the same as the default in mpn/asm-defs.m4, but with ALIGN(4)
  22. dnl  not 8.
  23. dnl
  24. dnl  4-byte alignment is normally enough, certainly it's what gcc gives.  We
  25. dnl  don't want bigger alignment within PROLOGUE since it can introduce
  26. dnl  padding into multiple-entrypoint routines, and with gas such padding is
  27. dnl  zero words, which are not valid instructions.
  28. define(`PROLOGUE_cpu',
  29. m4_assert_numargs(1)
  30. ` TEXT
  31. ALIGN(4)
  32. GLOBL `$1' GLOBL_ATTR
  33. TYPE(`$1',`function')
  34. `$1'LABEL_SUFFIX')
  35. dnl  Usage: r0 ... r31, cr0 ... cr7
  36. dnl
  37. dnl  Registers names, either left as "r0" etc or mapped to plain 0 etc,
  38. dnl  according to the result of the GMP_ASM_POWERPC_REGISTERS configure
  39. dnl  test.
  40. ifelse(WANT_R_REGISTERS,no,`
  41. forloop(i,0,31,`deflit(`r'i,i)')
  42. forloop(i,0,31,`deflit(`v'i,i)')
  43. forloop(i,0,31,`deflit(`f'i,i)')
  44. forloop(i,0,7, `deflit(`cr'i,i)')
  45. ')
  46. dnl  Usage: ASSERT(cond,instructions)
  47. dnl
  48. dnl  If WANT_ASSERT is 1, output the given instructions and expect the given
  49. dnl  flags condition to then be satisfied.  For example,
  50. dnl
  51. dnl         ASSERT(eq, `cmpwi r6, 123')
  52. dnl
  53. dnl  The instructions can be omitted to just assert a flags condition with
  54. dnl  no extra calculation.  For example,
  55. dnl
  56. dnl         ASSERT(ne)
  57. dnl
  58. dnl  The condition can be omitted to just output the given instructions when
  59. dnl  assertion checking is wanted.  For example,
  60. dnl
  61. dnl         ASSERT(, `mr r11, r0')
  62. dnl
  63. dnl  Using a zero word for an illegal instruction is probably not ideal,
  64. dnl  since it marks the beginning of a traceback table in the 64-bit ABI.
  65. dnl  But assertions are only for development, so it doesn't matter too much.
  66. define(ASSERT,
  67. m4_assert_numargs_range(1,2)
  68. m4_assert_defined(`WANT_ASSERT')
  69. `ifelse(WANT_ASSERT,1,
  70. `C ASSERT
  71. $2
  72. ifelse(`$1',,,
  73. ` b$1 L(ASSERT_ok`'ASSERT_counter)
  74. W32 0 C assertion failed
  75. L(ASSERT_ok`'ASSERT_counter):
  76. define(`ASSERT_counter',incr(ASSERT_counter))
  77. ')')')
  78. define(ASSERT_counter,1)
  79. divert