stage1 使用切片表达字符串而非C字符串 提供属性系统

stage0/spl_mcode.c

@@ -20,6 +20,7 @@ void spl_prog_init(spl_prog_t *prog) {
     vec_init(prog->strtab);
     vec_init(prog->gdata);
     map_init(prog->symtab, MAP_HASH_STR, MAP_CMP_STR);
+    prog->debug = NULL;
 }
 
 void spl_prog_drop(spl_prog_t *prog) {
@@ -39,7 +40,9 @@ void spl_prog_drop(spl_prog_t *prog) {
     vec_for(prog->strtab, i) { free((void *)vec_at(prog->strtab, i)); }
     vec_free(prog->strtab);
     map_free(prog->symtab);
-    free(prog->debug);
+    if (prog->debug) {
+        free(prog->debug);
+    }
     prog->debug = NULL;
 }