/programs/develop/ktcc/trunk/libc/math/ceil.asm |
0,0 → 1,30 |
|
format ELF |
include 'proc32.inc' |
section '.text' executable |
|
public ceil |
|
ceil: |
|
push ebp |
mov ebp,esp |
sub esp,8 |
|
fstcw [ebp-12] |
mov dx,[ebp-12] |
or dx,0x0800 |
and dx,0xfbff |
mov word[ebp-16],dx |
fldcw [ebp-16] |
|
fld qword[ebp+8] |
frndint |
|
fldcw [ebp-12] |
|
leave |
|
ret |
|
|
/programs/develop/ktcc/trunk/libc/math/ceilf.asm |
0,0 → 1,30 |
|
format ELF |
include 'proc32.inc' |
section '.text' executable |
|
public ceilf |
|
ceilf: |
|
push ebp |
mov ebp,esp |
sub esp,8 |
|
fstcw [ebp-12] |
mov dx,[ebp-12] |
or dx,0x0800 |
and dx,0xfbff |
mov word[ebp-16],dx |
fldcw [ebp-16] |
|
fld dword[ebp+8] |
frndint |
|
fldcw [ebp-12] |
|
leave |
|
ret |
|
|
/programs/develop/ktcc/trunk/libc/math/floor.asm |
0,0 → 1,29 |
|
format ELF |
include 'proc32.inc' |
section '.text' executable |
|
public floor |
|
floor: |
|
push ebp |
mov ebp,esp |
sub esp,8 |
|
fstcw [ebp-12] |
mov dx,word[ebp-12] |
or dx,0x0400 |
and dx,0xf7ff |
mov word[ebp-16],dx |
fldcw [ebp-16] |
|
fld qword[ebp+8] |
frndint |
|
fldcw [ebp-12] |
|
leave |
|
ret |
|
/programs/develop/ktcc/trunk/libc/math/floorf.asm |
0,0 → 1,29 |
|
format ELF |
include 'proc32.inc' |
section '.text' executable |
|
public floorf |
|
floorf: |
|
push ebp |
mov ebp,esp |
sub esp,8 |
|
fstcw [ebp-12] |
mov dx,word[ebp-12] |
or dx,0x0400 |
and dx,0xf7ff |
mov word[ebp-16],dx |
fldcw [ebp-16] |
|
fld dword[ebp+8] |
frndint |
|
fldcw [ebp-12] |
|
leave |
|
ret |
|