preparation for CBM partitions support
This commit is contained in:
1 parent
384d5a4fb2
commit
93bf5afcee
3 files changed
+5
-4
No files matched your search
@@ -40,6 +40,7 @@ dir_types:
|
||||
!pet "prg", $00 ; PRG
|
||||
!pet "usr", $00 ; USR
|
||||
!pet "rel", $00 ; REL
|
||||
!pet "cbm", $00 ; CBM-style partition
|
||||
!pet "dir", $00 ; directory
|
||||
|
||||
; File types below are not mandatory
|
||||
|
||||
@@ -114,7 +114,7 @@ fs_hvsr_util_nextdirentry:
|
||||
|
||||
; Set the type to directory
|
||||
|
||||
lda #$05
|
||||
lda #$06
|
||||
bra @detect_attributes
|
||||
|
||||
@entity_file:
|
||||
@@ -169,7 +169,7 @@ fs_hvsr_util_nextdirentry:
|
||||
|
||||
@lpext_found:
|
||||
|
||||
cpy #$10
|
||||
cpy #$14
|
||||
+beq fs_hvsr_util_nextdirentry ; file extension 'DIR' does not mean this is a directory
|
||||
tya
|
||||
|
||||
@@ -179,7 +179,7 @@ fs_hvsr_util_nextdirentry:
|
||||
ror
|
||||
inc
|
||||
|
||||
cmp #$06 ; mark some file types (not SEQ/PRG/USR/REL/DIR) as read-only
|
||||
cmp #$07 ; mark some file types (not SEQ/PRG/USR/REL/CBM/DIR) as read-only
|
||||
bcc @detect_attributes
|
||||
ora #$40
|
||||
|
||||
|
||||
@@ -85,7 +85,7 @@ util_dir_filter:
|
||||
|
||||
@require_dir:
|
||||
|
||||
lda #$05
|
||||
lda #$06
|
||||
|
||||
eor PAR_FTYPE
|
||||
and #%00111111
|
||||
|
||||
Reference in new issue
Block a user