mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
39 lines
395 B
39 lines
395 B
TITLE w32sys - Win32S support
|
|
|
|
.xlist
|
|
include kernel.inc
|
|
include tdb.inc
|
|
.list
|
|
|
|
DataBegin
|
|
|
|
externW curTDB
|
|
|
|
DataEnd
|
|
|
|
|
|
sBegin CODE
|
|
assumes CS,CODE
|
|
|
|
|
|
assumes ds,nothing
|
|
assumes es,nothing
|
|
|
|
public GetW32SysInfo
|
|
|
|
cProc GetW32SysInfo,<PUBLIC,FAR>
|
|
cBegin nogen
|
|
if PMODE32
|
|
SetKernelDS ES
|
|
|
|
mov dx, es
|
|
lea ax, curTDB
|
|
|
|
endif
|
|
ret
|
|
assumes es,nothing
|
|
cEnd nogen
|
|
|
|
sEnd CODE
|
|
|
|
end
|