📄 trig32.s
字号:
/* trig32.s - VxWorks conversion from Microtek tools to Sun native *//* Copyright 1984-1992 Wind River Systems, Inc. *//*modification history--------------------01a,06aug92,jwt converted.*//*! ! ! ! !! SPARClite Floating Point Library!! Copyright (C) 1992 By! United States Software Corporation! 14215 N.W. Science Park Drive! Portland, Oregon 97229!! This software is furnished under a license and may be used! and copied only in accordance with the terms of such license! and with the inclusion of the above copyright notice.! This software or any other copies thereof may not be provided! or otherwise made available to any other person. No title to! and ownership of the software is hereby transferred.!! The information in this software is subject to change without ! notice and should not be construed as a commitment by United! States Software Corporation.!! First Release: V1.02 March 26 1992! ! ! ! ! .macro scan,p1,p2,p3 .word 0x81602000 | (&p3<<25) | (&p1<<14) | p2 .endm .macro umul,p1,p2,p3 .word 0x80500000 | (&p3<<25) | (&p1<<14) | &p2 .endm .macro divscc,p1,p2,p3 .word 0x80e80000 | (&p3<<25) | (&p1<<14) | &p2 .endm*/#include "arch/sparc/ussSun4.h" .global _exmul .global _exdiv .global _sigmax .data .align 4sincon: .word 0xff946030,0xffffffff .word 0x5849184f,0x0 .word 0x33753015,0xffffffca .word 0xe3a556c7,0x171d .word 0xf97f97f9,0xfff97f97 .word 0x11111111,0x1111111 .word 0xaaaaaaab,0xeaaaaaaa .word 0x0,0x80000000coscon: .word 0x6b9fd,0x0 .word 0xf9b1a2d6,0xffffffff .word 0x7bb63bfe,0x4 .word 0x360910ec,0xfffffdb0 .word 0xd00d01,0xd00d .word 0xd27d27d2,0xffd27d27 .word 0x55555555,0x5555555 .word 0x0,0xc0000000 .word 0x0,0x80000000tancon: .word 0xffde9d9a,0xffffffff .word 0xfeb68270,0xffffffff .word 0xf34c0f08,0xffffffff .word 0x82a09a5d,0xffffffff .word 0x2a9e38a7,0xfffffffb .word 0x4b63c10d,0xffffffd0 .word 0x24d3b1f7,0xfffffe29 .word 0xfa29bbda,0xffffedd7 .word 0x86a0478a,0xffff4cab .word 0x1b32c43d,0xfff910a2 .word 0xffbaa65,0xffbaa655 .word 0x27d27d28,0xfd27d27d .word 0x55555555,0xd5555555 .word 0x0,0x80000000 .text .align 4 .global _reduct_reduct: save %sp,-96,%sp sll %i0,1,%i4 srl %i4,21,%i4 sll %i0,11,%i2 srl %i1,21,%l5 or %i2,%l5,%i2 sll %i1,11,%i3 sethi %hi(0x80000000),%l5 or %i2,%l5,%i2 subcc %i4,0x3fe,%i5 bneg Aret2 subcc %i5,0x40,%g0 bg Anan NOP srl %i3,1,%i3 sll %i2,31,%l5 srl %i2,1,%i2 or %i3,%l5,%i3 sethi %hi(0x60000000),%l4 sethi %hi(0x10b4611a),%l3 or %l3,0x11a,%l3 sethi %hi(0x6487ed51),%l2 or %l2,0x151,%l2 or %g0,-1,%l0 or %g0,0,%l1Alab3: subcc %l1,%l4,%l1 subxcc %i3,%l3,%i3 subxcc %i2,%l2,%i2 bcc i1 NOP addcc %l1,%l4,%l1 addxcc %i3,%l3,%i3 addxcc %i2,%l2,%i2i1: addx %l0,%l0,%l0 addcc %l1,%l1,%l1 addxcc %i3,%i3,%i3 addx %i2,%i2,%i2 subcc %i5,0,%i5 bne Alab3 sub %i5,1,%i5 xor %l0,-1,%l0 andcc %l0,1,%l5 be i2 NOP or %g0,%l1,%i5 sll %l4,1,%l1 subcc %l1,%i5,%l1 or %g0,%i3,%i5 sll %l3,1,%i3 subxcc %i3,%i5,%i3 or %g0,%i2,%i5 sll %l2,1,%i2 subx %i2,%i5,%i2i2: or %g0,0x3fe,%i4b3: subcc %i2,0,%i2 bneg Aret NOP addcc %l1,%l1,%l1 addxcc %i3,%i3,%i3 addx %i2,%i2,%i2 ba b3 sub %i4,1,%i4Aret: sll %l0,29,%l5 or %i4,%l5,%i4Aret2: or %g0,%i2,%i0 or %g0,%i3,%i1 or %g0,%i4,%i2A999: jmpl %i7+8,%g0 restore %g0,0,%g0Anan: or %g0,-1,%i4 sethi %hi(0xc0000000),%i2 ba Aret2 or %g0,0,%i3 .global _dpsin_dpsin: .global _sin_sin: save %sp,-96,%sp sethi %hi(0x80000000),%l4 and %l4,%i0,%i2 or %g0,%i0,%o0 call _reduct or %g0,%i1,%o1 or %g0,%o0,%i4 or %g0,%o1,%i5 or %g0,%o2,%l0 subcc %l0,-1,%g0 be Bret NOP srl %l0,29,%i3 sll %l0,3,%l0 srl %l0,3,%l0 andcc %i3,4,%l4 be i4 NOP sub %i3,4,%i3 sethi %hi(0x80000000),%l4 xor %i2,%l4,%i2i4: sub %i3,1,%l4 subcc %l4,2,%g0 bcc i5 or %g0,%i4,%o0 or %g0,%i5,%o1 or %g0,%l0,%o2 or %g0,%i4,%o3 or %g0,%i5,%o4 call _exmul or %g0,%l0,%o5 or %g0,0,%o3 sethi %hi(coscon),%o4 call _sigmax or %o4,%lo(coscon),%o4 or %g0,%o0,%i4 or %g0,%o1,%i5 ba Bret or %g0,%o2,%l0i5: or %g0,%i4,%l1 or %g0,%i5,%l2 or %g0,%l0,%l3 or %g0,%i4,%o0 or %g0,%i5,%o1 or %g0,%l0,%o2 or %g0,%i4,%o3 or %g0,%i5,%o4 call _exmul or %g0,%l0,%o5 or %g0,0,%o3 sethi %hi(sincon),%o4 call _sigmax or %o4,%lo(sincon),%o4 or %g0,%l1,%o3 or %g0,%l2,%o4 call _exmul or %g0,%l3,%o5 or %g0,%o0,%i4 or %g0,%o1,%i5 or %g0,%o2,%l0Bret: srl %i5,11,%i1 sll %i4,21,%l4 or %i1,%l4,%i1 srl %i4,11,%i0 sethi %hi(0xfffff),%l4 or %l4,0x3ff,%l4 and %i0,%l4,%i0 sll %l0,20,%l4 or %i0,%l4,%i0 or %i0,%i2,%i0B999: jmpl %i7+8,%g0 restore %g0,0,%g0 .global _dpcos_dpcos: .global _cos_cos: save %sp,-96,%sp or %g0,0,%i2 or %g0,%i0,%o0 call _reduct or %g0,%i1,%o1 or %g0,%o0,%i4 or %g0,%o1,%i5 or %g0,%o2,%l0 subcc %l0,-1,%g0 be Cret NOP srl %l0,29,%i3 sll %l0,3,%l0 srl %l0,3,%l0 andcc %i3,4,%l4 be i6 NOP sub %i3,4,%i3 sethi %hi(0x80000000),%l4 xor %i2,%l4,%i2i6: andcc %i3,2,%l4 be i7 NOP sethi %hi(0x80000000),%l4 xor %i2,%l4,%i2i7: sub %i3,1,%l4 subcc %l4,2,%g0 bcc i8 NOP or %g0,%i4,%l1 or %g0,%i5,%l2 or %g0,%l0,%l3 or %g0,%i4,%o0 or %g0,%i5,%o1 or %g0,%l0,%o2 or %g0,%i4,%o3 or %g0,%i5,%o4 call _exmul or %g0,%l0,%o5 or %g0,0,%o3 sethi %hi(sincon),%o4 call _sigmax or %o4,%lo(sincon),%o4 or %g0,%l1,%o3 or %g0,%l2,%o4 call _exmul or %g0,%l3,%o5 or %g0,%o0,%i4 or %g0,%o1,%i5 ba Cret or %g0,%o2,%l0i8: or %g0,%i4,%o0 or %g0,%i5,%o1 or %g0,%l0,%o2 or %g0,%i4,%o3 or %g0,%i5,%o4 call _exmul or %g0,%l0,%o5 or %g0,0,%o3 sethi %hi(coscon),%o4 call _sigmax or %o4,%lo(coscon),%o4 or %g0,%o0,%i4 or %g0,%o1,%i5 or %g0,%o2,%l0Cret: srl %i5,11,%i1 sll %i4,21,%l4 or %i1,%l4,%i1 srl %i4,11,%i0 sethi %hi(0xfffff),%l4 or %l4,0x3ff,%l4 and %i0,%l4,%i0 sll %l0,20,%l4 or %i0,%l4,%i0 or %i0,%i2,%i0C999: jmpl %i7+8,%g0 restore %g0,0,%g0 .global _dptan_dptan: .global _tan_tan: save %sp,-96,%sp sethi %hi(0x80000000),%l5 and %l5,%i0,%i2 or %g0,%i0,%o0 call _reduct or %g0,%i1,%o1 or %g0,%o0,%i5 or %g0,%o1,%l0 or %g0,%o2,%l1 subcc %l1,-1,%g0 be Dret NOP srl %l1,29,%i4 sll %l1,3,%l1 srl %l1,3,%l1 and %i4,0xfffffffb,%i4 andcc %i4,2,%l5 be i9 NOP sethi %hi(0x80000000),%l5 xor %i2,%l5,%i2i9: or %g0,%i5,%o0 or %g0,%l0,%o1 or %g0,%l1,%o2 or %g0,%i5,%o3 or %g0,%l0,%o4 call _exmul or %g0,%l1,%o5 or %g0,0,%o3 sethi %hi(tancon),%o4 call _sigmax or %o4,%lo(tancon),%o4 or %g0,%o0,%l2 or %g0,%o1,%l3 or %g0,%o2,%l4 sub %i4,1,%l5 subcc %l5,2,%g0 bcc i10 or %g0,%l2,%o0 or %g0,%l3,%o1 or %g0,%l4,%o2 or %g0,%i5,%o3 or %g0,%l0,%o4 call _exdiv or %g0,%l1,%o5 or %g0,%o0,%i5 or %g0,%o1,%l0 ba Dret or %g0,%o2,%l1i10: or %g0,%i5,%o0 or %g0,%l0,%o1 or %g0,%l1,%o2 or %g0,%l2,%o3 or %g0,%l3,%o4 call _exdiv or %g0,%l4,%o5 or %g0,%o0,%i5 or %g0,%o1,%l0 or %g0,%o2,%l1Dret: srl %l0,11,%i1 sll %i5,21,%l5 or %i1,%l5,%i1 srl %i5,11,%i0 sethi %hi(0xfffff),%l5 or %l5,0x3ff,%l5 and %i0,%l5,%i0 sll %l1,20,%l5 or %i0,%l5,%i0 or %i0,%i2,%i0D999: jmpl %i7+8,%g0 restore %g0,0,%g0! .end⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -