2016-05-11 16:53:54 +02:00
|
|
|
|
|
|
|
|
format ELF
|
2020-05-03 10:09:36 +02:00
|
|
|
include '../proc32.inc'
|
2016-05-11 16:53:54 +02:00
|
|
|
section '.text' executable
|
|
|
|
|
|
|
|
|
|
public log10_ as "log10"
|
|
|
|
|
|
|
|
|
|
log10_:
|
|
|
|
|
|
|
|
|
|
; ln(x) = lg(x)/lg(e).
|
|
|
|
|
|
|
|
|
|
fld qword[esp+4]
|
|
|
|
|
fld1
|
|
|
|
|
fxch
|
|
|
|
|
fyl2x ;Compute 1*lg(x).
|
|
|
|
|
fldl2t ;Load lg(10).
|
|
|
|
|
fdivp st1, st0 ;Compute lg(x)/lg(10).
|
|
|
|
|
ret
|
