preparation for CBM partitions support

This commit is contained in:
FeralChild64 committed 2021-03-03 17:41:46 +01:00
1 parent 384d5a4fb2
commit 93bf5afcee
3 files changed
+5 -4

No files matched your search

+1
View File
@@ -40,6 +40,7 @@ dir_types:
!pet "prg", $00 ; PRG !pet "prg", $00 ; PRG
!pet "usr", $00 ; USR !pet "usr", $00 ; USR
!pet "rel", $00 ; REL !pet "rel", $00 ; REL
!pet "cbm", $00 ; CBM-style partition
!pet "dir", $00 ; directory !pet "dir", $00 ; directory
; File types below are not mandatory ; File types below are not mandatory
@@ -114,7 +114,7 @@ fs_hvsr_util_nextdirentry:
; Set the type to directory ; Set the type to directory
lda #$05 lda #$06
bra @detect_attributes bra @detect_attributes
@entity_file: @entity_file:
@@ -169,7 +169,7 @@ fs_hvsr_util_nextdirentry:
@lpext_found: @lpext_found:
cpy #$10 cpy #$14
+beq fs_hvsr_util_nextdirentry ; file extension 'DIR' does not mean this is a directory +beq fs_hvsr_util_nextdirentry ; file extension 'DIR' does not mean this is a directory
tya tya
@@ -179,7 +179,7 @@ fs_hvsr_util_nextdirentry:
ror ror
inc 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 bcc @detect_attributes
ora #$40 ora #$40
+1 -1
View File
@@ -85,7 +85,7 @@ util_dir_filter:
@require_dir: @require_dir:
lda #$05 lda #$06
eor PAR_FTYPE eor PAR_FTYPE
and #%00111111 and #%00111111