stage1 修复错误 提供类型检查

stage1/spl_comp.c

@@ -68,6 +68,9 @@ void spl_comp_reset(spl_comp_t *ctx) {
 }
 
 void spl_comp_error(spl_comp_t *ctx, const char *fmt, ...) {
+    if (ctx->has_error)
+        return;
+
     char body[COMP_ERROR_MAX - 64];
     va_list args;
     va_start(args, fmt);
@@ -83,6 +86,9 @@ void spl_comp_error(spl_comp_t *ctx, const char *fmt, ...) {
 }
 
 void spl_comp_err_tok(spl_comp_t *ctx, spl_tok_t *tok, const char *fmt, ...) {
+    if (ctx->has_error)
+        return;
+
     char body[COMP_ERROR_MAX - 64];
     va_list args;
     va_start(args, fmt);