[commit: ghc] master: Fix haddock syntax (7b29b0b)
git at git.haskell.org
git at git.haskell.org
Thu Dec 3 22:00:48 UTC 2015
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/7b29b0b1e8efac68fd4151cb5a44c4290a3e9d57/ghc
>---------------------------------------------------------------
commit 7b29b0b1e8efac68fd4151cb5a44c4290a3e9d57
Author: Ben Gamari <ben at smart-cactus.org>
Date: Thu Dec 3 13:43:16 2015 -0500
Fix haddock syntax
Sadly we can't annotate the elements of a tuple
>---------------------------------------------------------------
7b29b0b1e8efac68fd4151cb5a44c4290a3e9d57
compiler/deSugar/Check.hs | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/compiler/deSugar/Check.hs b/compiler/deSugar/Check.hs
index 8ca0b54..382112c 100644
--- a/compiler/deSugar/Check.hs
+++ b/compiler/deSugar/Check.hs
@@ -117,9 +117,14 @@ data ValSetAbs -- Reprsents a set of value vector abstractions
| Constraint [PmConstraint] ValSetAbs -- ^ Extend Delta
| Cons ValAbs ValSetAbs -- ^ map (ucon u) vs
-type PmResult = ( [[LPat Id]] -- ^ redundant clauses
- , [[LPat Id]] -- ^ clauses with inaccessible rhs
- , [([PmExpr], [ComplexEq])] ) -- ^ missing
+-- | Pattern check result
+--
+-- * redundant clauses
+-- * clauses with inaccessible RHS
+-- * missing
+type PmResult = ( [[LPat Id]]
+ , [[LPat Id]]
+ , [([PmExpr], [ComplexEq])] )
{-
%************************************************************************
More information about the ghc-commits
mailing list