diff --git a/collects/parser-tools/lex.ss b/collects/parser-tools/lex.ss
index 3f2abc4..48e4418 100644
--- a/collects/parser-tools/lex.ss
+++ b/collects/parser-tools/lex.ss
@@ -111,7 +111,7 @@
 
   ;; make-lex-buf: input-port -> lex-buf
   (define (make-lex-buf ip)
-    (make-lex-buffer ip null null 0 0 0 null))
+    (make-lex-buffer ip null null 1 1 1 null))
 
   ;; next-char: lex-buf -> c
   ;; gets the next character from the buffer