summaryrefslogtreecommitdiff
path: root/source
diff options
context:
space:
mode:
Diffstat (limited to 'source')
-rw-r--r--source/mod_student/lexer.mll7
-rw-r--r--source/mod_student/parser.mly7
2 files changed, 12 insertions, 2 deletions
diff --git a/source/mod_student/lexer.mll b/source/mod_student/lexer.mll
index 4cd656c..f785e52 100644
--- a/source/mod_student/lexer.mll
+++ b/source/mod_student/lexer.mll
@@ -54,9 +54,12 @@
(* vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
* Miejsce na twoje reguĊ‚y
*)
-
+ | "("
+ { LPAREN }
+ | ")"
+ { RPAREN }
| identifier as id
- { failwith id }
+ { IDENTIFIER id }
(* ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
----------------------------------------------------------------------------- *)
diff --git a/source/mod_student/parser.mly b/source/mod_student/parser.mly
index 3eacf51..d2216a6 100644
--- a/source/mod_student/parser.mly
+++ b/source/mod_student/parser.mly
@@ -30,7 +30,14 @@ let mkTag =
*)
%token EOF
+%token LPAREN
+%token RPAREN
+%token LBRACKET
+%token RBRACKET
+%token <int>INT
%token <string>IDENTIFIER
+%token <char>CHAR
+%token <bool>BOOL
(* ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
----------------------------------------------------------------------------- *)