Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 413 → Rev 412

/svarcom/trunk/cmd/copy.c
109,8 → 109,8
int 0x21 /* CF set on error, bytes read in AX (0=EOF) */
jc FAIL /* abort on error */
/* EOF? (ax == 0) */
test ax, ax
jz ENDOFFILE
cmp ax, 0
je ENDOFFILE
/* write block of AX bytes to dst */
mov cx, ax /* block length */
mov ah, 0x40 /* DOS 2+ -- write to file (CX bytes from DS:DX) */
123,8 → 123,9
jne FAIL
jmp COPY
 
/* if dst ascii mode -> add an EOF */
ENDOFFILE:
/* if dst ascii mode -> add an EOF (ASCII mode not supported for the time being) */
/* TODO */
 
jmp CLOSESRC
 
171,8 → 172,6
outputnl("");
outputnl("To append files, specify a single file for destination, but multiple files");
outputnl("for source (using wildcards or file1+file2+file3 format).");
outputnl("");
outputnl("NOTE: /A and /B are no-ops (ignored), provided only for compatibility reasons.");
return(-1);
}