diff --git a/collects/typed-scheme/typed-scheme.ss b/collects/typed-scheme/typed-scheme.ss index f01ba63b..63fc8ba7 100644 --- a/collects/typed-scheme/typed-scheme.ss +++ b/collects/typed-scheme/typed-scheme.ss @@ -70,8 +70,9 @@ ;; local-expand the module ;; pmb = #%plain-module-begin [with-syntax ([new-mod - (local-expand #`(#%plain-module-begin - forms ...) + (local-expand (syntax/loc stx + (#%plain-module-begin + forms ...)) 'module-begin null)])] [with-syntax ([(pmb body2 ...) #'new-mod])]