diff options
| author | riton <riton@riton.home> | 2025-07-12 20:02:22 +0300 |
|---|---|---|
| committer | riton <riton@riton.home> | 2025-07-12 20:05:21 +0300 |
| commit | 44efb492349025a195a3b402ec580623ad61723f (patch) | |
| tree | a93f9693283598e5e3d85627624789ec136923c7 /src/token.lisp | |
| parent | 8afcee0b1087dad6c821aa2ee1e917e3301f0e81 (diff) | |
defined deftest macro
Squashed commit of the following:
commit b7779c8d9013d52f4fa94970ac7346ea619eb37c
Author: riton <riton@riton.home>
Date: Sat Jul 12 15:41:56 2025 +0300
shorthands for some of the test definition tokens
commit d37ba8faf43f3a8b54b88bc8df4ab2995935b782
Author: riton <riton@riton.home>
Date: Sat Jul 12 15:23:21 2025 +0300
run all tests
commit dfc1b2dfaeb50825b7d609ce6b27dc0f8818afb0
Author: riton <riton@riton.home>
Date: Sat Jul 12 14:55:44 2025 +0300
deftest macro
Diffstat (limited to 'src/token.lisp')
| -rw-r--r-- | src/token.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/token.lisp b/src/token.lisp index f6536ac..8d37734 100644 --- a/src/token.lisp +++ b/src/token.lisp @@ -103,7 +103,7 @@ (defmethod print-object ((token token) stream) (print-unreadable-object (token stream :type t :identity t) - (princ (literal token) stream))) + (format stream "\"~a\"" (literal token)))) (defun as-token (token-type) (multiple-value-bind (str ok) (token->string token-type) |