diff options
Diffstat (limited to 'haddock-api/src')
| -rw-r--r-- | haddock-api/src/Haddock/Convert.hs | 2 | 
1 files changed, 1 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs index 43cd0ea2..3fd783aa 100644 --- a/haddock-api/src/Haddock/Convert.hs +++ b/haddock-api/src/Haddock/Convert.hs @@ -172,7 +172,7 @@ synifyTyCon coax tc                ClosedSynFamilyTyCon mb -> case mb of                    Just (CoAxiom { co_ax_branches = branches })                            -> return $ ClosedTypeFamily $ Just $ -                               brListMap (noLoc . synifyAxBranch tc) branches +                               map (noLoc . synifyAxBranch tc) (fromBranches branches)                    Nothing -> return $ ClosedTypeFamily $ Just []                BuiltInSynFamTyCon {}                  -> return $ ClosedTypeFamily $ Just []  | 
