summaryrefslogtreecommitdiff
path: root/compiler/GHC/Rename/Doc.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Rename/Doc.hs')
-rw-r--r--compiler/GHC/Rename/Doc.hs25
1 files changed, 0 insertions, 25 deletions
diff --git a/compiler/GHC/Rename/Doc.hs b/compiler/GHC/Rename/Doc.hs
deleted file mode 100644
index f053795073..0000000000
--- a/compiler/GHC/Rename/Doc.hs
+++ /dev/null
@@ -1,25 +0,0 @@
-{-# LANGUAGE ViewPatterns #-}
-
-module GHC.Rename.Doc ( rnHsDoc, rnLHsDoc, rnMbLHsDoc ) where
-
-import GHC.Prelude
-
-import GHC.Tc.Types
-import GHC.Hs
-import GHC.Types.SrcLoc
-
-
-rnMbLHsDoc :: Maybe LHsDocString -> RnM (Maybe LHsDocString)
-rnMbLHsDoc mb_doc = case mb_doc of
- Just doc -> do
- doc' <- rnLHsDoc doc
- return (Just doc')
- Nothing -> return Nothing
-
-rnLHsDoc :: LHsDocString -> RnM LHsDocString
-rnLHsDoc (L pos doc) = do
- doc' <- rnHsDoc doc
- return (L pos doc')
-
-rnHsDoc :: HsDocString -> RnM HsDocString
-rnHsDoc = pure