From 3b8a5e75ad6886600901029294e900cd5701c81b Mon Sep 17 00:00:00 2001
From: mtardy <mahe5397@hotmail.fr>
Date: Thu, 9 Jul 2020 22:46:09 +0200
Subject: [PATCH] Change prim to exp in bracket map access even it might not
 make sense

---
 calc.leg | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/calc.leg b/calc.leg
index 2ef50c5..76d2c2c 100644
--- a/calc.leg
+++ b/calc.leg
@@ -84,7 +84,9 @@ sign	=	MINUS n:sign			{ set(n, Integer, value, -get(n, Integer, value));  $$ = n
 value	=	n:NUMBER				{ $$ = n }
 		|	NULL					{ $$ = null }
 		|	i:IDENT DOT s:STRING	{ $$ = map_get(get(i, Symbol, value), s) }
-		|	i:IDENT LBRAC p:prim RBRAC	{ $$ = map_get(get(i, Symbol, value), p) }
+# Here between the [ ] I put an exp but the only possible type is String so it is pretty limited
+# And I might directly write "prim"?
+		|	i:IDENT LBRAC p:exp RBRAC	{ $$ = map_get(get(i, Symbol, value), p) }
 		|	i:IDENT					{ $$ = get(i, Symbol, value) }
 
 -		=	[ \t\n\r]*