diff --git a/wip-duuqnd/user-side-compiler/error-handling.lisp b/wip-duuqnd/user-side-compiler/error-handling.lisp index cc41c17..4bfc669 100644 --- a/wip-duuqnd/user-side-compiler/error-handling.lisp +++ b/wip-duuqnd/user-side-compiler/error-handling.lisp @@ -36,10 +36,10 @@ (point-out-source (source c)))))) (define-condition tokenizer-error (usc-error) - ((%context-string :initform "Error in tokenizer:"))) + ((%context-string :initform "Tokenizing error:"))) (define-condition parser-error (usc-error) - ()) + ((%context-string :initform "Syntax error:"))) (defun error-parser (source format-control &rest format-arguments)