开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > VxWorks > 查看源码
hyp32.s
资源名称：vxwork_src.rar　[点击查看]
上传用户：nvosite88
上传日期：2007-01-17
资源大小：4983k
文件大小：7k
源码类别：

VxWorks

开发平台：

C/C++

hyp32.s：源码内容
  1. /* hyp32.s - VxWorks conversion from Microtek tools to Sun native */
  3. /* Copyright 1984-1992 Wind River Systems, Inc. */
  5. /*
  6. modification history
  7. --------------------
  8. 01a,06aug92,jwt  converted.
  9. */
  11. /*
  12. ! ! ! ! !
  13. ! SPARClite Floating Point Library
  14. !
  15. ! Copyright (C) 1992 By
  16. ! United States Software Corporation
  17. ! 14215 N.W. Science Park Drive
  18. ! Portland, Oregon 97229
  19. !
  20. ! This software is furnished under a license and may be used
  21. ! and copied only in accordance with the terms of such license
  22. ! and with the inclusion of the above copyright notice.
  23. ! This software or any other copies thereof may not be provided
  24. ! or otherwise made available to any other person.  No title to
  25. ! and ownership of the software is hereby transferred.
  26. !
  27. ! The information in this software is subject to change without 
  28. ! notice and should not be construed as a commitment by United
  29. ! States Software Corporation.
  30. !
  31. ! First Release: V1.02 March 26 1992
  32. ! ! ! ! !
  34. .macro scan,p1,p2,p3
  35. .word 0x81602000 | (&p3<<25) | (&p1<<14) | p2
  36. .endm
  37. .macro umul,p1,p2,p3
  38. .word 0x80500000 | (&p3<<25) | (&p1<<14) | &p2
  39. .endm
  40. .macro divscc,p1,p2,p3
  41. .word 0x80e80000 | (&p3<<25) | (&p1<<14) | &p2
  42. .endm
  43. */
  45. #include "arch/sparc/ussSun4.h"
  47. .global _exadd
  48. .global _exsub
  49. .global _exmul
  50. .global _exdiv
  51. .global _exexp
  52. .global _sigmax
  54. .data
  55. .align 4
  57. sihcon: .word 0x654b,0x0
  58. .word 0x6b9fd0,0x0
  59. .word 0x5849184f,0x0
  60. .word 0xcc8acfeb,0x35
  61. .word 0xe3a556c7,0x171d
  62. .word 0x6806807,0x68068
  63. .word 0x11111111,0x1111111
  64. .word 0x55555555,0x15555555
  65. .word 0x0,0x80000000
  66. tahcon: .word 0xfeb68270,0xffffffff
  67. .word 0xcb3f0f8,0x0
  68. .word 0x82a09a5d,0xffffffff
  69. .word 0xd561c759,0x4
  70. .word 0x4b63c10d,0xffffffd0
  71. .word 0xdb2c4e09,0x1d6
  72. .word 0xfa29bbda,0xffffedd7
  73. .word 0x795fb876,0xb354
  74. .word 0x1b32c43d,0xfff910a2
  75. .word 0xf004559b,0x4559aa
  76. .word 0x27d27d28,0xfd27d27d
  77. .word 0xaaaaaaab,0x2aaaaaaa
  78. .word 0x0,0x80000000
  80. .text
  81. .align 4
  83. .global _dpcosh
  84. _dpcosh:
  85. .global _cosh
  86. _cosh:
  87. save %sp,-96,%sp
  89. sll     %i0,1,%i4
  90. srl     %i4,21,%i4
  91. sll     %i0,11,%i2
  92. srl     %i1,21,%l2
  93. or      %i2,%l2,%i2
  94. sll     %i1,11,%i3
  95. sethi   %hi(0x80000000),%l2
  96. or      %i2,%l2,%i2
  97. subcc   %i4,0x7ff,%g0
  98. be      Aspec          
  100. or      %g0,%i2,%o0
  101. or      %g0,%i3,%o1
  102. or      %g0,%i4,%o2
  103. call    _exexp
  104. or      %g0,0,%o3
  105. or      %g0,%o0,%i2
  106. or      %g0,%o1,%i3
  107. or      %g0,%o2,%i4
  109. sethi   %hi(0x80000000),%o0
  110. or      %g0,0,%o1
  111. or      %g0,0x3ff,%o2
  112. or      %g0,%i2,%o3
  113. or      %g0,%i3,%o4
  114. call    _exdiv
  115. or      %g0,%i4,%o5
  116. or      %g0,%o0,%i5
  117. or      %g0,%o1,%l0
  118. or      %g0,%o2,%l1
  120. or      %g0,%i2,%o0
  121. or      %g0,%i3,%o1
  122. or      %g0,%i4,%o2
  123. or      %g0,%i5,%o3
  124. or      %g0,%l0,%o4
  125. call    _exadd
  126. or      %g0,%l1,%o5
  127. or      %g0,%o0,%i2
  128. or      %g0,%o1,%i3
  129. or      %g0,%o2,%i4
  131. sub     %i4,1,%i4
  132. subcc   %i4,0x7ff,%g0
  133. bcc     Ainf     
  134. NOP
  135. srl     %i3,11,%i1
  136. sll     %i2,21,%l2
  137. or      %i1,%l2,%i1
  138. srl     %i2,11,%i0
  139. sethi   %hi(0xfffff),%l2
  140. or      %l2,0x3ff,%l2
  141. and     %i0,%l2,%i0
  142. sll     %i4,20,%l2
  143. or      %i0,%l2,%i0
  145. Aret:
  146. A999: jmpl %i7+8,%g0
  147. restore %g0,0,%g0
  149. Aspec: add     %i2,%i2,%l2
  150. orcc    %l2,%i3,%l2
  151. be      Ainf     
  152. NOP
  153. or      %g0,0,%i1
  154. ba      Aret     
  155. sethi   %hi(0xfff80000),%i0
  157. Ainf: or      %g0,0,%i1
  158. ba      Aret     
  159. sethi   %hi(0x7ff00000),%i0
  161. .global _dpsinh
  162. _dpsinh:
  163. .global _sinh
  164. _sinh:
  165. save %sp,-96,%sp
  167. sll     %i0,1,%i4
  168. srl     %i4,21,%i4
  169. sll     %i0,11,%i2
  170. srl     %i1,21,%l3
  171. or      %i2,%l3,%i2
  172. sll     %i1,11,%i3
  173. sethi   %hi(0x80000000),%l2
  174. or      %i2,%l2,%i2
  175. and     %l2,%i0,%l2
  176. subcc   %i4,0x7ff,%g0
  177. be      Bspec          
  178. subcc   %i4,0x3fe,%g0
  179. bcc     i2             
  181. or      %g0,%i2,%o0
  182. or      %g0,%i3,%o1
  183. or      %g0,%i4,%o2
  184. or      %g0,%i2,%o3
  185. or      %g0,%i3,%o4
  186. call    _exmul
  187. or      %g0,%i4,%o5
  189. or      %g0,0,%o3
  190. sethi   %hi(sihcon),%o4
  191. call    _sigmax
  192. or %o4,%lo(sihcon),%o4
  193. or      %g0,%o0,%i5
  194. or      %g0,%o1,%l0
  195. or      %g0,%o2,%l1
  197. or      %g0,%i2,%o3
  198. or      %g0,%i3,%o4
  199. call    _exmul
  200. or      %g0,%i4,%o5
  201. or      %g0,%o0,%i2
  202. or      %g0,%o1,%i3
  203. ba      e2       
  204. or      %g0,%o2,%i4
  206. i2: or      %g0,%i2,%o0
  207. or      %g0,%i3,%o1
  208. or      %g0,%i4,%o2
  209. call    _exexp
  210. or      %g0,0,%o3
  211. or      %g0,%o0,%i2
  212. or      %g0,%o1,%i3
  213. or      %g0,%o2,%i4
  215. sethi   %hi(0x80000000),%o0
  216. or      %g0,0,%o1
  217. or      %g0,0x3ff,%o2
  218. or      %g0,%i2,%o3
  219. or      %g0,%i3,%o4
  220. call    _exdiv
  221. or      %g0,%i4,%o5
  222. or      %g0,%o0,%i5
  223. or      %g0,%o1,%l0
  224. or      %g0,%o2,%l1
  226. or      %g0,%i2,%o0
  227. or      %g0,%i3,%o1
  228. or      %g0,%i4,%o2
  229. or      %g0,%i5,%o3
  230. or      %g0,%l0,%o4
  231. call    _exsub
  232. or      %g0,%l1,%o5
  233. or      %g0,%o0,%i2
  234. or      %g0,%o1,%i3
  235. or      %g0,%o2,%i4
  237. sub     %i4,1,%i4
  238. subcc   %i4,0x7ff,%g0
  239. bcc     Bovr     
  240. NOP
  241. e2: srl     %i3,11,%i1
  242. sll     %i2,21,%l3
  243. or      %i1,%l3,%i1
  244. srl     %i2,11,%i0
  245. sethi   %hi(0xfffff),%l3
  246. or      %l3,0x3ff,%l3
  247. and     %i0,%l3,%i0
  248. sll     %i4,20,%l3
  249. or      %i0,%l3,%i0
  251. Bret: or      %i0,%l2,%i0
  253. B999: jmpl %i7+8,%g0
  254. restore %g0,0,%g0
  256. Bspec: sll     %i2,1,%l3
  257. orcc    %l3,%i3,%l3
  258. be      Bret     
  259. NOP
  260. or      %g0,0,%i1
  261. ba      Bret     
  262. sethi   %hi(0xfff80000),%i0
  264. Bovr: or      %g0,0,%i1
  265. ba      Bret     
  266. sethi   %hi(0x7ff00000),%i0
  268. .global _dptanh
  269. _dptanh:
  270. .global _tanh
  271. _tanh:
  272. save %sp,-96,%sp
  274. sll     %i0,1,%i4
  275. srl     %i4,21,%i4
  276. sll     %i0,11,%i2
  277. srl     %i1,21,%l6
  278. or      %i2,%l6,%i2
  279. sll     %i1,11,%i3
  280. sethi   %hi(0x80000000),%l5
  281. or      %i2,%l5,%i2
  282. and     %l5,%i0,%l5
  283. sub     %i4,1,%l6
  284. subcc   %l6,0x7fe,%g0
  285. bcc     Cspec          
  286. subcc   %i4,0x3fe,%g0
  287. bcc     i4             
  289. or      %g0,%i2,%o0
  290. or      %g0,%i3,%o1
  291. or      %g0,%i4,%o2
  292. or      %g0,%i2,%o3
  293. or      %g0,%i3,%o4
  294. call    _exmul
  295. or      %g0,%i4,%o5
  296. or      %g0,%o0,%l2
  297. or      %g0,%o1,%l3
  298. or      %g0,%o2,%l4
  300. or      %g0,0,%o3
  301. sethi   %hi(tahcon),%o4
  302. call    _sigmax
  303. or %o4,%lo(tahcon),%o4
  304. or      %g0,%o0,%i5
  305. or      %g0,%o1,%l0
  306. ba      e4       
  307. or      %g0,%o2,%l1
  309. i4: or      %g0,%i2,%o0
  310. or      %g0,%i3,%o1
  311. or      %g0,%i4,%o2
  312. call    _exexp
  313. or      %g0,0,%o3
  314. or      %g0,%o0,%i5
  315. or      %g0,%o1,%l0
  316. or      %g0,%o2,%l1
  318. sethi   %hi(0x80000000),%o0
  319. or      %g0,0,%o1
  320. or      %g0,0x3ff,%o2
  321. or      %g0,%i5,%o3
  322. or      %g0,%l0,%o4
  323. call    _exdiv
  324. or      %g0,%l1,%o5
  325. or      %g0,%o0,%l2
  326. or      %g0,%o1,%l3
  327. or      %g0,%o2,%l4
  329. or      %g0,%i5,%o0
  330. or      %g0,%l0,%o1
  331. or      %g0,%l1,%o2
  332. or      %g0,%l2,%o3
  333. or      %g0,%l3,%o4
  334. call    _exsub
  335. or      %g0,%l4,%o5
  336. or      %g0,%o0,%i2
  337. or      %g0,%o1,%i3
  338. or      %g0,%o2,%i4
  340. or      %g0,%i5,%o0
  341. or      %g0,%l0,%o1
  342. or      %g0,%l1,%o2
  343. or      %g0,%l2,%o3
  344. or      %g0,%l3,%o4
  345. call    _exadd
  346. or      %g0,%l4,%o5
  347. or      %g0,%o0,%i5
  348. or      %g0,%o1,%l0
  349. or      %g0,%o2,%l1
  351. e4: or      %g0,%i2,%o0
  352. or      %g0,%i3,%o1
  353. or      %g0,%i4,%o2
  354. or      %g0,%i5,%o3
  355. or      %g0,%l0,%o4
  356. call    _exdiv
  357. or      %g0,%l1,%o5
  358. or      %g0,%o0,%i2
  359. or      %g0,%o1,%i3
  360. or      %g0,%o2,%i4
  362. srl     %i3,11,%i1
  363. sll     %i2,21,%l6
  364. or      %i1,%l6,%i1
  365. srl     %i2,11,%i0
  366. sethi   %hi(0xfffff),%l6
  367. or      %l6,0x3ff,%l6
  368. and     %i0,%l6,%i0
  369. sll     %i4,20,%l6
  370. or      %i0,%l6,%i0
  372. Cret: or      %i0,%l5,%i0
  374. C999: jmpl %i7+8,%g0
  375. restore %g0,0,%g0
  377. Cspec: subcc   %i4,0,%i4
  378. be      Cret     
  379. NOP
  380. sethi   %hi(0x3ff00000),%i0
  381. sll     %i2,1,%l6
  382. orcc    %l6,%i3,%l6
  383. be      Cret     
  384. NOP
  385. or      %g0,0,%i1
  386. ba      Cret     
  387. sethi   %hi(0xfff80000),%i0
  389. ! .end