[commit: haddock] ghc-7.4: Add test for #205 (37e0abe)

Sun May 27 01:46:39 CEST 2012

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 <sol at typeful.net>
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



