From 05cdcb6a1cc3d4de3a0b3d12d4babcd6438b4754 Mon Sep 17 00:00:00 2001 From: _ov4 Date: Tue, 13 Oct 2026 13:45:03 +0000 Subject: Add record-derived classes with explicit field visibility Co-Authored-By: Claude Fable 5.1 --- lib/Lexer/Lexer.cc | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'lib/Lexer') diff --git a/lib/Lexer/Lexer.cc b/lib/Lexer/Lexer.cc index 4f7f997..a71b37c 100644 --- a/lib/Lexer/Lexer.cc +++ b/lib/Lexer/Lexer.cc @@ -132,6 +132,10 @@ int Lexer::gettok() { if (IdentifierStr == "ENDTYPE") return tok_endtype; if (IdentifierStr == "SET") return tok_set; if (IdentifierStr == "DEFINE") return tok_define; + if (IdentifierStr == "CLASS") return tok_class; + if (IdentifierStr == "ENDCLASS") return tok_endclass; + if (IdentifierStr == "PUBLIC") return tok_public; + if (IdentifierStr == "PRIVATE") return tok_private; return tok_identifier; } -- cgit v1.3.1-4-g156e