From 437a53717ce7be9639e9d13ef39898e29a064bf0 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Fri, 20 Nov 2015 11:55:55 -0500 Subject: [PATCH] Always set original --- private/compiler.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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))