From d6f9d98289e5117a9ad45ac41f7537f232e33996 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Wed, 7 Nov 2012 11:24:06 -0600 Subject: [PATCH] make the position and position-token structs transparent (these seem to only not be transparent because that is the default) original commit: facea9fe43ef37bd3c2f0f42a35ba12bd1bc88b7 --- collects/parser-tools/private-lex/token.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/parser-tools/private-lex/token.rkt b/collects/parser-tools/private-lex/token.rkt index 1d2dc0d..6618a57 100644 --- a/collects/parser-tools/private-lex/token.rkt +++ b/collects/parser-tools/private-lex/token.rkt @@ -83,7 +83,7 @@ (define-syntax define-tokens (make-define-tokens #f)) (define-syntax define-empty-tokens (make-define-tokens #t)) - (define-struct position (offset line col)) - (define-struct position-token (token start-pos end-pos)) + (define-struct position (offset line col) #f) + (define-struct position-token (token start-pos end-pos) #f) )