Commit 2204448d authored by Björn Peemöller 's avatar Björn Peemöller
Browse files

Merge branch 'master' of /home/bjp/public_html/repos/curry-frontend

Conflicts:

	src/Generators/GenFlatCurry.hs
parents a4486257 5b0ed1f7
......@@ -921,7 +921,7 @@ lookupIdArity qid = gets (lookupA . typeEnvE)
getTypeOf :: Ident -> FlatState (Maybe TypeExpr)
getTypeOf _ident = do
getTypeOf ident = do
valEnv <- gets typeEnvE
case lookupValue ident valEnv of
Value _ _ (ForAll _ t) : _ -> do
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment