/[avr-libc]/avr-libc/libm/fplib/fp_split.S
ViewVC logotype

Diff of /avr-libc/libm/fplib/fp_split.S

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4.2.1 by joerg_wunsch, Fri Jul 1 21:49:13 2005 UTC revision 1.4.2.2 by aesok, Sun Nov 13 21:08:06 2005 UTC
# Line 66  GLOBAL(__fp_split2) Line 66  GLOBAL(__fp_split2)
66      ADD     rB2,rB2           ; MSB of exponent to carry      ADD     rB2,rB2           ; MSB of exponent to carry
67      adc     rB3,rB3           ; whole exponent in rB3, sign in C      adc     rB3,rB3           ; whole exponent in rB3, sign in C
68      CPI     rB3,0xFF          ; check for NAN      CPI     rB3,0xFF          ; check for NAN
69      BREQ    fp_split_nan      ; if no jump then C as hidden one is set      BREQ    .L_fp_split_nan   ; if no jump then C as hidden one is set
70      CLR     rBE            ; clear fraction extension      CLR     rBE            ; clear fraction extension
71      cp      rBE,rB3        ; set C if nonzero exponent.  -MM 2000-11-25      cp      rBE,rB3        ; set C if nonzero exponent.  -MM 2000-11-25
72      brcs    1f      brcs    1f
# Line 77  GLOBAL(__fp_split1) Line 77  GLOBAL(__fp_split1)
77      ADD     rA2,rA2        ; MSB of exponent to carry      ADD     rA2,rA2        ; MSB of exponent to carry
78      adc     rA3,rA3        ; whole exponent in rA3, sign in C      adc     rA3,rA3        ; whole exponent in rA3, sign in C
79      CPI     rA3,0xFF       ; if no jump then C as hidden one is set      CPI     rA3,0xFF       ; if no jump then C as hidden one is set
80      BREQ    fp_split_nan      BREQ    .L_fp_split_nan
81      CLR     rAE            ; clear fraction extension      CLR     rAE            ; clear fraction extension
82      cp      rAE,rA3        ; set C if nonzero exponent.  -MM 2000-11-25      cp      rAE,rA3        ; set C if nonzero exponent.  -MM 2000-11-25
83      brcs    1f      brcs    1f
# Line 85  GLOBAL(__fp_split1) Line 85  GLOBAL(__fp_split1)
85  1:  1:
86      ROR     rA2            ; sets hidden bit      ROR     rA2            ; sets hidden bit
87      RET      RET
88   fp_split_nan:  .L_fp_split_nan:
89      POP     rA3      POP     rA3
90      POP     rA3            ; pop return adress      POP     rA3            ; pop return adress
91   #ifdef __ERRNO__   #ifdef __ERRNO__

Legend:
Removed from v.1.4.2.1  
changed lines
  Added in v.1.4.2.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26