|
@@ -1,26 +0,0 @@
|
|
-/ code2.as (emx+fpk) -- Copyright (c) 1992-1999-2000 by Eberhard Mattes
|
|
|
|
-/ Changed for Free Pascal in 1999-2000 by Daniel Mantione.
|
|
|
|
-/ This code is _not_ under the Library GNU Public
|
|
|
|
-/ License, because the original is not. See copying.emx
|
|
|
|
-/ for details. You should have received it with this
|
|
|
|
-/ product, write the author if you haven't.
|
|
|
|
-
|
|
|
|
- .globl DosGetMessage
|
|
|
|
- .globl _msgseg32
|
|
|
|
-
|
|
|
|
-_msgseg32:
|
|
|
|
- .byte 0xff
|
|
|
|
- .asciz "MSGSEG32"
|
|
|
|
- .byte 0x01, 0x80, 0x00, 0x00
|
|
|
|
- .long L_tab
|
|
|
|
-
|
|
|
|
- .align 2, 0x90
|
|
|
|
-
|
|
|
|
-DosGetMessage:
|
|
|
|
- popl %ecx /* return address */
|
|
|
|
- pushl $_msgseg32
|
|
|
|
- pushl %ecx
|
|
|
|
- jmp _DOSCALLS$$_DOSTRUEGETMESSAGE$POINTER$PINSERTTABLE$LONGINT$PCHAR$LONGINT$LONGINT$PCHAR$LONGINT
|
|
|
|
-
|
|
|
|
-L_tab: .short 0x0000
|
|
|
|
- .short 0xffff
|
|
|