blob: 16db4e8e7ae33a3887918229633ad04e54e43c61 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
{-
(c) The University of Glasgow 2006
(c) The GRASP/AQUA Project, Glasgow University, 1992-1998
-}
module TcInstDcls ( tcInstDecls1 ) where
import HsSyn
import TcRnTypes
import TcEnv( InstInfo )
import TcDeriv
import Name
-- We need this because of the mutual recursion
-- between TcTyClsDecls and TcInstDcls
tcInstDecls1 :: [LInstDecl Name] -> TcM (TcGblEnv, [InstInfo Name], [DerivInfo])
|