source: trunk/testcase/floatingpoint/tst.asm@ 433

Last change on this file since 433 was 433, checked in by bird, 22 years ago

* empty log message *

  • Property cvs2svn:cvs-rev set to 1.1
  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 734 bytes
Line 
1 .486
2 .387
3
4
5STACK32 segment use32 stack 'STACK'
6 db 4096 dup(0)
7STACK32 ends
8
9DATA32 segment use32 public 'DATA'
10rd1 qword 0
11rd2 qword 0
12rd3 qword 0
13rd4 qword 0
14rd5 qword 0
15DATA32 ends
16
17DGROUP group DATA32
18
19
20CODE32 segment use32 public 'CODE'
21 ASSUME ds:FLAT
22
23start:
24 mov eax, dword ptr [rd1]
25 mov edx, dword ptr [rd1+4]
26 and edx, 0FFFFFh
27 mov dword ptr [rd2], eax
28 mov dword ptr [rd2+4], edx
29 fld [rd2]
30 fstp qword ptr [rd3]
31
32 mov edx, dword ptr [rd4+4]
33 or edx, 3FF00000h
34 mov dword ptr [rd5], eax
35 mov dword ptr [rd5+4], edx
36 fld qword ptr [rd5]
37
38 ret
39CODE32 ends
40
41end start
Note: See TracBrowser for help on using the repository browser.