home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
libcvers.zip
/
article_appendix
/
hcaux.asm
< prev
next >
Wrap
Assembly Source File
|
2001-08-15
|
581b
|
36 lines
; $Id: hcaux.asm,v 1.1.1.1 2001/08/14 23:34:32 root Exp $
;
; MetaWare auxiliary routines
.386p
FILLER EQU 0BBh ; Stack filler
PUBLIC _mwclearstack, _mwargstack, _mwgoc
; Common code segment
_TEXT SEGMENT BYTE PUBLIC "CODE"
ASSUME cs:_TEXT ;, ds:STACK32, es:STACK32
; Stack cleanup. Uses the stack base
_mwclearstack proc
; push edi
; cld
; lea edi, STACK32
; mov ecx, esp
; sub ecx, edi
; mov al, FILLER
; rep stosb
; pop edi
_mwargstack:
_mwgoc:
retn
_mwclearstack endp
_TEXT ENDS
END