From a01c827935803fcdbc35aeab580c84b4dd38d832 Mon Sep 17 00:00:00 2001
From: Mylloon <kennel.anri@tutanota.com>
Date: Tue, 13 Dec 2022 22:45:43 +0100
Subject: [PATCH] support negative int

---
 lexer.mll | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lexer.mll b/lexer.mll
index 0745539..f91dd7e 100644
--- a/lexer.mll
+++ b/lexer.mll
@@ -5,7 +5,7 @@
 }
 
 let alpha = ['a'-'z' 'A'-'Z']
-let num   = ['0'-'9']
+let num   = '-'? ['0'-'9']
 let bool  = "true" | "false"
 let ident = alpha (alpha | num | '-' | '_')*