diff --git a/collects/scheme/match/parse-helper.ss b/collects/scheme/match/parse-helper.ss
index 73eb8c705c..acc3e8c6b2 100644
--- a/collects/scheme/match/parse-helper.ss
+++ b/collects/scheme/match/parse-helper.ss
@@ -18,7 +18,7 @@
   (cond [(eq? '_ (syntax-e x))
          (make-Dummy x)]
         [(ddk? x) (raise-syntax-error 'match "incorrect use of ... in pattern"
-                                      #'x)]
+                                      x)]
         [else (make-Var x)]))
 
 ;; stx : syntax of pattern, starting with quote