translate: float: stack mode and some more ops

[ia32rtools.git] / tests / x87_f.asm

diff --git a/tests/x87_f.asm b/tests/x87_f.asm
new file mode 100644 (file)
index 0000000..06a9118
--- /dev/null
+++ b/tests/x87_f.asm
@@ -0,0 +1,24 @@
+
+_text           segment para public 'CODE' use32
+
+sub_test        proc near
+
+var_4           = dword ptr -4
+
+                push    ebp
+                mov     ebp, esp
+                sub     esp, 4
+                mov     [ebp+var_4], 4
+                fild    [ebp+var_4]
+                fild    [ebp+var_4]
+                fsqrt
+                fpatan
+                call    __ftol
+                mov     esp, ebp
+                pop     ebp
+                retn
+sub_test        endp
+
+_text           ends
+
+; vim:expandtab