Moved class stuff to prelude.

2005-11-30 15:51:43 +00:00
parent 48b70b2d9b
commit 86df2a69b1
3 changed files with 214 additions and 159 deletions
--- a/src/Transfer/SyntaxToCore.hs
+++ b/src/Transfer/SyntaxToCore.hs
@@ -57,7 +57,7 @@ numberMetas = mapM f
               EMeta -> do
                        st <- get
                        put (st { nextMeta = nextMeta st + 1})
-                        return $ EVar $ Ident $ "?" ++ show (nextMeta st)
+                        return $ EVar $ Ident $ "?" ++ show (nextMeta st) -- FIXME: hack
               _ -> composOpM f t

 --