diff options
| author | Matthew Yacavone <matthew@yacavone.net> | 2018-10-27 10:35:53 -0400 |
|---|---|---|
| committer | Richard Eisenberg <rae@cs.brynmawr.edu> | 2018-10-27 14:51:38 -0400 |
| commit | f3455051b59c99d26e0cf040be45f5916463ae55 (patch) | |
| tree | aa6b9201246acaac4a3501a4c29f467f50e605e4 /haddock-api/src/Haddock/Convert.hs | |
| parent | f98f101a67df9cdfcaa79a154afaa8102210275d (diff) | |
More explicit foralls (GHC Proposal 0007)
Diffstat (limited to 'haddock-api/src/Haddock/Convert.hs')
| -rw-r--r-- | haddock-api/src/Haddock/Convert.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs index f8c26175..823e288e 100644 --- a/haddock-api/src/Haddock/Convert.hs +++ b/haddock-api/src/Haddock/Convert.hs @@ -122,6 +122,8 @@ synifyAxBranch tc (CoAxBranch { cab_tvs = tkvs, cab_lhs = args, cab_rhs = rhs }) in HsIB { hsib_ext = map tyVarName tkvs , hsib_body = FamEqn { feqn_ext = noExt , feqn_tycon = name + , feqn_bndrs = Nothing + -- this must change eventually , feqn_pats = annot_typats , feqn_fixity = Prefix , feqn_rhs = hs_rhs } } |