minor fixes
[ia32rtools.git] / tests / x87_f.asm
1
2 _text           segment para public 'CODE' use32
3
4 sub_test        proc near
5
6 var_4           = dword ptr -4
7
8                 push    ebp
9                 mov     ebp, esp
10                 sub     esp, 4
11                 mov     [ebp+var_4], 4
12                 fild    [ebp+var_4]
13                 fild    [ebp+var_4]
14                 fsqrt
15                 fpatan
16                 call    __ftol
17                 mov     esp, ebp
18                 pop     ebp
19                 retn
20 sub_test        endp
21
22 _text           ends
23
24 ; vim:expandtab