diff options
author | tomsmeding <tom.smeding@gmail.com> | 2019-11-14 11:44:38 +0100 |
---|---|---|
committer | tomsmeding <tom.smeding@gmail.com> | 2019-11-14 11:44:38 +0100 |
commit | a3c2420909c41eecbd52c1792bbfb823a49ad04f (patch) | |
tree | aa262f26ac696a9a334d383333d5c3904d68a69f /Compiler.hs | |
parent | 019fadfaf181a8cdaa79334de0b1463a725bda42 (diff) |
Equality operator
Diffstat (limited to 'Compiler.hs')
-rw-r--r-- | Compiler.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Compiler.hs b/Compiler.hs index 69b2fd8..c8771b9 100644 --- a/Compiler.hs +++ b/Compiler.hs @@ -74,7 +74,7 @@ newtype CM a = CM {unCM :: StateT CompState (Except String) a} -- TODO: extra info like number of arguments, dunno, might be useful builtinMap :: Map.Map Name () builtinMap = Map.fromList [ - ("+", ()), ("-", ()), ("<=", ()), ("print", ()), + ("+", ()), ("-", ()), ("<=", ()), ("=", ()), ("print", ()), ("list", ()), ("car", ()), ("cdr", ())] bbId :: BB -> Int |