7 #include "HsVersions.h"
13 newtype HsDocString = HsDocString FastString
16 type LHsDocString = Located HsDocString
18 instance Outputable HsDocString where
19 ppr _ = text "<document comment>"
21 ppr_mbDoc :: Maybe LHsDocString -> SDoc
22 ppr_mbDoc (Just doc) = ppr doc
23 ppr_mbDoc Nothing = empty