Add Data and Typeable instances to HsSyn

[ghc-hetmet.git] / compiler / hsSyn / HsPat.lhs-boot

diff --git a/compiler/hsSyn/HsPat.lhs-boot b/compiler/hsSyn/HsPat.lhs-boot
index d5b685c..5a8726f 100644 (file)
--- a/compiler/hsSyn/HsPat.lhs-boot
+++ b/compiler/hsSyn/HsPat.lhs-boot
@@ -2,6 +2,10 @@
 module HsPat where
 import SrcLoc( Located )
 
+import Data.Data
+
 data Pat i
 type LPat i = Located (Pat i)
+
+instance Data i => Data (Pat i)
 \end{code}