From 4a8a0ec437630c68b152a17d7387897b5646dfe2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bart=C5=82omiej=20Przemys=C5=82aw=20Pluta?= Date: Wed, 3 Nov 2021 19:58:53 +0100 Subject: [PATCH] Create ampersand tokenizer --- app/Assembler.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/app/Assembler.hs b/app/Assembler.hs index f7d63e9..6e765e6 100644 --- a/app/Assembler.hs +++ b/app/Assembler.hs @@ -12,6 +12,7 @@ data Token = Operator VM.Op | StringLiteral String | Identifier String | Colon + | Ampersand | WhiteSpace | Comment String deriving (Eq, Show) @@ -132,6 +133,7 @@ tokenizers = anyTokenizer , sepTokenizer Char.isSpace tokenizeDecimal , tokenizeIdentifier , keywordTokenizer False ":" Colon + , keywordTokenizer False "&" Ampersand , tokenizeChar , tokenizeString ] \ No newline at end of file