compiler/hsSyn/HsPat.lhs-boot


1
2
3
4
5
6
7
8
9
10
11
12

\begin{code}
module HsPat where
import SrcLoc( Located )

import Data.Data

data Pat i
type LPat i = Located (Pat i)

instance Typeable1 Pat
instance Data i => Data (Pat i)
\end{code}