aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Hengel <sol@typeful.net>2012-10-14 14:13:24 +0200
committerSimon Hengel <sol@typeful.net>2012-10-14 14:13:24 +0200
commitab6e43c21e9eb22a4538303c1728c4e8d2f35f24 (patch)
tree8298ead9e71a978691f3b40b160635797b99c198
parentcea620e1f967ce066e11bcd79b831905f6151fef (diff)
Add description for PruneWithWarning test
-rw-r--r--tests/html-tests/tests/DeprecationMessageParseError.hs4
-rw-r--r--tests/html-tests/tests/DeprecationMessageParseError.html.ref4
-rw-r--r--tests/html-tests/tests/PruneWithWarning.hs6
-rw-r--r--tests/html-tests/tests/PruneWithWarning.html.ref17
4 files changed, 27 insertions, 4 deletions
diff --git a/tests/html-tests/tests/DeprecationMessageParseError.hs b/tests/html-tests/tests/DeprecationMessageParseError.hs
index 5f0b8713..2f8fb492 100644
--- a/tests/html-tests/tests/DeprecationMessageParseError.hs
+++ b/tests/html-tests/tests/DeprecationMessageParseError.hs
@@ -1,8 +1,8 @@
-- |
-- What is tested here:
--
--- * if parsing of a deprecation message fails, the message is included
--- verbatim
+-- * If parsing of a deprecation message fails, the message is included
+-- verbatim.
--
module DeprecationMessageParseError where
diff --git a/tests/html-tests/tests/DeprecationMessageParseError.html.ref b/tests/html-tests/tests/DeprecationMessageParseError.html.ref
index b4ea426e..75f9bf54 100644
--- a/tests/html-tests/tests/DeprecationMessageParseError.html.ref
+++ b/tests/html-tests/tests/DeprecationMessageParseError.html.ref
@@ -50,8 +50,8 @@ window.onload = function () {pageLoad();setSynopsis("mini_DeprecationMessagePars
</p
><ul
><li
- > if parsing of a deprecation message fails, the message is included
- verbatim
+ > If parsing of a deprecation message fails, the message is included
+ verbatim.
</li
></ul
></div
diff --git a/tests/html-tests/tests/PruneWithWarning.hs b/tests/html-tests/tests/PruneWithWarning.hs
index fefe81f5..bfa55ea2 100644
--- a/tests/html-tests/tests/PruneWithWarning.hs
+++ b/tests/html-tests/tests/PruneWithWarning.hs
@@ -1,4 +1,10 @@
{-# OPTIONS_HADDOCK prune #-}
+-- |
+-- What is tested here:
+--
+-- * If a binding has a deprecation message but no documentation, it is pruned
+-- when @OPTIONS_HADDOCK prune@ is used.
+--
module PruneWithWarning (foo, bar) where
foo :: Int
diff --git a/tests/html-tests/tests/PruneWithWarning.html.ref b/tests/html-tests/tests/PruneWithWarning.html.ref
index 2d6ef694..3c31fbdf 100644
--- a/tests/html-tests/tests/PruneWithWarning.html.ref
+++ b/tests/html-tests/tests/PruneWithWarning.html.ref
@@ -41,6 +41,23 @@ window.onload = function () {pageLoad();setSynopsis("mini_PruneWithWarning.html"
><p class="caption"
>PruneWithWarning</p
></div
+ ><div id="description"
+ ><p class="caption"
+ >Description</p
+ ><div class="doc"
+ ><p
+ >What is tested here:
+</p
+ ><ul
+ ><li
+ > If a binding has a deprecation message but no documentation, it is pruned
+ when <code
+ >OPTIONS_HADDOCK prune</code
+ > is used.
+</li
+ ></ul
+ ></div
+ ></div
><div id="interface"
></div
></div