diff options
| author | riton <riton@riton.home> | 2025-07-12 04:27:10 +0300 |
|---|---|---|
| committer | riton <riton@riton.home> | 2025-07-12 04:27:10 +0300 |
| commit | 8afcee0b1087dad6c821aa2ee1e917e3301f0e81 (patch) | |
| tree | 23c4f860a3e860838a0809f649776683c464a38e /src/util.lisp | |
| parent | 844020c42876479db3b2a881a528ac9b10c7e081 (diff) | |
refactor: token-type uses deftype instead of int enum
Diffstat (limited to 'src/util.lisp')
| -rw-r--r-- | src/util.lisp | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/util.lisp b/src/util.lisp index cf3bc76..5cf28fa 100644 --- a/src/util.lisp +++ b/src/util.lisp @@ -1,8 +1,5 @@ (in-package :monkey) -(defun concat-symbols (sym1 sym2) - (intern (format nil "~a-~a" (symbol-name sym1) (symbol-name sym2)))) - (eval-when (:compile-toplevel :load-toplevel :execute) (defmacro eval-always (&body body) `(eval-when (:compile-toplevel :load-toplevel :execute) |