diff --git a/collects/compiler/decompile.rkt b/collects/compiler/decompile.rkt
index 67bdf9beb2..7e4586ef1b 100644
--- a/collects/compiler/decompile.rkt
+++ b/collects/compiler/decompile.rkt
@@ -138,7 +138,7 @@
         ,(let-values ([(globs defns) (decompile-prefix prefix)])
            `(let ()
              ,@defns
-             ,(decompile-expr rhs globs '(#%globals) closed))))]
+             ,(decompile-form rhs globs '(#%globals) closed))))]
     [(struct seq (forms))
      `(begin ,@(map (lambda (form)
                       (decompile-form form globs stack closed))