diff options
author | Oliver Braun <obraun@FreeBSD.org> | 2008-07-23 04:59:29 +0000 |
---|---|---|
committer | Oliver Braun <obraun@FreeBSD.org> | 2008-07-23 04:59:29 +0000 |
commit | 64eb5598b372375e4f59f9f278cd7277feb1da46 (patch) | |
tree | a35cee8981733b4027c01611e13258c4f9d46dc7 /devel/hs-haddock-docs | |
parent | - Fix build with NOPORTDOCS=yes. (diff) |
Fix build.
Reported by: pav
Notes
Notes:
svn path=/head/; revision=217341
Diffstat (limited to 'devel/hs-haddock-docs')
-rw-r--r-- | devel/hs-haddock-docs/files/patch-src-Haddock-GHC-Typecheck.hs | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/devel/hs-haddock-docs/files/patch-src-Haddock-GHC-Typecheck.hs b/devel/hs-haddock-docs/files/patch-src-Haddock-GHC-Typecheck.hs new file mode 100644 index 000000000000..dad648dbb311 --- /dev/null +++ b/devel/hs-haddock-docs/files/patch-src-Haddock-GHC-Typecheck.hs @@ -0,0 +1,27 @@ +--- src/Haddock/GHC/Typecheck.hs.orig 2008-05-01 15:13:13.000000000 +0200 ++++ src/Haddock/GHC/Typecheck.hs 2008-06-22 16:52:52.000000000 +0200 +@@ -23,6 +23,7 @@ + + import Data.List + ++import FastString + + type CheckedMod = (Module, FilePath, FullyCheckedMod) + +@@ -69,7 +70,7 @@ + mkGhcModule (mod, file, checkedMod) dynflags = GhcModule { + ghcModule = mod, + ghcFilename = file, +- ghcMbDocOpts = mbOpts, ++ ghcMbDocOpts = fmap unpackFS mbOpts, + ghcHaddockModInfo = info, + ghcMbDoc = mbDoc, + ghcGroup = group, +@@ -79,6 +80,6 @@ + ghcInstances = modInfoInstances modInfo + } + where +- HsModule _ _ _ _ _ mbOpts _ _ = unLoc parsed ++ HsModule _ _ _ _ mbOpts _ _ = unLoc parsed + (group, _, mbExports, mbDoc, info) = renamed + (parsed, renamed, _, modInfo) = checkedMod |