6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-29 10:29:30 +00:00
Code Issues Projects Releases Wiki Activity

Allow file names up to 16 chars

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@1814 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2002-12-21 00:06:41 +00:00
parent d0c237bcd8
commit 9227123e16
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
libsrc/cbm/filename.s
View File

@ -91,7 +91,7 @@ namecheck:
; Check the maximum length, store the character
nameok: ldx fnlen
cpx #16 ; Maximum length reached?
cpx #18 ; Maximum length reached?
bcs invalidname
lda (ptr1),y ; Reload char
sta fnbuf,x ; Store into buffer
@ -130,7 +130,7 @@ namedone:
.proc fncomplete
pha ; Save mode
pha ; Save mode
ldx fnlen
lda #','
sta fnbuf,x
@ -167,3 +167,4 @@ fnchars:.byte ".,-_+()"
fncharcount = *-fnchars