diff options
| author | bringert <bringert@cs.chalmers.se> | 2005-11-30 15:51:43 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2005-11-30 15:51:43 +0000 |
| commit | 86df2a69b149c1f4ff2cb9139447f5a6faccd483 (patch) | |
| tree | 58bb4788a18f76d0aa6e3bb323971b78c80aae2f /src/Transfer/SyntaxToCore.hs | |
| parent | 48b70b2d9b735c2ec4dcdd210b3cef0addc8657f (diff) | |
Moved class stuff to prelude.
Diffstat (limited to 'src/Transfer/SyntaxToCore.hs')
| -rw-r--r-- | src/Transfer/SyntaxToCore.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Transfer/SyntaxToCore.hs b/src/Transfer/SyntaxToCore.hs index 1b17e4a3f..3a5bdac20 100644 --- 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 -- |