From 7074f0dd4887f3aa595f54db5a4bbdce6920a1b3 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 2 Jan 2002 17:02:25 +0000
Subject: [PATCH] fixed offset counting

original commit: 309c1d410b5f8caef625b044573e9eb2cc41ac22
---
 collects/parser-tools/lex.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/parser-tools/lex.ss b/collects/parser-tools/lex.ss
index 7c19b0a..c96d37b 100644
--- a/collects/parser-tools/lex.ss
+++ b/collects/parser-tools/lex.ss
@@ -193,7 +193,7 @@
 		    (set-lex-buffer-line! 
 		     lb
 		     (sub1 (lex-buffer-line lb)))
-		    (set-lex-buffer-offset!
+		    (set-lex-buffer-col!
 		     lb
 		     (car (lex-buffer-line-lengths lb)))
 		    (set-lex-buffer-line-lengths!