From 3a758953f9f934b654a5ded9cfed220e5ae8e21a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Pawe=C5=82=20Dybiec?= Date: Sat, 3 Nov 2018 17:57:42 +0100 Subject: Add first tokens --- source/mod_student/lexer.mll | 7 +++++-- source/mod_student/parser.mly | 7 +++++++ 2 files changed, 12 insertions(+), 2 deletions(-) (limited to 'source') 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 %token IDENTIFIER +%token CHAR +%token BOOL (* ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ ----------------------------------------------------------------------------- *) -- cgit v1.2.3