summaryrefslogtreecommitdiffstats
path: root/stdlib
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib')
-rw-r--r--stdlib/compiler.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/compiler.tl b/stdlib/compiler.tl
index fcfa1d67..174f5b26 100644
--- a/stdlib/compiler.tl
+++ b/stdlib/compiler.tl
@@ -53,7 +53,7 @@
(defun opt-controlled-diag (optval . args)
(caseq optval
(:error (compile-error . args))
- (:warn (compile-warning . args))))
+ ((t :warn) (compile-warning . args))))
(defstruct (frag oreg code : fvars ffuns pars) nil
oreg