Windows2000/private/ntos/dll/i386/emstack.inc
2020-09-30 17:12:32 +02:00

73 lines
1.6 KiB
PHP

subttl emstack.asm - Emulator Stack Management Macros
page
;***
;emstack.asm - Emulator Stack Management Area
; Microsoft Confidential
; Copyright (c) Microsoft Corporation 1991
; All Rights Reserved
;Purpose:
; Handles emulator stack.
;Revision History:
; [] 09/05/91 TP Initial 32-bit version.
;*******************************************************************************
;POPSTret: pops the stack and returns. Uses esi.
POPSTret macro reg
local stackwrap
IFB <reg>
mov esi,EMSEG:[CURstk]
_popreg equ esi
ELSE
_popreg equ reg
ENDIF
mov EMSEG:[_popreg].bTag,bTAG_EMPTY
NextStackElem _popreg,stackwrap
mov EMSEG:[CURstk],_popreg
ret
Wrap&stackwrap:
mov EMSEG:[CURstk],BEGstk
ret
endm
;NextStackElem: Given pST(0) = [CURstk] in reg, returns pST(1)
;Requires NextStackWrap macro with same arguments
NextStackElem macro reg,stackwrap
cmp reg,INITstk ;JWM
jae Wrap&stackwrap
add reg,Reg87Len
Cont&stackwrap:
endm
NextStackWrap macro reg,stackwrap
Wrap&stackwrap:
mov reg,BEGstk ;JWM
jmp Cont&stackwrap
endm
;PrevStackElem: Given pST(0) = [CURstk] in reg, returns new pST(0)
;after a push onto on the stack.
;Requires PrevStackWrap macro with same arguments
PrevStackElem macro reg,stackwrap
cmp reg,BEGstk ;JWM
jbe Wrap&stackwrap
sub reg,Reg87Len
Cont&stackwrap:
endm
PrevStackWrap macro reg,stackwrap
Wrap&stackwrap:
mov reg,INITstk ;JWM
jmp Cont&stackwrap
endm