From 34bad5af4308abebbd73ad8c6d539e9dee84179a Mon Sep 17 00:00:00 2001
From: Laborratte5 <laborratte5@gmail.com>
Date: Mon, 15 Jul 2024 23:49:18 +0200
Subject: [PATCH] refactor: Rename Tokens

---
 app/Lexer.hs | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/app/Lexer.hs b/app/Lexer.hs
index e5d9794..8164f48 100644
--- a/app/Lexer.hs
+++ b/app/Lexer.hs
@@ -1,9 +1,9 @@
 module Lexer where
 
 data Token = Plus
-           | Minus
-           | Multiply
-           | Divide
+           | Hyphen
+           | Asterisk
+           | ForwardSlash
            | Integer Int
            | LBrace
            | RBrace
@@ -17,9 +17,9 @@ lex' "" tokens _ = tokens
 lex' (' ':xs) tokens orgLength = lex' xs tokens orgLength
 lex' (x:xs) tokens orgLength = case x of
     '+' -> lex' xs (Plus:tokens) orgLength
-    '-' -> lex' xs (Minus:tokens) orgLength
-    '*' -> lex' xs (Multiply:tokens) orgLength
-    '/' -> lex' xs (Divide:tokens) orgLength
+    '-' -> lex' xs (Hyphen:tokens) orgLength
+    '*' -> lex' xs (Asterisk:tokens) orgLength
+    '/' -> lex' xs (ForwardSlash:tokens) orgLength
     '(' -> lex' xs (LBrace:tokens) orgLength
     ')' -> lex' xs (RBrace:tokens) orgLength
     _ -> lexNumbers (x:xs) tokens orgLength