X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FhsSyn%2FHsPat.lhs-boot;h=7ba338e41fb06d184c05583a7237d3619355bd5f;hp=f5d250eb975ffc5fe589b7f99d085ad42c99a92b;hb=a3bab0506498db41853543558c52a4fda0d183af;hpb=f3399c446c7507d46d6cc550aa2fe7027dbc1b5b

diff --git a/compiler/hsSyn/HsPat.lhs-boot b/compiler/hsSyn/HsPat.lhs-boot
index f5d250e..7ba338e 100644
--- a/compiler/hsSyn/HsPat.lhs-boot
+++ b/compiler/hsSyn/HsPat.lhs-boot
@@ -1,10 +1,12 @@
 \begin{code}
 module HsPat where
-import SrcLoc( Located, SrcSpan )
-import FastString ( FastString )
+import SrcLoc( Located )
 
-data HsQuasiQuote i = HsQuasiQuote i i SrcSpan FastString
+import Data.Data
 
 data Pat i
 type LPat i = Located (Pat i)
+
+instance Typeable1 Pat
+instance Data i => Data (Pat i)
 \end{code}