diff --git a/collects/mzlib/control.ss b/collects/mzlib/control.ss
index 4294f084f9..ca925ba4bc 100644
--- a/collects/mzlib/control.ss
+++ b/collects/mzlib/control.ss
@@ -105,7 +105,7 @@
        (begin
          (define-syntax prompt
            (syntax-rules ()
-             [(reset expr0 expr (... ...))
+             [(prompt expr0 expr (... ...))
               (call-with-prompt (lambda () expr0 expr (... ...)))]))
          (define-syntax prompt-at
            (syntax-rules ()