prevent packed strings from appearing in all BASIC segments

Makefile

@@ -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) \

c64/basic/packed_strings/packed_chars.s

@@ -0,0 +1,7 @@
+// #LAYOUT# STD *       #TAKE
+// #LAYOUT# *   BASIC_0 #TAKE
+// #LAYOUT# *   *       #IGNORE
+
+packed_message_chars:
+
+	put_packed_chars()

c64/basic/packed_strings/packed_keywords.s

@@ -0,0 +1,7 @@
+// #LAYOUT# STD *       #TAKE
+// #LAYOUT# *   BASIC_0 #TAKE
+// #LAYOUT# *   *       #IGNORE
+
+packed_keywords:
+
+	put_packed_keywords()

c64/basic/packed_strings/packed_tokens.s

@@ -0,0 +1,7 @@
+// #LAYOUT# STD *       #TAKE
+// #LAYOUT# *   BASIC_0 #TAKE
+// #LAYOUT# *   *       #IGNORE
+
+packed_message_tokens:
+
+	put_packed_tokens()

c64/basic/packed_strings/packed_words.s

@@ -0,0 +1,7 @@
+// #LAYOUT# STD *       #TAKE
+// #LAYOUT# *   BASIC_0 #TAKE
+// #LAYOUT# *   *       #IGNORE
+
+packed_message_words:
+
+	put_packed_words()

c64/basic/ready_message.s

@@ -4,7 +4,6 @@
 
 
 ready_message:
-	// See src/make_error_tables.c for packed message handling
+
-	// information.
 	ldx #29
 	jmp print_packed_message

tools/compress_text.c

@@ -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("}\n");
-  printf("packed_message_words:\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);