diff --git a/lib/chibi/test.scm b/lib/chibi/test.scm
index d7c72946..447529ca 100644
--- a/lib/chibi/test.scm
+++ b/lib/chibi/test.scm
@@ -51,11 +51,13 @@
 ;;> defaults to a printed summary of \var{expr}.
 
 (define-syntax test
-  (syntax-rules ()
+  (syntax-rules (quote)
     ((test expect expr)
      (test #f expect expr))
     ((test name expect (expr ...))
      (test-propagate-info name expect (expr ...) ()))
+    ((test name 'expect expr)
+     (test-propagate-info name 'expect expr ()))
     ((test name (expect ...) expr)
      (test-syntax-error
       'test