From fc436d8be41b37b56b1260eb9aeda3640da28234 Mon Sep 17 00:00:00 2001 From: Koichi Nakamura Date: Sun, 10 Jan 2021 16:05:19 +0900 Subject: [PATCH] increment lineno --- bootstrap.fs | 1 + 1 file changed, 1 insertion(+) diff --git a/bootstrap.fs b/bootstrap.fs index 3778a71..575074e 100644 --- a/bootstrap.fs +++ b/bootstrap.fs @@ -1807,6 +1807,7 @@ variable source-buffer-end source-buffer source-buffer-end ! \ the buffer is empty source-buffer source-buffer-pos ! source-buffer source-buffer-end ! + increment-lineno source-buffer BUFSIZE inputstreams @ input>file @ read-line throw if