diff --git a/collects/tests/mzscheme/stx.ss b/collects/tests/mzscheme/stx.ss index 480964ce07..f6173ce084 100644 --- a/collects/tests/mzscheme/stx.ss +++ b/collects/tests/mzscheme/stx.ss @@ -454,7 +454,7 @@ (let ([b (identifier-binding (syntax-case (expand #'(module m scheme/base (require (only-in (lib "lang/htdp-intermediate.ss") [cons bcons])) bcons)) () - [(mod m mz (#%mod-beg req _void (app call-with-values (lambda () cons) print) void)) + [(mod m mz (#%mod-beg req (app call-with-values (lambda () cons) print))) (let ([s (syntax cons)]) (test 'bcons syntax-e s) s)]))])