[commit: haddock] ghc-7.4: Add test for --ignore-all-exports flag/ignore-exports pragma. (faf1c02)

Sun Apr 1 18:19:05 CEST 2012

Repository : ssh://darcs.haskell.org//srv/darcs/haddock

On branch  : ghc-7.4

http://hackage.haskell.org/trac/ghc/changeset/faf1c0231e199206ff26c13f982d853bf81517f3

>---------------------------------------------------------------

commit faf1c0231e199206ff26c13f982d853bf81517f3
Author: David Waern <david.waern at gmail.com>
Date:   Sun Apr 1 20:13:35 2012 +0200

    Add test for --ignore-all-exports flag/ignore-exports pragma.

>---------------------------------------------------------------

 tests/html-tests/tests/IgnoreExports.hs            |   10 +++++++
 .../{Bug3.html.ref => IgnoreExports.html.ref}      |   28 ++++++++++++++++---
 2 files changed, 33 insertions(+), 5 deletions(-)

diff --git a/tests/html-tests/tests/IgnoreExports.hs b/tests/html-tests/tests/IgnoreExports.hs
new file mode 100644
index 0000000..0321ad0
--- /dev/null
+++ b/tests/html-tests/tests/IgnoreExports.hs
@@ -0,0 +1,10 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+module IgnoreExports (foo) where
+
+-- | documentation for foo
+foo :: Int
+foo = 23
+
+-- | documentation for bar
+bar :: Int
+bar = 23
diff --git a/tests/html-tests/tests/Bug3.html.ref b/tests/html-tests/tests/IgnoreExports.html.ref
similarity index 77%
copy from tests/html-tests/tests/Bug3.html.ref
copy to tests/html-tests/tests/IgnoreExports.html.ref
index a948901..4c09303 100644
--- a/tests/html-tests/tests/Bug3.html.ref
+++ b/tests/html-tests/tests/IgnoreExports.html.ref
@@ -3,13 +3,13 @@
 ><head
   ><meta http-equiv="Content-Type" content="text/html; charset=UTF-8"
      /><title
-    >Bug3</title
+    >IgnoreExports</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_Bug3.html");};
+window.onload = function () {pageLoad();setSynopsis("mini_IgnoreExports.html");};
 //]]>
 </script
     ></head
@@ -39,7 +39,7 @@ window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");};
 	    ></tr
 	  ></table
 	><p class="caption"
-	>Bug3</p
+	>IgnoreExports</p
 	></div
       ><div id="synopsis"
       ><p id="control.syn" class="caption expander" onclick="toggleSection('syn')"
@@ -51,6 +51,12 @@ window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");};
 	    > :: <a href=""
 	    >Int</a
 	    ></li
+	  ><li class="src short"
+	  ><a href=""
+	    >bar</a
+	    > :: <a href=""
+	    >Int</a
+	    ></li
 	  ></ul
 	></div
       ><div id="interface"
@@ -65,8 +71,20 @@ window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");};
 	    ></p
 	  ><div class="doc"
 	  ><p
-	    >/multi-line
- emphasis/
+	    >documentation for foo
+</p
+	    ></div
+	  ></div
+	><div class="top"
+	><p class="src"
+	  ><a name="v:bar" class="def"
+	    >bar</a
+	    > :: <a href=""
+	    >Int</a
+	    ></p
+	  ><div class="doc"
+	  ><p
+	    >documentation for bar
 </p
 	    ></div
 	  ></div



