prevent packed strings from appearing in all BASIC segments
This commit is contained in:
1 parent
540c1a6d7d
commit
1665098ac9
7 files changed
+41
-8
No files matched your search
@@ -18,6 +18,7 @@ SRCDIR_BASIC = $(SRCDIR_COMMON) \
|
||||
c64/basic/init \
|
||||
c64/basic/math \
|
||||
c64/basic/math_consts \
|
||||
c64/basic/packed_strings \
|
||||
c64/basic/rom_revision
|
||||
|
||||
SRCDIR_KERNAL = $(SRCDIR_COMMON) \
|
||||
|
||||
@@ -0,0 +1,7 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
|
||||
packed_message_chars:
|
||||
|
||||
put_packed_chars()
|
||||
@@ -0,0 +1,7 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
|
||||
packed_keywords:
|
||||
|
||||
put_packed_keywords()
|
||||
@@ -0,0 +1,7 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
|
||||
packed_message_tokens:
|
||||
|
||||
put_packed_tokens()
|
||||
@@ -0,0 +1,7 @@
|
||||
// #LAYOUT# STD * #TAKE
|
||||
// #LAYOUT# * BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
|
||||
packed_message_words:
|
||||
|
||||
put_packed_words()
|
||||
@@ -4,7 +4,6 @@
|
||||
|
||||
|
||||
ready_message:
|
||||
// See src/make_error_tables.c for packed message handling
|
||||
// information.
|
||||
|
||||
ldx #29
|
||||
jmp print_packed_message
|
||||
+11
-6
@@ -436,15 +436,16 @@ int main(void)
|
||||
exit(-1);
|
||||
}
|
||||
|
||||
printf("packed_message_chars:\n");
|
||||
printf(".macro put_packed_chars()\n{\n");
|
||||
for(int i=0;i<char_max;i++) {
|
||||
printf("\t.byte $%02X // '%c' ",char_freqs[i].c,char_freqs[i].c != 0xD ? char_freqs[i].c : 127);
|
||||
if (i<14) printf(" = $%x (nybl)\n",i+1);
|
||||
else if (i<(14+13)) printf(" = $F%x / $xF $%02X\n",i-14+1,char_freqs[i].c);
|
||||
else printf(" = $FE/F + $%02X\n",char_freqs[i].c);
|
||||
}
|
||||
printf("}\n");
|
||||
|
||||
printf("packed_message_tokens:\n");
|
||||
printf(".macro put_packed_tokens()\n{\n");
|
||||
for(int i=0;i<token_count;i++)
|
||||
{
|
||||
if ((token_count-i)>=8) {
|
||||
@@ -455,8 +456,9 @@ int main(void)
|
||||
} else
|
||||
printf("\t.byte $%02x\n",message_tokens[i]);
|
||||
}
|
||||
|
||||
printf("packed_message_words:\n");
|
||||
printf("}\n");
|
||||
|
||||
printf(".macro put_packed_words()\n{\n");
|
||||
for(int i=0;i<packed_len;i++)
|
||||
{
|
||||
if ((packed_len-i)>=8) {
|
||||
@@ -467,8 +469,9 @@ int main(void)
|
||||
} else
|
||||
printf("\t.byte $%02x\n",packed_words[i]);
|
||||
}
|
||||
printf("}\n");
|
||||
|
||||
printf("packed_keywords:\n");
|
||||
printf(".macro put_packed_keywords()\n{\n");
|
||||
for(int i=0;i<packedkey_len;i++)
|
||||
{
|
||||
if ((packedkey_len-i)>=8) {
|
||||
@@ -479,7 +482,9 @@ int main(void)
|
||||
} else
|
||||
printf("\t.byte $%02x\n",packed_keywords[i]);
|
||||
}
|
||||
printf("\t.label packed_keyword_table_len = $%X\n",packedkey_len);
|
||||
printf("}\n");
|
||||
|
||||
printf(".label packed_keyword_table_len = $%X\n",packedkey_len);
|
||||
|
||||
fprintf(stderr,"Error list takes %d bytes raw.\n",raw_size);
|
||||
fprintf(stderr,"%d token bytes used to encode all messages.\n",token_count);
|
||||
|
||||
Reference in new issue
Block a user