commit aca807e544ad6b93232c309810a63272a11d4f7f
parent cb15c520e420cfcdfb5a77b58a2b5e1462e998e2
Author: citbl <citbl@citbl.org>
Date: Thu, 4 Jun 2026 22:49:12 +1000
minor
Diffstat:
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/src/parser.adb b/src/parser.adb
@@ -31,7 +31,9 @@ package body Parser is
else
return Token'(Kind => EOF, Lexeme => To_Unbounded_String (""), Line => 1, Col => 1);
end if;
- end Peek;
+ end Peek2;
+
+ -- consume
function Consume (P : in out Parser) return Token is
T : Token;