nightshade

commit 751f1436fcd76eb98b216ff1948bc9ee17e98b31
parent 165ab1e1d33e678e701fb26fad9d0e90c659faf8
Author: citbl <citbl@citbl.org>
Date:   Sun, 31 May 2026 19:52:36 +1000

wip

Diffstat:
M
src/lexer.adb
 | 
26
++++++++++++++++++++++++++

1 file changed, 26 insertions(+), 0 deletions(-)
diff --git a/src/lexer.adb b/src/lexer.adb
@@ -74,6 +74,32 @@ package body Lexer is
          null;
       end loop;
    end Skip_Spaces_Comments;
+   -- make ident
+
+   function make_ident (l : in out lexer) return token is
+      c     : character;
+      t     : token;
+      tk    : token_kind;
+      start : natural;
+   begin
+      start := l.pos;
+
+      while true loop
+         c := peek (l);
+         if is_alphanumeric (c) or c = '_' then
+            nudge (l);
+         else
+            exit;
+         end if;
+      end loop;
+   end make_ident;
+
+   function make_ident (l : in out lexer) return token is
+
+   begin
+
+		null;
+   end;
 
    -- make number