/[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.7 by joerg_wunsch, Tue Sep 13 13:29:54 2005 UTC revision 1.8 by aesok, Sun Nov 13 20:59:24 2005 UTC
# Line 68  GLOBAL(__fp_split2) Line 68  GLOBAL(__fp_split2)
68      ADD     rB2,rB2           ; MSB of exponent to carry      ADD     rB2,rB2           ; MSB of exponent to carry
69      adc     rB3,rB3           ; whole exponent in rB3, sign in C      adc     rB3,rB3           ; whole exponent in rB3, sign in C
70      CPI     rB3,0xFF          ; check for NAN      CPI     rB3,0xFF          ; check for NAN
71      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
72      CLR     rBE            ; clear fraction extension      CLR     rBE            ; clear fraction extension
73      cp      rBE,rB3        ; set C if nonzero exponent.  -MM 2000-11-25      cp      rBE,rB3        ; set C if nonzero exponent.  -MM 2000-11-25
74      brcs    1f      brcs    1f
# Line 79  GLOBAL(__fp_split1) Line 79  GLOBAL(__fp_split1)
79      ADD     rA2,rA2        ; MSB of exponent to carry      ADD     rA2,rA2        ; MSB of exponent to carry
80      adc     rA3,rA3        ; whole exponent in rA3, sign in C      adc     rA3,rA3        ; whole exponent in rA3, sign in C
81      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
82      BREQ    fp_split_nan      BREQ    .L_fp_split_nan
83      CLR     rAE            ; clear fraction extension      CLR     rAE            ; clear fraction extension
84      cp      rAE,rA3        ; set C if nonzero exponent.  -MM 2000-11-25      cp      rAE,rA3        ; set C if nonzero exponent.  -MM 2000-11-25
85      brcs    1f      brcs    1f
# Line 87  GLOBAL(__fp_split1) Line 87  GLOBAL(__fp_split1)
87  1:  1:
88      ROR     rA2            ; sets hidden bit      ROR     rA2            ; sets hidden bit
89      RET      RET
90   fp_split_nan:  .L_fp_split_nan:
91      POP     rA3      POP     rA3
92      POP     rA3            ; pop return adress      POP     rA3            ; pop return adress
93   #ifdef __ERRNO__   #ifdef __ERRNO__

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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