diff options
| author | simonmar <unknown> | 2003-05-06 10:11:44 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2003-05-06 10:11:44 +0000 |
| commit | 4162b2b988e593e003f815418f84f72d9e6a9ed8 (patch) | |
| tree | a75c39e37e3e5a5a70a821703d146530135c8b95 | |
| parent | d4f638de2dde1bbf9904cfd7d795f1b6b585f8f4 (diff) | |
[haddock @ 2003-05-06 10:11:44 by simonmar]
Add some more code-block tests.
| -rw-r--r-- | examples/Test.hs | 73 |
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 + |