diff options
author | Juan J. Martinez <jjm@usebox.net> | 2022-08-13 17:17:45 +0100 |
---|---|---|
committer | Juan J. Martinez <jjm@usebox.net> | 2022-08-13 17:17:45 +0100 |
commit | f9069e14e80eb2c8b134a0297fa17b81742c8a03 (patch) | |
tree | a35cb4c60aaaa989a00466a586e35158def25546 | |
parent | 241b6af0794e020a29da9205c3843554ce0a43b5 (diff) | |
download | micro-lang-hs-f9069e14e80eb2c8b134a0297fa17b81742c8a03.tar.gz micro-lang-hs-f9069e14e80eb2c8b134a0297fa17b81742c8a03.zip |
Typo
-rw-r--r-- | src/Env.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -55,7 +55,7 @@ addSym (Env m parent) (id, typ, pos) = case getSym env id of addEnv :: Env -> Env addEnv env = Env Map.empty $ Just env --- | @addSymUniq e s@ add a local symbol @s@ to the enviroment @e@ if it +-- | @addSymUniq e s@ adds a local symbol @s@ to the enviroment @e@ if it -- doesn't exist. addSymUniq :: Env -> Sym -> Either Error Env addSymUniq ev (id, typ, pos) = case getSyml ev id of |