blob: e7240903e49952c2ff3df511cdfb8ad32445698b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
{-
(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 HsExtension ( GhcRn )
-- We need this because of the mutual recursion
-- between TcTyClsDecls and TcInstDcls
tcInstDecls1 :: [LInstDecl GhcRn]
-> TcM (TcGblEnv, [InstInfo GhcRn], [DerivInfo])
|