diff --git a/applecorn.po b/applecorn.po index febe60b..b634969 100644 Binary files a/applecorn.po and b/applecorn.po differ diff --git a/auxmem.hostfs.s b/auxmem.hostfs.s index 592a61f..55e0337 100644 --- a/auxmem.hostfs.s +++ b/auxmem.hostfs.s @@ -418,8 +418,6 @@ CHKEOFRET FSCCAT PHA JSR PARSNAME ; Copy filename->MOSFILE PLA - CMP #10 ; *TEMP* - BEQ CATDONE ; *TEMP* ASL A ASL A ASL A ; 0101xxxx=*CAT diff --git a/mainmem.svc.s b/mainmem.svc.s index 3d36fd6..3ce1534 100644 --- a/mainmem.svc.s +++ b/mainmem.svc.s @@ -643,8 +643,9 @@ QUIT INC $3F4 ; Invalidate powerup byte DW QUITPL RTS -* Obtain catalog of current PREFIX dir +* Used for *CAT, *EX and *INFO CATALOG >>> ENTMAIN + STA CATARG ; Stash argument LDA MOSFILE ; Length of pathname BEQ :NOPATH ; If zero use prefix JSR PREPATH ; Preprocess pathname @@ -688,6 +689,8 @@ CATALOGRET >>> ENTMAIN BRA CATREENTRY +CATARG DB $00 ; A=5 *CAT, A=9 *EX, A=10 *INFO + * Set prefix. Used by *CHDIR to change directory SETPFX >>> ENTMAIN JSR PREPATH ; Preprocess pathname diff --git a/mainmem.wild.s b/mainmem.wild.s index d2b8ffc..9823207 100644 --- a/mainmem.wild.s +++ b/mainmem.wild.s @@ -271,7 +271,10 @@ MATCHENT LDA #