[haddock @ 2003-08-18 11:48:24 by simonmar]

Two bugs from Sven.

3 files changed, 13 insertions, 1 deletions

diff --git a/examples/Bug1.hs b/examples/Bug1.hs
index a7151b7f..af1ed4d3 100644
--- a/examples/Bug1.hs
+++ b/examples/Bug1.hs
@@ -1,4 +1,6 @@
 module Bug1 where
 
--- we should have different anchors for constructors and types/classes.
+-- | We should have different anchors for constructors and types\/classes.  This
+-- hyperlink should point to the type constructor by default: 'T'.
 data T = T
+
diff --git a/examples/Bug3.hs b/examples/Bug3.hs
new file mode 100644
index 00000000..cfda7e4c
--- /dev/null
+++ b/examples/Bug3.hs
@@ -0,0 +1,6 @@
+module Bug3 where
+
+-- | /multi-line
+-- emphasis/
+foo :: Int
+
diff --git a/examples/Bug4.hs b/examples/Bug4.hs
new file mode 100644
index 00000000..bb3c4fe2
--- /dev/null
+++ b/examples/Bug4.hs
@@ -0,0 +1,4 @@
+module Bug4 where
+-- | don't use apostrophe's in the wrong place's
+foo :: Int
+