Repository : ssh://darcs.haskell.org//srv/darcs/haddock On branch : ghc-7.4
http://hackage.haskell.org/trac/ghc/changeset/37e0abebc1e14e59ac352b0a5f633a63233f04de >--------------------------------------------------------------- commit 37e0abebc1e14e59ac352b0a5f633a63233f04de Author: Simon Hengel <[email protected]> Date: Thu May 17 17:20:17 2012 +0200 Add test for #205 >--------------------------------------------------------------- tests/html-tests/tests/PruneWithWarning.hs | 9 +++++++++ .../{TH.html.ref => PruneWithWarning.html.ref} | 16 ++++------------ ...Doc.html.ref => mini_PruneWithWarning.html.ref} | 4 ++-- 3 files changed, 15 insertions(+), 14 deletions(-) diff --git a/tests/html-tests/tests/PruneWithWarning.hs b/tests/html-tests/tests/PruneWithWarning.hs new file mode 100644 index 0000000..fefe81f --- /dev/null +++ b/tests/html-tests/tests/PruneWithWarning.hs @@ -0,0 +1,9 @@ +{-# OPTIONS_HADDOCK prune #-} +module PruneWithWarning (foo, bar) where + +foo :: Int +foo = 23 +{-# DEPRECATED foo "use bar instead" #-} + +bar :: Int +bar = 42 diff --git a/tests/html-tests/tests/TH.html.ref b/tests/html-tests/tests/PruneWithWarning.html.ref similarity index 81% copy from tests/html-tests/tests/TH.html.ref copy to tests/html-tests/tests/PruneWithWarning.html.ref index 804812e..7fe3edf 100644 --- a/tests/html-tests/tests/TH.html.ref +++ b/tests/html-tests/tests/PruneWithWarning.html.ref @@ -3,13 +3,13 @@ ><head ><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title - >TH</title + >PruneWithWarning</title ><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript" ></script ><script type="text/javascript" >//<![CDATA[ -window.onload = function () {pageLoad();setSynopsis("mini_TH.html");}; +window.onload = function () {pageLoad();setSynopsis("mini_PruneWithWarning.html");}; //]]> </script ></head @@ -39,18 +39,10 @@ window.onload = function () {pageLoad();setSynopsis("mini_TH.html");}; ></tr ></table ><p class="caption" - >TH</p + >PruneWithWarning</p ></div ><div id="interface" - ><h1 - >Documentation</h1 - ><div class="top" - ><p class="src" - ><a name="v:decl" class="def" - >decl</a - > :: Q [Dec]</p - ></div - ></div + ></div ></div ><div id="footer" ><p diff --git a/tests/html-tests/tests/mini_NamedDoc.html.ref b/tests/html-tests/tests/mini_PruneWithWarning.html.ref similarity index 92% copy from tests/html-tests/tests/mini_NamedDoc.html.ref copy to tests/html-tests/tests/mini_PruneWithWarning.html.ref index 066bbc6..9eb3aa0 100644 --- a/tests/html-tests/tests/mini_NamedDoc.html.ref +++ b/tests/html-tests/tests/mini_PruneWithWarning.html.ref @@ -3,7 +3,7 @@ ><head ><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title - >NamedDoc</title + >PruneWithWarning</title ><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript" ></script @@ -16,7 +16,7 @@ window.onload = function () {pageLoad();}; ><body id="mini" ><div id="module-header" ><p class="caption" - >NamedDoc</p + >PruneWithWarning</p ></div ><div id="interface" ></div _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
