diff options
| -rw-r--r-- | stdlib/match.tl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/stdlib/match.tl b/stdlib/match.tl index 1442eb56..8d014f11 100644 --- a/stdlib/match.tl +++ b/stdlib/match.tl @@ -603,6 +603,7 @@ (hash (compile-hash-match exp obj-var var-list)) (usr:scan (compile-scan-match exp obj-var var-list)) (exprs (compile-exprs-match exp obj-var var-list)) + (sys:quasi (compile-match exp obj-var var-list)) (t (iflet ((xfun [*match-macro* op])) (let* ((var-env (make-env (mapcar (lop cons 'sys:special) |