Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 389 → Rev 390

/svarcom/cmd/dir.c
25,6 → 25,12
const char *filespecptr = "*.*";
struct DTA *dta = (void *)0x80; /* set DTA to its default location at 80h in PSP */
 
if (cmd_ishlp(p)) {
outputnl("Displays a list of files and subdirectories in a directory.");
outputnl("\r\nTHIS COMMAND IS NOT FULLY IMPLEMENTED YET");
return(-1);
}
 
if (findfirst(dta, filespecptr, DOS_ATTR_RO | DOS_ATTR_HID | DOS_ATTR_SYS | DOS_ATTR_DIR | DOS_ATTR_ARC) != 0) return(-1);
 
outputnl(dta->fname);