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

diff --git a/compiler/hsSyn/HsPat.lhs-boot b/compiler/hsSyn/HsPat.lhs-boot
index f5d250e..5a8726f 100644
--- a/compiler/hsSyn/HsPat.lhs-boot
+++ b/compiler/hsSyn/HsPat.lhs-boot
@@ -1,10 +1,11 @@
 \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 Data i => Data (Pat i)
 \end{code}