Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 518 → Rev 519

/svarcom/trunk/redir.c
157,6 → 157,9
mov cx, 1 /* src handle (1=stdout) */
mov ah, 0x46 /* redirect a handle */
int 0x21
/* close old handle (in bx already) */
mov ah, 0x3e
int 0x21
mov [oldstdout], 0xffff
DONE:
}
/svarcom/trunk/rmod.asm
177,10 → 177,13
mov bx, [OLD_STDOUT]
cmp bx, 0xffff
je STDOUT_DONE
; revert the stdout handle (dst in BX alread)
; revert the stdout handle (dst in BX already)
mov cx, 1 ; src handle (1=stdout)
mov ah, 0x46 ; redirect a handle
int 0x21
; close the old handle (still in bx)
mov ah, 0x3e
int 0x21
mov [OLD_STDOUT], word 0xffff ; mark stdout as "not redirected"
STDOUT_DONE:
ret
212,5 → 215,6
int 0x21
; close the original file handle, I no longer need it
mov ah, 0x3e ; close a file handle (handle in BX)
int 0x21
NO_STDOUT_REDIR:
ret
/svarcom/trunk/todo.txt
12,7 → 12,6
ctrl+break handler
int 24h handler (abort, retry, fail, ignore)
advanced batch constructs: CALL, :labels, FOR, GOTO, IF EXIST/ERRORLEVEL
when reverting redirections I should probably close the old handle
 
 
=== MEDIUM PRIORITY ==========================================================
35,7 → 34,6
COPY ASCII mode support
"notify pending command" support (INT 2F,AX=AE00)
INT 2F,AX=5500 support
stdout redirection should not create the output file if command fails
COMSPEC self-setting does not work under MS-DOS 5/6 (no exepath in env block)
compression of NLS strings and rmod core (lz4?)
dynamic resizing of environment space