7
movl $0xc2820000,-4(%esp)
14
# x*log2e <= -65, return -1 without underflow
49
cmpl $0xc67ff800,(%esp)
51
movl $0x5f000000,(%esp)
59
je 2f # x - 0x1p63 + 0x1p63 == x
61
flds (%esp) # 0x1p-149
63
fstps (%esp) # raise underflow
68
fsub %st(2) # st(0)=x-rint(x), st(1)=1, st(2)=rint(x)
87
fldt (%esp) # 2^rint(x)