Commit 2540a99f authored by sewardj's avatar sewardj
Browse files

[project @ 2000-10-16 16:34:33 by sewardj]

Make compile.
parent 0591c2b9
...@@ -4,7 +4,7 @@ ...@@ -4,7 +4,7 @@
\section[TcBinds]{TcBinds} \section[TcBinds]{TcBinds}
\begin{code} \begin{code}
module TcBinds ( tcBindsAndThen, tcTopBinds,y module TcBinds ( tcBindsAndThen, tcTopBinds,
tcSpecSigs, tcBindWithSigs ) where tcSpecSigs, tcBindWithSigs ) where
#include "HsVersions.h" #include "HsVersions.h"
...@@ -58,7 +58,7 @@ import Util ( isIn ) ...@@ -58,7 +58,7 @@ import Util ( isIn )
import Maybes ( maybeToBool ) import Maybes ( maybeToBool )
import BasicTypes ( TopLevelFlag(..), RecFlag(..), isNotTopLevel ) import BasicTypes ( TopLevelFlag(..), RecFlag(..), isNotTopLevel )
import FiniteMap ( listToFM, lookupFM ) import FiniteMap ( listToFM, lookupFM )
import PrelNames ( ioTyConKey, mainKey, hasKey ) import PrelNames ( ioTyConName, mainKey, hasKey )
import Outputable import Outputable
\end{code} \end{code}
......
__interface TcExpr 1 0 where __interface TcExpr 1 0 where
__export TcExpr tcExpr ; __export TcExpr tcExpr ;
1 tcExpr :: __forall [s] => 1 tcExpr ::
RnHsSyn.RenamedHsExpr RnHsSyn.RenamedHsExpr
-> TcMonad.TcType -> TcMonad.TcType
-> TcMonad.TcM s (TcHsSyn.TcExpr, Inst.LIE) ; -> TcMonad.TcM (TcHsSyn.TcExpr, Inst.LIE) ;
__interface TcMatches 1 0 where __interface TcMatches 1 0 where
__export TcMatches tcGRHSs tcMatchesFun; __export TcMatches tcGRHSs tcMatchesFun;
1 tcGRHSs :: __forall [s] => 1 tcGRHSs ::
RnHsSyn.RenamedGRHSs RnHsSyn.RenamedGRHSs
-> TcMonad.TcType -> TcMonad.TcType
-> HsExpr.StmtCtxt -> HsExpr.StmtCtxt
-> TcMonad.TcM s (TcHsSyn.TcGRHSs, Inst.LIE) ; -> TcMonad.TcM (TcHsSyn.TcGRHSs, Inst.LIE) ;
1 tcMatchesFun :: __forall [s] => 1 tcMatchesFun ::
[(Name.Name,Var.Id)] [(Name.Name,Var.Id)]
-> Name.Name -> Name.Name
-> TcMonad.TcType -> TcMonad.TcType
-> [RnHsSyn.RenamedMatch] -> [RnHsSyn.RenamedMatch]
-> TcMonad.TcM s ([TcHsSyn.TcMatch], Inst.LIE) ; -> TcMonad.TcM ([TcHsSyn.TcMatch], Inst.LIE) ;
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