| /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 |