Imre Kaloz
14 years ago
parent
edcbafc836
commit
54dea0c74f
File diff suppressed because it is too large
Load Diff
@ -0,0 +1,25 @@
|
||||
--- a/gcc/config.gcc
|
||||
+++ b/gcc/config.gcc
|
||||
@@ -836,7 +836,7 @@ avr-*-*)
|
||||
;;
|
||||
avr32*-*-linux*)
|
||||
tm_file="dbxelf.h elfos.h linux.h avr32/linux-elf.h avr32/avr32.h "
|
||||
- tmake_file="t-linux avr32/t-avr32 avr32/t-elf"
|
||||
+ tmake_file="t-linux avr32/t-avr32-linux"
|
||||
extra_parts="crtbegin.o crtbeginS.o crtend.o crtendS.o"
|
||||
extra_modes=avr32/avr32-modes.def
|
||||
gnu_ld=yes
|
||||
--- a/libgcc/config.host
|
||||
+++ b/libgcc/config.host
|
||||
@@ -240,6 +240,11 @@ arm-*-pe*)
|
||||
;;
|
||||
arm*-*-kaos*)
|
||||
;;
|
||||
+avr32-*-linux*)
|
||||
+ # No need to build crtbeginT.o on uClibc systems. Should probably be
|
||||
+ # moved to the OS specific section above.
|
||||
+ extra_parts="crtbegin.o crtbeginS.o crtend.o crtendS.o"
|
||||
+ ;;
|
||||
avr32-*-*)
|
||||
;;
|
||||
avr-*-rtems*)
|
||||
@ -0,0 +1,10 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -2800,6 +2800,7 @@ __extendsfdf_return_op1:
|
||||
lsl r11,8 /* check mantissa */
|
||||
movne r11, -1 /* Return NaN */
|
||||
moveq r11, r10 /* Return inf */
|
||||
+ mov r10, 0
|
||||
rjmp __extendsfdf_return_op1
|
||||
#endif
|
||||
|
||||
@ -0,0 +1,10 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -1036,6 +1036,7 @@ __avr32_f64_add_opL_nan_or_inf:
|
||||
brne __avr32_f64_add_return_nan
|
||||
mov r10, 0 /* Generate Inf in r11, r10 */
|
||||
mov_imm r11, 0x7ff00000
|
||||
+ or r11, r12 /* Put sign bit back */
|
||||
ldm sp++, r5, r6, r7, pc/* opL Inf, return Inf */
|
||||
__avr32_f64_add_return_nan:
|
||||
mov r10, -1 /* Generate NaN in r11, r10 */
|
||||
@ -0,0 +1,34 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -2257,10 +2257,13 @@ __avr32_f32_div:
|
||||
|
||||
/* Unpack */
|
||||
lsl r12,1
|
||||
- reteq 0 /* Return zero if op1 is zero */
|
||||
lsl r11,1
|
||||
breq 4f /* Check op2 for zero */
|
||||
-
|
||||
+
|
||||
+ tst r12, r12
|
||||
+ moveq r9, 0
|
||||
+ breq 12
|
||||
+
|
||||
/* Unpack op1*/
|
||||
/* exp: r9 */
|
||||
/* sf: r12 */
|
||||
@@ -2279,9 +2282,14 @@ __avr32_f32_div:
|
||||
breq 13f /*If number is subnormal*/
|
||||
cp r10, 0xff
|
||||
brhs 3f /* Check op2 for NaN or Inf */
|
||||
-
|
||||
lsl r11,7
|
||||
sbr r11, 31 /*Implicit bit*/
|
||||
+
|
||||
+ cp.w r9, 0
|
||||
+ subfeq r12, 0
|
||||
+ reteq 0 /* op1 is zero and op2 is not zero */
|
||||
+ /* or NaN so return zero */
|
||||
+
|
||||
14:
|
||||
|
||||
/* For UC3, store with predecrement is faster than stm */
|
||||
@ -0,0 +1,66 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -1389,25 +1389,30 @@ __avr32_f64_cmp_lt:
|
||||
#endif
|
||||
|
||||
/* compare magnitude of op1 and op2 */
|
||||
+ st.w --sp, lr
|
||||
+ st.w --sp, r7
|
||||
lsl r11,1 /* Remove sign bit of op1 */
|
||||
srcs r12 /* Sign op1 to lsb of r12*/
|
||||
- subfeq r10, 0
|
||||
- breq 3f /* op1 zero */
|
||||
lsl r9,1 /* Remove sign bit of op2 */
|
||||
+ srcs r7
|
||||
rol r12 /* Sign op2 to lsb of lr, sign bit op1 bit 1 of r12*/
|
||||
|
||||
|
||||
/* Check for Nan */
|
||||
- pushm lr
|
||||
- mov_imm lr, 0xffe00000
|
||||
+ mov_imm lr, 0xffe00000
|
||||
cp.w r10,0
|
||||
cpc r11,lr
|
||||
brhi 0f /* We have NaN */
|
||||
cp.w r8,0
|
||||
cpc r9,lr
|
||||
brhi 0f /* We have NaN */
|
||||
- popm lr
|
||||
-
|
||||
+
|
||||
+ cp.w r11, 0
|
||||
+ subfeq r10, 0
|
||||
+ breq 3f /* op1 zero */
|
||||
+ ld.w r7, sp++
|
||||
+ ld.w lr, sp++
|
||||
+
|
||||
cp.w r12,3 /* both operands negative ?*/
|
||||
breq 1f
|
||||
|
||||
@@ -1453,18 +1458,22 @@ __avr32_f64_cmp_lt:
|
||||
#endif
|
||||
|
||||
0:
|
||||
+ ld.w r7, sp++
|
||||
popm pc, r12=0
|
||||
#endif
|
||||
|
||||
3:
|
||||
- lsl r9,1 /* Remove sign bit of op1 */
|
||||
+ cp.w r7, 1 /* Check sign bit from r9 */
|
||||
#ifdef L_avr32_f64_cmp_ge
|
||||
- srcs r12 /* If op2 is negative then op1 >= op2. */
|
||||
+ sreq r12 /* If op2 is negative then op1 >= op2. */
|
||||
#endif
|
||||
#ifdef L_avr32_f64_cmp_lt
|
||||
- srcc r12 /* If op2 is positve then op1 <= op2. */
|
||||
+ srne r12 /* If op2 is positve then op1 <= op2. */
|
||||
#endif
|
||||
- subfeq r8, 0
|
||||
+ cp.w r9, 0
|
||||
+ subfeq r8, 0
|
||||
+ ld.w r7, sp++
|
||||
+ ld.w lr, sp++
|
||||
#ifdef L_avr32_f64_cmp_ge
|
||||
reteq 1 /* Both operands are zero. Return true. */
|
||||
#endif
|
||||
@ -0,0 +1,20 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -1733,7 +1733,7 @@ __avr32_f64_div_round_subnormal:
|
||||
brne 16f /* Return NaN if op1 is NaN */
|
||||
/* Op1 is inf check op2 */
|
||||
lsr r6, r9, 20 /* Extract exponent */
|
||||
- cbr r6, 8 /* Clear sign bit */
|
||||
+ cbr r6, 11 /* Clear sign bit */
|
||||
cp r6, 0x7ff
|
||||
brne 17f /* Inf/number gives inf, return inf */
|
||||
rjmp 16f /* The rest gives NaN*/
|
||||
@@ -1849,7 +1849,7 @@ __avr32_f64_div_res_subnormal:/* Divide
|
||||
|
||||
16: /* Return NaN. */
|
||||
mov r11, -1
|
||||
- mov r10, -1
|
||||
+ mov r10, 0
|
||||
ldm sp++, r0, r1, r2, r3, r4, r5, r6, r7,pc
|
||||
|
||||
17: /* Return INF. */
|
||||
@ -0,0 +1,11 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -2866,7 +2866,7 @@ __truncdfsf_return_op1:
|
||||
/* NaN or inf */
|
||||
cbr r12,31 /* clear implicit bit */
|
||||
retne -1 /* Return NaN if mantissa not zero */
|
||||
- mov_imm r12, 0xff000000
|
||||
+ mov_imm r12, 0x7f800000
|
||||
ret r12 /* Return inf */
|
||||
|
||||
3: /* Result is subnormal. Adjust it.*/
|
||||
@ -0,0 +1,27 @@
|
||||
--- a/gcc/config/avr32/lib1funcs.S
|
||||
+++ b/gcc/config/avr32/lib1funcs.S
|
||||
@@ -2271,7 +2271,7 @@ __avr32_f32_div:
|
||||
|
||||
tst r12, r12
|
||||
moveq r9, 0
|
||||
- breq 12
|
||||
+ breq 12f
|
||||
|
||||
/* Unpack op1*/
|
||||
/* exp: r9 */
|
||||
@@ -2467,9 +2467,14 @@ __divsf_return_op1:
|
||||
reteq 0 /* Return zero if number/inf*/
|
||||
ret -1 /* Return NaN*/
|
||||
4:
|
||||
- /* Op2 is zero ? */
|
||||
+ /* Op1 is zero ? */
|
||||
tst r12,r12
|
||||
reteq -1 /* 0.0/0.0 is NaN */
|
||||
+ /* Op1 is Nan? */
|
||||
+ lsr r9, r12, 24
|
||||
+ breq 11f /*If number is subnormal*/
|
||||
+ cp r9, 0xff
|
||||
+ brhs 2b /* Check op1 for NaN or Inf */
|
||||
/* Nonzero/0.0 is Inf. Sign bit will be shifted in before returning*/
|
||||
mov_imm r12, 0xff000000
|
||||
rjmp __divsf_return_op1
|
||||
Loading…
Reference in New Issue