| Copyright (C) Motorola, Inc. 1990
| All Rights Reserved
|
-| THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF MOTOROLA
-| The copyright notice above does not evidence any
-| actual or intended publication of such source code.
+| For details on the license for this file, please see the
+| file, README, in this same directory.
|SMOVECR idnt 2,1 | Motorola 040 Floating Point Software Package
FZERO: .long 00000000
|
-| FMOVECR
+| FMOVECR
|
.global smovcr
smovcr:
cmpib #0x0e,%d0 |check range $0b - $0e
bles SM_TBL |valid constants in this range
cmpib #0x2f,%d0 |check range $10 - $2f
- bles Z_VAL |if in this range, return zero
+ bles Z_VAL |if in this range, return zero
cmpib #0x3f,%d0 |check range $30 - $3f
- ble BG_TBL |valid constants in this range
+ ble BG_TBL |valid constants in this range
Z_VAL:
fmoves FZERO,%fp0
rts
lea FP_SCR1(%a6),%a0
btstb #sign_bit,LOCAL_EX(%a0)
sne LOCAL_SGN(%a0) |convert to internal ext. format
-
+
bsr round |go round the mantissa
bfclr LOCAL_SGN(%a0){#0:#8} |convert back to IEEE ext format