From f9069e14e80eb2c8b134a0297fa17b81742c8a03 Mon Sep 17 00:00:00 2001 From: "Juan J. Martinez" Date: Sat, 13 Aug 2022 17:17:45 +0100 Subject: Typo --- src/Env.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Env.hs') diff --git a/src/Env.hs b/src/Env.hs index 678903e..1b98e9f 100644 --- a/src/Env.hs +++ b/src/Env.hs @@ -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 -- cgit v1.2.3