FIX #45: generate two anchors for each name

We generate two anchor tags for each name, one where we don't escape the name
and one where we URI-encode it. This is for compatibility between IE and Opera.
Test output is updated.

1 files changed, 33 insertions, 5 deletions

diff --git a/tests/output/Bug6.html b/tests/output/Bug6.html
index e0d676f4..96d371ac 100644
--- a/tests/output/Bug6.html
+++ b/tests/output/Bug6.html
@@ -193,7 +193,9 @@
 ><TD CLASS="decl"
 ><SPAN CLASS="keyword"
 >data</SPAN
->  <A NAME="t%3AA"
+>  <A NAME="t:A"
+><A NAME="t%3AA"
+></A
 ></A
 ><B
 >A</B
@@ -216,8 +218,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:A"
 ><A NAME="v%3AA"
 ></A
+></A
 ><B
 >A</B
 > Int</TD
@@ -238,7 +242,9 @@
 ><TD CLASS="decl"
 ><SPAN CLASS="keyword"
 >data</SPAN
->  <A NAME="t%3AB"
+>  <A NAME="t:B"
+><A NAME="t%3AB"
+></A
 ></A
 ><B
 >B</B
@@ -262,8 +268,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="5" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:B"
 ><A NAME="v%3AB"
 ></A
+></A
 ><B
 >B</B
 ></TD
@@ -275,8 +283,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:b"
 ><A NAME="v%3Ab"
 ></A
+></A
 ><B
 >b</B
 > :: Int</TD
@@ -298,8 +308,10 @@
 ></TR
 ><TR
 ><TD CLASS="decl"
+><A NAME="v:b"
 ><A NAME="v%3Ab"
 ></A
+></A
 ><B
 >b</B
 > :: <A HREF="Bug6.html#t%3AB"
@@ -314,7 +326,9 @@
 ><TD CLASS="decl"
 ><SPAN CLASS="keyword"
 >data</SPAN
->  <A NAME="t%3AC"
+>  <A NAME="t:C"
+><A NAME="t%3AC"
+></A
 ></A
 ><B
 >C</B
@@ -337,8 +351,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="5" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:C"
 ><A NAME="v%3AC"
 ></A
+></A
 ><B
 >C</B
 ></TD
@@ -350,8 +366,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:c1"
 ><A NAME="v%3Ac1"
 ></A
+></A
 ><B
 >c1</B
 > :: Int</TD
@@ -360,8 +378,10 @@
 ></TR
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:c2"
 ><A NAME="v%3Ac2"
 ></A
+></A
 ><B
 >c2</B
 > :: Int</TD
@@ -385,7 +405,9 @@
 ><TD CLASS="decl"
 ><SPAN CLASS="keyword"
 >data</SPAN
->  <A NAME="t%3AD"
+>  <A NAME="t:D"
+><A NAME="t%3AD"
+></A
 ></A
 ><B
 >D</B
@@ -409,8 +431,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:D"
 ><A NAME="v%3AD"
 ></A
+></A
 ><B
 >D</B
 > Int Int</TD
@@ -431,7 +455,9 @@
 ><TD CLASS="decl"
 ><SPAN CLASS="keyword"
 >newtype</SPAN
->  <A NAME="t%3AE"
+>  <A NAME="t:E"
+><A NAME="t%3AE"
+></A
 ></A
 ><B
 >E</B
@@ -454,8 +480,10 @@
 ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
 ><TR
 ><TD CLASS="arg"
+><A NAME="v:E"
 ><A NAME="v%3AE"
 ></A
+></A
 ><B
 >E</B
 > Int</TD