* renamed

This commit is contained in:
daniel 1998-06-18 16:46:52 +00:00
parent 010d2a6bed
commit 56cd6619b1
2 changed files with 43 additions and 0 deletions

27
rtl/os2/code2.as Normal file
View File

@ -0,0 +1,27 @@
/ code2.s (emx+fpk) -- Copyright (c) 1992-1996 by Eberhard Mattes
/ Changed for FPK-Pascal in 1998 by Danil 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:
PROFILE_NOFRAME
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

16
rtl/os2/code3.as Normal file
View File

@ -0,0 +1,16 @@
/ code3.s (emx+gcc) -- Copyright (c) 1992-1996 by Eberhard Mattes
#include <emx/asm386.h>
.globl _DosQueryMessageCP
_DosQueryMessageCP:
PROFILE_NOFRAME
pushl 0(%esp)
movl $__msgseg32, %eax
xchgl 20(%esp), %eax
xchgl 16(%esp), %eax
xchgl 12(%esp), %eax
xchgl 8(%esp), %eax
movl %eax, 4(%esp)
jmp _DosIQueryMessageCP