Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Same reason as for ldexp.S: most applications don't scale 0.0.

This commit is contained in:
is 1997-10-10 10:40:40 +00:00
parent 7d58ce9471
commit 7c9cfab805
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/libm/arch/mc68881/s_scalbn.S
View File

@ -40,15 +40,13 @@
;_sccsid:
;.asciz "from: @(#)support.s 5.2 (Berkeley) 5/17/90"
RCSID("$NetBSD: s_scalbn.S,v 1.3 1995/05/09 03:01:41 jtc Exp $")
RCSID("$NetBSD: s_scalbn.S,v 1.4 1997/10/10 10:40:40 is Exp $")
| scalbn(x, N)
| returns x * (2**N), for integer values N.
ENTRY(scalbn)
fmoved sp@(4),fp0
fbeq Ldone
fscalel sp@(12),fp0
Ldone:
fmoved fp0,sp@-
movel sp@+,d0
movel sp@+,d1