aboutsummaryrefslogtreecommitdiff
path: root/examples/Test.hs
diff options
context:
space:
mode:
authorsimonmar <unknown>2003-05-06 10:11:44 +0000
committersimonmar <unknown>2003-05-06 10:11:44 +0000
commit4162b2b988e593e003f815418f84f72d9e6a9ed8 (patch)
treea75c39e37e3e5a5a70a821703d146530135c8b95 /examples/Test.hs
parentd4f638de2dde1bbf9904cfd7d795f1b6b585f8f4 (diff)
[haddock @ 2003-05-06 10:11:44 by simonmar]
Add some more code-block tests.
Diffstat (limited to 'examples/Test.hs')
-rw-r--r--examples/Test.hs73
1 files changed, 73 insertions, 0 deletions
diff --git a/examples/Test.hs b/examples/Test.hs
index 4acdc595..34485683 100644
--- a/examples/Test.hs
+++ b/examples/Test.hs
@@ -53,6 +53,18 @@ module Test (
-- $aux5
+ -- $aux6
+
+ -- $aux7
+
+ -- $aux8
+
+ -- $aux9
+
+ -- $aux10
+
+ -- $aux11
+
-- | This is some inline documentation in the export list
--
-- > a code block using bird-tracks
@@ -77,6 +89,10 @@ module Test (
-- and without an intervening comma:
-- ** A subsection
+{-|
+ > a literal line
+ $ a non /literal/ line $
+-}
) where
import Hidden
@@ -258,6 +274,62 @@ h = 42
@ and a code block @
-}
+-- some tests for various arrangements of code blocks:
+
+{- $aux6
+>test
+>test1
+
+@ test2
+ test3
+@
+-}
+
+{- $aux7
+@
+test1
+test2
+@
+-}
+
+{- $aux8
+>test3
+>test4
+-}
+
+{- $aux9
+@
+test1
+test2
+@
+
+>test3
+>test4
+-}
+
+{- $aux10
+>test3
+>test4
+
+@
+test1
+test2
+@
+-}
+
+-- This one is currently wrong (Haddock 0.4). The @...@ part is
+-- interpreted as part of the bird-tracked code block.
+{- $aux11
+aux11:
+
+>test3
+>test4
+@
+test1
+test2
+@
+-}
+
-- | A data-type using existential\/universal types
data Ex a
= forall b . C b => Ex1 b
@@ -292,3 +364,4 @@ n :: R -- ^ one of the arguments, an 'R'
foreign import ccall unsafe
o :: Float -- ^ The input float
-> IO Float -- ^ The output float
+