Support for additional integer literal implemented

Author: AStenbaek

compiler/src/Lexer.x

@@ -115,6 +115,7 @@ tokens:-
 <state_dclabel> "#root-integrity"       { mkL TokenDCRootInteg }
 <state_dclabel> "#null-confidentiality" { mkL TokenDCNullConf }
 <state_dclabel> "#null-integrity"       { mkL TokenDCNullInteg }
+-- Integer literal parsing inspired by https://github.com/ocaml/ocaml/blob/trunk/parsing/lexer.mll
 <0>   @declit                        { mkLs (\s -> TokenNum (read (filter (/='_') s))) }
 <0>   @binlit                        { mkLs (\s -> TokenNum (fst (head (readBin (filter (/='_') (drop 2 s)))))) }
 <0>   @octlit                        { mkLs (\s -> TokenNum (fst (head (readOct (filter (/='_') (drop 2 s)))))) }

tests/cmp/int-lit3.golden

@@ -0,0 +1,3 @@
+Parse Error:
+Invalid literal 0b12
+ at 1:5 before end of line

tests/cmp/int-lit3.trp

@@ -0,0 +1 @@
+0b12

tests/cmp/int-lit4.golden

@@ -0,0 +1,3 @@
+Parse Error:
+Invalid literal 0o8
+ at 1:4 before end of line

tests/cmp/int-lit4.trp

@@ -0,0 +1 @@
+0o8