diff --git a/private/compiler.rkt b/private/compiler.rkt index cb54182..e2127d9 100644 --- a/private/compiler.rkt +++ b/private/compiler.rkt @@ -72,4 +72,4 @@ (port-count-lines! p) (match-define (list source-name line column position span) srcloc) (set-port-next-location! p line column position) - (read-syntax source-name p)) + (syntax-property (read-syntax source-name p) 'original-for-check-syntax #t))