set mark should only work for regular or soft link files

This commit is contained in:
Kelvin Sherlock 2015-09-14 12:19:56 -04:00
parent 86be98ef7f
commit 9b18dd8aa4

View File

@ -39,6 +39,21 @@ set_mark procname export
jsr init_fcr jsr init_fcr
; can only read from regular files or links.
lda disk_inode.mode
and #S_IFMT
cmp #S_IFREG
beq @ok
cmp #S_IFLNK
beq @ok
lda #bad_store_type
sec
rtl
@ok
ldy #fcr.mark ldy #fcr.mark
lda [my_fcr],y lda [my_fcr],y
sta mark sta mark