/* fparc32.s - VxWorks conversion from Microtek tools to Sun native *//* Copyright 1984-1992 Wind River Systems, Inc. *//*modification history--------------------01b,10nov92,jwt  fixed register use error in fpexatan().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	_fpexsqrt	.data	.align	4atntaf:	.word	0x0,0x0	.word	0xffeaaddd,0x79	.word	0xffaaddb9,0x7a	.word	0xbf70c130,0x7b	.word	0xfeadd4d5,0x7b	.word	0x9eb77746,0x7c	.word	0xbdcbda5e,0x7c	.word	0xdc86ba95,0x7c	.word	0xfadbafc9,0x7c	.word	0x8c5fad18,0x7d	.word	0x9b13b9b8,0x7d	.word	0xa9856ccb,0x7d	.word	0xb7b0ca0f,0x7d	.word	0xc59269ca,0x7d	.word	0xd327761e,0x7d	.word	0xe06da64a,0x7d	.word	0xed63382b,0x7d	.word	0xfa06e85b,0x7d	.word	0x832bf4a7,0x7e	.word	0x892aece0,0x7e	.word	0x8f005d5f,0x7e	.word	0x94ac72c9,0x7e	.word	0x9a2f80e6,0x7e	.word	0x9f89fdc5,0x7e	.word	0xa4bc7d19,0x7e	.word	0xa9c7abdc,0x7e	.word	0xaeac4c39,0x7e	.word	0xb36b31c9,0x7e	.word	0xb8053e2c,0x7e	.word	0xbc7b5deb,0x7e	.word	0xc0ce85b9,0x7e	.word	0xc4ffaffb,0x7e	.text	.align	4	.global	_fpexatan_fpexatan:	save	%sp,-96,%sp	subcc   %i1,0x7f,%g0	bl      i1             	subcc   %i1,0,%i1	bneg    Azer     	NOP	sub     %g0,%i1,%i1	add     %i1,0xfd,%i1	sethi   %hi(0x80000000),%l3	subcc   %i0,%l3,%g0	bne     i2             	subcc   %i1,0x7e,%g0	bne     i3       	NOP	ba      e2       	or      %g0,-1,%i0i3:	ba      e2       	add     %i1,1,%i1i2:	or      %g0,%i0,%i3	wr	%l3,0,%y	or	%g0,0x0,%i0	orcc	%g0,0,%g0#if 0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0	divscc	%i0,%i3,%i0#else	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)	DIVSCC | (in0 << 14) | in3 | (in0 << 25)#endife2:	or      %i2,1,%i2i1:	or      %g0,0x81,%i3	sub     %i3,%i1,%i3	subcc   %i3,8,%g0	bge,a	i4               	or      %g0,8,%i3i4:	srl     %i0,24,%l1	srl     %l1,%i3,%l1	sll     %l1,1,%l1	sll     %l1,26,%l3	umul	%l3,%i0,%l3	rd	%y,%l3	or      %g0,0x7f,%i5	sub     %i5,%i1,%i5	subcc	%i5,32,%g0	bcc,a	L1             	or	%g0,0,%l3L1:	srl	%l3,%i5,%l3	sethi   %hi(0x80000000),%l6	or      %l3,%l6,%l3	or      %g0,8,%l7	sub     %l7,%i3,%l7	or      %g0,-1,%l6	srl     %l6,%l7,%l6	andcc   %i0,%l6,%i0	be      Alab5    	NOP/*	scan	%i0,0,%i3	*/	SCAN | (in0 << 14) | 0 | (in3 << 25)	sll	%i0,%i3,%i0	subcc	%i1,%i3,%i1	srl     %i0,1,%i0	wr	%i0,0,%y	or	%g0,0x0,%i0	orcc	%g0,0,%g0#if 0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0	divscc	%i0,%l3,%i0#else	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)	DIVSCC | (in0 << 14) | lo3 | (in0 << 25)#endif	subcc   %i0,0,%i0	ble     i5       	NOP	sll     %i0,1,%i0	sub     %i1,1,%i1i5:	umul	%i0,%i0,%l3	rd	%y,%l3	or      %g0,0xfc,%i3	sub     %i3,%i1,%i3	sub     %i3,%i1,%i3	subcc	%i3,32,%g0	bcc,a	L2             	or	%g0,0,%l3L2:	srl	%l3,%i3,%l3	sethi   %hi(0x1999999a),%i5	or      %i5,0x19a,%i5	umul	%l3,%i5,%i5	rd	%y,%i5	sethi   %hi(0x2aaaaaab),%l6	or      %l6,0x2ab,%l6	sub     %l6,%i5,%i5	umul	%l3,%i5,%i5	rd	%y,%i5	sethi   %hi(0x80000000),%l6	subcc   %l6,%i5,%i5	bneg    i6       	NOP	ba      e6       	sll     %i5,1,%i5i6:	add     %i1,1,%i1e6:	umul	%i0,%i5,%i0	rd	%y,%i0	subcc   %i0,0,%i0	bneg    i7       	NOP	sll     %i0,1,%i0	sub     %i1,1,%i1i7:	subcc   %l1,0,%l1	be      Alab7    	NOPAlab5:	sethi   %hi(atntaf),%l6	or	%l6,%lo(atntaf),%l6	add     %l1,1,%l7	sll     %l7,2,%l7	ld      [%l6+%l7],%i3	sub     %i3,%i1,%i4	subcc	%i4,32,%g0	bcc,a	L3             	or	%g0,0,%i0L3:	srl	%i0,%i4,%i0	or      %g0,%i3,%i1	sethi   %hi(atntaf),%l6	or	%l6,%lo(atntaf),%l6	sll     %l1,2,%l7	ld      [%l6+%l7],%i3	addcc   %i0,%i3,%i0	bcc     Alab7    	NOP	srl     %i0,1,%i0	sethi   %hi(0x80000000),%l6	or      %i0,%l6,%i0	add     %i1,1,%i1Alab7:	andcc   %i2,1,%l6	be      Alab8    	NOP	and     %i2,0xfffffffe,%i2	or      %g0,0x7f,%i3	sub     %i3,%i1,%i3	subcc	%i3,32,%g0	bcc,a	L4             	or	%g0,0,%i0L4:	srl	%i0,%i3,%i0	or      %g0,0x7f,%i1	sethi   %hi(0xc90fdaa2),%l6	or      %l6,0x2a2,%l6	subcc   %l6,%i0,%i0	bneg    Alab8    	NOP	sll     %i0,1,%i0	sub     %i1,1,%i1Alab8:A999:	jmpl	%i7+8,%g0	restore	%g0,0,%g0Azer:	or      %g0,0,%i1	ba      Alab8    	or      %g0,%i1,%i0	.global	_fpatan_fpatan:	.global	_atanf_atanf:	save	%sp,-96,%sp	srl     %i0,23,%i2	and     %i2,0xff,%i2	sethi   %hi(0x80000000),%i3	sll     %i0,8,%i1	or      %i1,%i3,%i1	and     %i3,%i0,%i3	subcc   %i2,0xff,%g0	bne     i11            	sll     %i1,1,%l1	subcc   %l1,0,%l1	bne     Bnan           i11:	or      %g0,%i1,%o0	or      %g0,%i2,%o1	call    _fpexatan	or      %g0,%i3,%o2	or      %g0,%o0,%i4	or      %g0,%o1,%i5	or      %g0,%o2,%l0	sll     %i4,1,%i1	srl     %i1,9,%i1	sll     %i5,23,%l1	or      %i1,%l1,%i1	or      %i1,%i3,%i0B999:	jmpl	%i7+8,%g0	restore	%g0,0,%g0Bnan:	ba      B999     	sethi   %hi(0xffc00000),%i0	.global	_fpatan2_fpatan2:	.global	_atan2f_atan2f:	save	%sp,-96,%sp	srl     %i0,23,%i3	and     %i3,0xff,%i3	sethi   %hi(0x80000000),%l2	sll     %i0,8,%i2	or      %i2,%l2,%i2	and     %i0,%l2,%i4	srl     %i1,23,%l0	and     %l0,0xff,%l0	sll     %i1,8,%i5	or      %i5,%l2,%i5	sub     %i3,1,%l6	subcc   %l6,0xfe,%g0	bcc     CspecA         Clab1:	sub     %l0,1,%l6	subcc   %l6,0xfe,%g0	bcc     CspecB   	NOPClab2:	add     %i3,0x7f,%i3	sub     %i3,%l0,%i3	srl     %i2,1,%i2	wr	%i2,0,%y	or	%g0,0x0,%i2	orcc	%g0,0,%g0#if 0	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2	divscc	%i2,%i5,%i2