From 6f77b77e308c45a6f02df0eed3e69a16d07cbb2c Mon Sep 17 00:00:00 2001 From: Scott Owens Date: Sat, 27 Apr 2002 22:53:59 +0000 Subject: [PATCH] *** empty log message *** original commit: 7ca29be7d5a98a3baaee7932228bb286afd3e022 --- collects/parser-tools/examples/read.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/parser-tools/examples/read.ss b/collects/parser-tools/examples/read.ss index 853ff14..518cb9f 100644 --- a/collects/parser-tools/examples/read.ss +++ b/collects/parser-tools/examples/read.ss @@ -191,8 +191,8 @@ #f value (list source - (add1 (position-line start-pos)) - (add1 (position-col start-pos)) + (position-line start-pos) + (position-col start-pos) (position-offset start-pos) (- (position-offset end-pos) (position-offset start-pos)))