diff options
author | David Waern <david.waern@gmail.com> | 2010-03-30 01:10:20 +0000 |
---|---|---|
committer | David Waern <david.waern@gmail.com> | 2010-03-30 01:10:20 +0000 |
commit | f278f0676579f67075033a4f9857715909c4b71e (patch) | |
tree | 70316557d88f261e1af80ebe6c132374e32b7c15 /compiler/hsSyn/HsImpExp.lhs | |
parent | ef6e8211dee59eb7fa80a242391b89b52bd57f80 (diff) | |
download | haskell-f278f0676579f67075033a4f9857715909c4b71e.tar.gz |
Add Data and Typeable instances to HsSyn
The instances (and deriving declarations) have been taken from the ghc-syb
package.
Diffstat (limited to 'compiler/hsSyn/HsImpExp.lhs')
-rw-r--r-- | compiler/hsSyn/HsImpExp.lhs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/compiler/hsSyn/HsImpExp.lhs b/compiler/hsSyn/HsImpExp.lhs index 5870176278..dd24aedb2b 100644 --- a/compiler/hsSyn/HsImpExp.lhs +++ b/compiler/hsSyn/HsImpExp.lhs @@ -12,6 +12,7 @@ HsImpExp: Abstract syntax: imports, exports, interfaces -- any warnings in the module. See -- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings -- for details +{-# LANGUAGE DeriveDataTypeable #-} module HsImpExp where @@ -21,6 +22,8 @@ import HsDoc ( HsDocString ) import Outputable import FastString import SrcLoc ( Located(..) ) + +import Data.Data \end{code} %************************************************************************ @@ -42,7 +45,7 @@ data ImportDecl name ideclQualified :: Bool, -- ^ True => qualified ideclAs :: Maybe ModuleName, -- ^ as Module ideclHiding :: Maybe (Bool, [LIE name]) -- ^ (True => hiding, names) - } + } deriving (Data, Typeable) \end{code} \begin{code} @@ -91,6 +94,7 @@ data IE name | IEGroup Int HsDocString -- ^ Doc section heading | IEDoc HsDocString -- ^ Some documentation | IEDocNamed String -- ^ Reference to named doc + deriving (Data, Typeable) \end{code} \begin{code} |