X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FhsSyn%2FHsTypes.lhs;h=1ec096671f11f3bff136651fbc751001e5c8b825;hb=311b1cdfc9b1c311cc53482c461c18cba8885b2a;hp=ad7facb11eca767f365fe2725ab1c85fe681875e;hpb=190f24892156953d73b55401d0467a6f1a88ce5d;p=ghc-hetmet.git diff --git a/compiler/hsSyn/HsTypes.lhs b/compiler/hsSyn/HsTypes.lhs index ad7facb..1ec0966 100644 --- a/compiler/hsSyn/HsTypes.lhs +++ b/compiler/hsSyn/HsTypes.lhs @@ -1,7 +1,9 @@ % +% (c) The University of Glasgow 2006 % (c) The GRASP/AQUA Project, Glasgow University, 1992-1998 % -\section[HsTypes]{Abstract syntax: user-defined types} + +HsTypes: Abstract syntax: user-defined types \begin{code} module HsTypes ( @@ -30,14 +32,11 @@ module HsTypes ( import {-# SOURCE #-} HsExpr ( HsSplice, pprSplice ) -import Type ( Type ) -import {- Kind parts of -} - Type ( {- instance Outputable Kind -} Kind, - pprParendKind, pprKind, isLiftedTypeKind ) -import HsDoc ( LHsDoc, HsDoc ) -import BasicTypes ( IPName, Boxity, tupleParens ) -import SrcLoc ( Located(..), unLoc, noSrcSpan ) -import StaticFlags ( opt_PprStyle_Debug ) +import Type +import HsDoc +import BasicTypes +import SrcLoc +import StaticFlags import Outputable \end{code}