complex_real.S 8.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322
  1. /*
  2. * Math library
  3. *
  4. * Copyright (C) 2016 Intel Corporation. All rights reserved.
  5. *
  6. * Redistribution and use in source and binary forms, with or without
  7. * modification, are permitted provided that the following conditions
  8. * are met:
  9. *
  10. * * Redistributions of source code must retain the above copyright
  11. * notice, this list of conditions and the following disclaimer.
  12. * * Redistributions in binary form must reproduce the above copyright
  13. * notice, this list of conditions and the following disclaimer in
  14. * the documentation and/or other materials provided with the
  15. * distribution.
  16. * * Neither the name of Intel Corporation nor the names of its
  17. * contributors may be used to endorse or promote products derived
  18. * from this software without specific prior written permission.
  19. *
  20. * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  21. * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  22. * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  23. * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  24. * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  25. * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  26. * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  27. * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  28. * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  29. * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  30. * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  31. *
  32. *
  33. * Author Name <jingwei.zhang@intel.com>
  34. * History:
  35. * 03-14-2016 Initial version. numerics svn rev. 12864
  36. */
  37. .file "complex_real.c"
  38. .text
  39. ..TXTST0:
  40. # -- Begin __libm_internal_isinf
  41. .text
  42. .align 16,0x90
  43. .globl __libm_internal_isinf
  44. __libm_internal_isinf:
  45. # parameter 1: %xmm0
  46. ..B1.1:
  47. .cfi_startproc
  48. ..___tag_value___libm_internal_isinf.1:
  49. ..L2:
  50. movsd %xmm0, -8(%rsp)
  51. movl -4(%rsp), %eax
  52. andl $2147483647, %eax
  53. cmpl $2146435072, %eax
  54. jne ..B1.4
  55. ..B1.2:
  56. cmpl $0, -8(%rsp)
  57. jne ..B1.4
  58. ..B1.3:
  59. movl $1, %eax
  60. ret
  61. ..B1.4:
  62. xorl %eax, %eax
  63. ret
  64. .align 16,0x90
  65. .cfi_endproc
  66. .type __libm_internal_isinf,@function
  67. .size __libm_internal_isinf,.-__libm_internal_isinf
  68. .data
  69. # -- End __libm_internal_isinf
  70. .text
  71. # -- Begin __libm_internal_ispinf
  72. .text
  73. .align 16,0x90
  74. .globl __libm_internal_ispinf
  75. __libm_internal_ispinf:
  76. # parameter 1: %xmm0
  77. ..B2.1:
  78. .cfi_startproc
  79. ..___tag_value___libm_internal_ispinf.4:
  80. ..L5:
  81. movsd %xmm0, -8(%rsp)
  82. cmpl $2146435072, -4(%rsp)
  83. jne ..B2.4
  84. ..B2.2:
  85. cmpl $0, -8(%rsp)
  86. jne ..B2.4
  87. ..B2.3:
  88. movl $1, %eax
  89. ret
  90. ..B2.4:
  91. xorl %eax, %eax
  92. ret
  93. .align 16,0x90
  94. .cfi_endproc
  95. .type __libm_internal_ispinf,@function
  96. .size __libm_internal_ispinf,.-__libm_internal_ispinf
  97. .data
  98. # -- End __libm_internal_ispinf
  99. .text
  100. # -- Begin __libm_internal_isninf
  101. .text
  102. .align 16,0x90
  103. .globl __libm_internal_isninf
  104. __libm_internal_isninf:
  105. # parameter 1: %xmm0
  106. ..B3.1:
  107. .cfi_startproc
  108. ..___tag_value___libm_internal_isninf.7:
  109. ..L8:
  110. movsd %xmm0, -8(%rsp)
  111. cmpl $-1048576, -4(%rsp)
  112. jne ..B3.4
  113. ..B3.2:
  114. cmpl $0, -8(%rsp)
  115. jne ..B3.4
  116. ..B3.3:
  117. movl $1, %eax
  118. ret
  119. ..B3.4:
  120. xorl %eax, %eax
  121. ret
  122. .align 16,0x90
  123. .cfi_endproc
  124. .type __libm_internal_isninf,@function
  125. .size __libm_internal_isninf,.-__libm_internal_isninf
  126. .data
  127. # -- End __libm_internal_isninf
  128. .text
  129. # -- Begin __libm_internal_isnan
  130. .text
  131. .align 16,0x90
  132. .globl __libm_internal_isnan
  133. __libm_internal_isnan:
  134. # parameter 1: %xmm0
  135. ..B4.1:
  136. .cfi_startproc
  137. ..___tag_value___libm_internal_isnan.10:
  138. ..L11:
  139. movsd %xmm0, -8(%rsp)
  140. movl -4(%rsp), %edx
  141. movl %edx, %eax
  142. andl $2146435072, %eax
  143. cmpl $2146435072, %eax
  144. jne ..B4.5
  145. ..B4.2:
  146. testl $1048575, %edx
  147. jne ..B4.4
  148. ..B4.3:
  149. cmpl $0, -8(%rsp)
  150. je ..B4.5
  151. ..B4.4:
  152. movl $1, %eax
  153. ret
  154. ..B4.5:
  155. xorl %eax, %eax
  156. ret
  157. .align 16,0x90
  158. .cfi_endproc
  159. .type __libm_internal_isnan,@function
  160. .size __libm_internal_isnan,.-__libm_internal_isnan
  161. .data
  162. # -- End __libm_internal_isnan
  163. .text
  164. # -- Begin __libm_internal_isposzero
  165. .text
  166. .align 16,0x90
  167. .globl __libm_internal_isposzero
  168. __libm_internal_isposzero:
  169. # parameter 1: %xmm0
  170. ..B5.1:
  171. .cfi_startproc
  172. ..___tag_value___libm_internal_isposzero.13:
  173. ..L14:
  174. movsd %xmm0, -8(%rsp)
  175. cmpl $0, -4(%rsp)
  176. jne ..B5.4
  177. ..B5.2:
  178. cmpl $0, -8(%rsp)
  179. jne ..B5.4
  180. ..B5.3:
  181. movl $1, %eax
  182. ret
  183. ..B5.4:
  184. xorl %eax, %eax
  185. ret
  186. .align 16,0x90
  187. .cfi_endproc
  188. .type __libm_internal_isposzero,@function
  189. .size __libm_internal_isposzero,.-__libm_internal_isposzero
  190. .data
  191. # -- End __libm_internal_isposzero
  192. .text
  193. # -- Begin __libm_internal_iszero
  194. .text
  195. .align 16,0x90
  196. .globl __libm_internal_iszero
  197. __libm_internal_iszero:
  198. # parameter 1: %xmm0
  199. ..B6.1:
  200. .cfi_startproc
  201. ..___tag_value___libm_internal_iszero.16:
  202. ..L17:
  203. movsd %xmm0, -8(%rsp)
  204. testl $2147483647, -4(%rsp)
  205. jne ..B6.4
  206. ..B6.2:
  207. cmpl $0, -8(%rsp)
  208. jne ..B6.4
  209. ..B6.3:
  210. movl $1, %eax
  211. ret
  212. ..B6.4:
  213. xorl %eax, %eax
  214. ret
  215. .align 16,0x90
  216. .cfi_endproc
  217. .type __libm_internal_iszero,@function
  218. .size __libm_internal_iszero,.-__libm_internal_iszero
  219. .data
  220. # -- End __libm_internal_iszero
  221. .text
  222. # -- Begin __libm_internal_isnegzero
  223. .text
  224. .align 16,0x90
  225. .globl __libm_internal_isnegzero
  226. __libm_internal_isnegzero:
  227. # parameter 1: %xmm0
  228. ..B7.1:
  229. .cfi_startproc
  230. ..___tag_value___libm_internal_isnegzero.19:
  231. ..L20:
  232. movsd %xmm0, -8(%rsp)
  233. cmpl $-2147483648, -4(%rsp)
  234. jne ..B7.4
  235. ..B7.2:
  236. cmpl $0, -8(%rsp)
  237. jne ..B7.4
  238. ..B7.3:
  239. movl $1, %eax
  240. ret
  241. ..B7.4:
  242. xorl %eax, %eax
  243. ret
  244. .align 16,0x90
  245. .cfi_endproc
  246. .type __libm_internal_isnegzero,@function
  247. .size __libm_internal_isnegzero,.-__libm_internal_isnegzero
  248. .data
  249. # -- End __libm_internal_isnegzero
  250. .text
  251. # -- Begin __libm_internal_isnzfinite
  252. .text
  253. .align 16,0x90
  254. .globl __libm_internal_isnzfinite
  255. __libm_internal_isnzfinite:
  256. # parameter 1: %xmm0
  257. ..B8.1:
  258. .cfi_startproc
  259. ..___tag_value___libm_internal_isnzfinite.22:
  260. ..L23:
  261. movsd %xmm0, -8(%rsp)
  262. movl -4(%rsp), %edx
  263. movl %edx, %eax
  264. andl $2146435072, %eax
  265. cmpl $2146435072, %eax
  266. jae ..B8.4
  267. ..B8.2:
  268. andl $2147483647, %edx
  269. orl -8(%rsp), %edx
  270. je ..B8.4
  271. ..B8.3:
  272. movl $1, %eax
  273. ret
  274. ..B8.4:
  275. xorl %eax, %eax
  276. ret
  277. .align 16,0x90
  278. .cfi_endproc
  279. .type __libm_internal_isnzfinite,@function
  280. .size __libm_internal_isnzfinite,.-__libm_internal_isnzfinite
  281. .data
  282. # -- End __libm_internal_isnzfinite
  283. .text
  284. # -- Begin __libm_internal_isfinite
  285. .text
  286. .align 16,0x90
  287. .globl __libm_internal_isfinite
  288. __libm_internal_isfinite:
  289. # parameter 1: %xmm0
  290. ..B9.1:
  291. .cfi_startproc
  292. ..___tag_value___libm_internal_isfinite.25:
  293. ..L26:
  294. xorl %eax, %eax
  295. movsd %xmm0, -8(%rsp)
  296. movl -4(%rsp), %edx
  297. andl $2146435072, %edx
  298. cmpl $2146435072, %edx
  299. setb %al
  300. ret
  301. .align 16,0x90
  302. .cfi_endproc
  303. .type __libm_internal_isfinite,@function
  304. .size __libm_internal_isfinite,.-__libm_internal_isfinite
  305. .data
  306. # -- End __libm_internal_isfinite
  307. .data
  308. .section .note.GNU-stack, ""
  309. // -- Begin DWARF2 SEGMENT .eh_frame
  310. .section .eh_frame,"a",@progbits
  311. .eh_frame_seg:
  312. .align 1
  313. # End