Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 352 → Rev 353

/svarcom/rmod.asm
22,13 → 22,16
; environment segment - this is updated by SvarCOM at init time
ENVSEG dw 0 ; +8
 
; exit code of last application
LEXCODE dw 0 ; +0Ah
 
; input buffer used for the "previous command" history
BUF000 db 128, 0 ; +0Ah
BUF000 db 128, 0 ; +0Ch
BUF064 db "0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF"
BUF128 db "0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF"
 
 
skipsig: ; +8Ch
skipsig: ; +8Eh
 
; set up CS=DS=SS and point SP to my private stack buffer
mov ax, cs
37,6 → 40,12
mov ss, ax
mov sp, STACKPTR
 
; collect the exit code of previous application
mov ah, 0x4D
int 0x21
xor ah, ah ; clear out termination status, I only want the exit code
mov [LEXCODE], ax
 
; prepare the exec param block
mov ax, [ENVSEG]
mov [EXEC_PARAM_REC], ax