Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1906 | serge | 1 | /* |
2 | * Written by J.T. Conklin |
||
3 | * Public domain. |
||
4 | */ |
||
5 | |||
6 | .file "scalbn.S" |
||
7 | .text |
||
8 | .align 4 |
||
9 | .globl _scalbn |
||
10 | .def _scalbn; .scl 2; .type 32; .endef |
||
11 | _scalbn: |
||
12 | fildl 12(%esp) |
||
13 | fldl 4(%esp) |
||
14 | fscale |
||
15 | fstp %st(1) |
||
16 | ret |
||
17 | |||
18 | .globl _scalbln |
||
19 | .set _scalbln,_scalbn |