diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2019-09-11 21:19:39 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-09-20 05:14:34 -0400 |
| commit | 5119296440e6846c553c72b8a93afc5ecfa576f0 (patch) | |
| tree | ff508560a4996afffb24bf3af5dfa9c56a7e5c77 /compiler/GHC/Hs/Pat.hs-boot | |
| parent | 4853d962289db1b32886ec73e824cd37c9c5c002 (diff) | |
| download | haskell-5119296440e6846c553c72b8a93afc5ecfa576f0.tar.gz | |
Module hierarchy: Hs (#13009)
Add GHC.Hs module hierarchy replacing hsSyn.
Metric Increase:
haddock.compiler
Diffstat (limited to 'compiler/GHC/Hs/Pat.hs-boot')
| -rw-r--r-- | compiler/GHC/Hs/Pat.hs-boot | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/compiler/GHC/Hs/Pat.hs-boot b/compiler/GHC/Hs/Pat.hs-boot new file mode 100644 index 0000000000..801f481879 --- /dev/null +++ b/compiler/GHC/Hs/Pat.hs-boot @@ -0,0 +1,18 @@ +{-# LANGUAGE CPP, KindSignatures #-} +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE UndecidableInstances #-} -- Note [Pass sensitive types] + -- in module GHC.Hs.PlaceHolder +{-# LANGUAGE ConstraintKinds #-} +{-# LANGUAGE RoleAnnotations #-} +{-# LANGUAGE TypeFamilies #-} + +module GHC.Hs.Pat where + +import Outputable +import GHC.Hs.Extension ( OutputableBndrId, GhcPass ) + +type role Pat nominal +data Pat (i :: *) +type LPat i = Pat i + +instance (p ~ GhcPass pass, OutputableBndrId p) => Outputable (Pat p) |