1 files changed, 0 insertions, 147 deletions
diff --git a/arch/i386/math-emu/reg_norm.S b/arch/i386/math-emu/reg_norm.S
deleted file mode 100644
index 8b6352efceef..000000000000
--- a/arch/i386/math-emu/reg_norm.S
+++ /dev/null
@@ -1,147 +0,0 @@
-/*---------------------------------------------------------------------------+
- |  reg_norm.S                                                               |
- |                                                                           |
- | Copyright (C) 1992,1993,1994,1995,1997                                    |
- |                       W. Metzenthen, 22 Parker St, Ormond, Vic 3163,      |
- |                       Australia.  E-mail billm@suburbia.net               |
- |                                                                           |
- | Normalize the value in a FPU_REG.                                         |
- |                                                                           |
- | Call from C as:                                                           |
- |    int FPU_normalize(FPU_REG *n)                                          |
- |                                                                           |
- |    int FPU_normalize_nuo(FPU_REG *n)                                      |
- |                                                                           |
- |    Return value is the tag of the answer, or-ed with FPU_Exception if     |
- |    one was raised, or -1 on internal error.                               |
- |                                                                           |
- +---------------------------------------------------------------------------*/
-#include "fpu_emu.h"
-.text
-ENTRY(FPU_normalize)
-        pushl   %ebp
-        movl    %esp,%ebp
-        pushl   %ebx
-        movl    PARAM1,%ebx
-        movl    SIGH(%ebx),%edx
-        movl    SIGL(%ebx),%eax
-        orl     %edx,%edx       /* ms bits */
-        js      L_done          /* Already normalized */
-        jnz     L_shift_1       /* Shift left 1 - 31 bits */
-        orl     %eax,%eax
-        jz      L_zero          /* The contents are zero */
-        movl    %eax,%edx
-        xorl    %eax,%eax
-        subw    $32,EXP(%ebx)   /* This can cause an underflow */
-/* We need to shift left by 1 - 31 bits */
-L_shift_1:
-        bsrl    %edx,%ecx       /* get the required shift in %ecx */
-        subl    $31,%ecx
-        negl    %ecx
-        shld    %cl,%eax,%edx
-        shl     %cl,%eax
-        subw    %cx,EXP(%ebx)   /* This can cause an underflow */
-        movl    %edx,SIGH(%ebx)
-        movl    %eax,SIGL(%ebx)
-L_done:
-        cmpw    EXP_OVER,EXP(%ebx)
-        jge     L_overflow
-        cmpw    EXP_UNDER,EXP(%ebx)
-        jle     L_underflow
-L_exit_valid:
-        movl    TAG_Valid,%eax
-        /* Convert the exponent to 80x87 form. */
-        addw    EXTENDED_Ebias,EXP(%ebx)
-        andw    $0x7fff,EXP(%ebx)
-L_exit:
-        popl    %ebx
-        leave
-        ret
-L_zero:
-        movw    $0,EXP(%ebx)
-        movl    TAG_Zero,%eax
-        jmp     L_exit
-L_underflow:
-        /* Convert the exponent to 80x87 form. */
-        addw    EXTENDED_Ebias,EXP(%ebx)
-        push    %ebx
-        call    arith_underflow
-        pop     %ebx
-        jmp     L_exit
-L_overflow:
-        /* Convert the exponent to 80x87 form. */
-        addw    EXTENDED_Ebias,EXP(%ebx)
-        push    %ebx
-        call    arith_overflow
-        pop     %ebx
-        jmp     L_exit
-/* Normalise without reporting underflow or overflow */
-ENTRY(FPU_normalize_nuo)
-        pushl   %ebp
-        movl    %esp,%ebp
-        pushl   %ebx
-        movl    PARAM1,%ebx
-        movl    SIGH(%ebx),%edx
-        movl    SIGL(%ebx),%eax
-        orl     %edx,%edx       /* ms bits */
-        js      L_exit_nuo_valid        /* Already normalized */
-        jnz     L_nuo_shift_1   /* Shift left 1 - 31 bits */
-        orl     %eax,%eax
-        jz      L_exit_nuo_zero         /* The contents are zero */
-        movl    %eax,%edx
-        xorl    %eax,%eax
-        subw    $32,EXP(%ebx)   /* This can cause an underflow */
-/* We need to shift left by 1 - 31 bits */
-L_nuo_shift_1:
-        bsrl    %edx,%ecx       /* get the required shift in %ecx */
-        subl    $31,%ecx
-        negl    %ecx
-        shld    %cl,%eax,%edx
-        shl     %cl,%eax
-        subw    %cx,EXP(%ebx)   /* This can cause an underflow */
-        movl    %edx,SIGH(%ebx)
-        movl    %eax,SIGL(%ebx)
-L_exit_nuo_valid:
-        movl    TAG_Valid,%eax
-        popl    %ebx
-        leave
-        ret
-L_exit_nuo_zero:
-        movl    TAG_Zero,%eax
-        movw    EXP_UNDER,EXP(%ebx)
-        popl    %ebx
-        leave
-        ret

diff --git a/arch/i386/math-emu/reg_norm.S b/arch/i386/math-emu/reg_norm.S deleted file mode 100644 index 8b6352efceef..000000000000 --- a/arch/i386/math-emu/reg_norm.S +++ /dev/null
@@ -1,147 +0,0 @@
1	/*---------------------------------------------------------------------------+
2	\| reg_norm.S \|
3	\| \|
4	\| Copyright (C) 1992,1993,1994,1995,1997 \|
5	\| W. Metzenthen, 22 Parker St, Ormond, Vic 3163, \|
6	\| Australia. E-mail billm@suburbia.net \|
7	\| \|
8	\| Normalize the value in a FPU_REG. \|
9	\| \|
10	\| Call from C as: \|
11	\| int FPU_normalize(FPU_REG *n) \|
12	\| \|
13	\| int FPU_normalize_nuo(FPU_REG *n) \|
14	\| \|
15	\| Return value is the tag of the answer, or-ed with FPU_Exception if \|
16	\| one was raised, or -1 on internal error. \|
17	\| \|
18	+---------------------------------------------------------------------------*/
19
20	#include "fpu_emu.h"
21
22
23	.text
24	ENTRY(FPU_normalize)
25	pushl %ebp
26	movl %esp,%ebp
27	pushl %ebx
28
29	movl PARAM1,%ebx
30
31	movl SIGH(%ebx),%edx
32	movl SIGL(%ebx),%eax
33
34	orl %edx,%edx /* ms bits */
35	js L_done /* Already normalized */
36	jnz L_shift_1 /* Shift left 1 - 31 bits */
37
38	orl %eax,%eax
39	jz L_zero /* The contents are zero */
40
41	movl %eax,%edx
42	xorl %eax,%eax
43	subw $32,EXP(%ebx) /* This can cause an underflow */
44
45	/* We need to shift left by 1 - 31 bits */
46	L_shift_1:
47	bsrl %edx,%ecx /* get the required shift in %ecx */
48	subl $31,%ecx
49	negl %ecx
50	shld %cl,%eax,%edx
51	shl %cl,%eax
52	subw %cx,EXP(%ebx) /* This can cause an underflow */
53
54	movl %edx,SIGH(%ebx)
55	movl %eax,SIGL(%ebx)
56
57	L_done:
58	cmpw EXP_OVER,EXP(%ebx)
59	jge L_overflow
60
61	cmpw EXP_UNDER,EXP(%ebx)
62	jle L_underflow
63
64	L_exit_valid:
65	movl TAG_Valid,%eax
66
67	/* Convert the exponent to 80x87 form. */
68	addw EXTENDED_Ebias,EXP(%ebx)
69	andw $0x7fff,EXP(%ebx)
70
71	L_exit:
72	popl %ebx
73	leave
74	ret
75
76
77	L_zero:
78	movw $0,EXP(%ebx)
79	movl TAG_Zero,%eax
80	jmp L_exit
81
82	L_underflow:
83	/* Convert the exponent to 80x87 form. */
84	addw EXTENDED_Ebias,EXP(%ebx)
85	push %ebx
86	call arith_underflow
87	pop %ebx
88	jmp L_exit
89
90	L_overflow:
91	/* Convert the exponent to 80x87 form. */
92	addw EXTENDED_Ebias,EXP(%ebx)
93	push %ebx
94	call arith_overflow
95	pop %ebx
96	jmp L_exit
97
98
99
100	/* Normalise without reporting underflow or overflow */
101	ENTRY(FPU_normalize_nuo)
102	pushl %ebp
103	movl %esp,%ebp
104	pushl %ebx
105
106	movl PARAM1,%ebx
107
108	movl SIGH(%ebx),%edx
109	movl SIGL(%ebx),%eax
110
111	orl %edx,%edx /* ms bits */
112	js L_exit_nuo_valid /* Already normalized */
113	jnz L_nuo_shift_1 /* Shift left 1 - 31 bits */
114
115	orl %eax,%eax
116	jz L_exit_nuo_zero /* The contents are zero */
117
118	movl %eax,%edx
119	xorl %eax,%eax
120	subw $32,EXP(%ebx) /* This can cause an underflow */
121
122	/* We need to shift left by 1 - 31 bits */
123	L_nuo_shift_1:
124	bsrl %edx,%ecx /* get the required shift in %ecx */
125	subl $31,%ecx
126	negl %ecx
127	shld %cl,%eax,%edx
128	shl %cl,%eax
129	subw %cx,EXP(%ebx) /* This can cause an underflow */
130
131	movl %edx,SIGH(%ebx)
132	movl %eax,SIGL(%ebx)
133
134	L_exit_nuo_valid:
135	movl TAG_Valid,%eax
136
137	popl %ebx
138	leave
139	ret
140
141	L_exit_nuo_zero:
142	movl TAG_Zero,%eax
143	movw EXP_UNDER,EXP(%ebx)
144
145	popl %ebx
146	leave
147	ret