diff --git a/libsrc/cbm/filename.s b/libsrc/cbm/filename.s index 0674db07e..37caef21d 100644 --- a/libsrc/cbm/filename.s +++ b/libsrc/cbm/filename.s @@ -125,6 +125,15 @@ drivedone: stx fnbuf+1 sta fnbuf+0 +; Add the file mask + + lda #':' + sta fnbuf+2 + lda #'*' + sta fnbuf+3 + lda #4 + sta fnlen + ; No need to check the name. Length is already 2 lda #0 ; ok flag diff --git a/libsrc/cbm/open.s b/libsrc/cbm/open.s index 678dd0441..dadf82d33 100644 --- a/libsrc/cbm/open.s +++ b/libsrc/cbm/open.s @@ -96,7 +96,7 @@ parmok: jsr popax ; Get flags ; Invalid open mode -einval: lda #EINVAL + lda #EINVAL ; Error entry. Sets _errno, clears _oserror, returns -1 @@ -119,14 +119,11 @@ closeandexit: oserror:jmp __mappederrno - ; Read bit is set. Add an 'r' to the name -doread: ldy fnisfile ; File or directory? - beq isdir ; Don't add ,R for directory - lda #'r' +doread: lda #'r' jsr fnaddmode ; Add the mode to the name -isdir: lda #LFN_READ + lda #LFN_READ bne common ; Branch always ; If O_TRUNC is set, scratch the file, but ignore any errors @@ -202,4 +199,4 @@ nofile: ; ... else use SA=0 (read) .endproc - +