Repository : ssh://darcs.haskell.org//srv/darcs/haddock On branches: master,ghc-7.4
http://hackage.haskell.org/trac/ghc/changeset/0d7f4dfb3a3bba7b2a4d582a5cdc473c417b8d0d >--------------------------------------------------------------- commit 0d7f4dfb3a3bba7b2a4d582a5cdc473c417b8d0d Author: David Waern <[email protected]> Date: Sat Dec 3 05:38:10 2011 +0100 Add a test for Unicode doc comments. >--------------------------------------------------------------- tests/html-tests/tests/Unicode.hs | 6 ++++++ .../tests/{Bug3.html.ref => Unicode.html.ref} | 15 +++++++-------- 2 files changed, 13 insertions(+), 8 deletions(-) diff --git a/tests/html-tests/tests/Unicode.hs b/tests/html-tests/tests/Unicode.hs new file mode 100644 index 0000000..d5bbf44 --- /dev/null +++ b/tests/html-tests/tests/Unicode.hs @@ -0,0 +1,6 @@ +module Unicode where + +-- | γλÏÏÏα +x :: Int +x = 1 + diff --git a/tests/html-tests/tests/Bug3.html.ref b/tests/html-tests/tests/Unicode.html.ref similarity index 88% copy from tests/html-tests/tests/Bug3.html.ref copy to tests/html-tests/tests/Unicode.html.ref index 369ad9b..29990e5 100644 --- a/tests/html-tests/tests/Bug3.html.ref +++ b/tests/html-tests/tests/Unicode.html.ref @@ -3,13 +3,13 @@ ><head ><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title - >Bug3</title + >Unicode</title ><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript" ></script ><script type="text/javascript" >//<![CDATA[ -window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");}; +window.onload = function () {pageLoad();setSynopsis("mini_Unicode.html");}; //]]> </script ></head @@ -39,7 +39,7 @@ window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");}; ></tr ></table ><p class="caption" - >Bug3</p + >Unicode</p ></div ><div id="synopsis" ><p id="control.syn" class="caption expander" onclick="toggleSection('syn')" @@ -47,7 +47,7 @@ window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");}; ><ul id="section.syn" class="hide" onclick="toggleSection('syn')" ><li class="src short" ><a href="" - >foo</a + >x</a > :: <a href="" >Int</a ></li @@ -58,15 +58,14 @@ window.onload = function () {pageLoad();setSynopsis("mini_Bug3.html");}; >Documentation</h1 ><div class="top" ><p class="src" - ><a name="v:foo" class="def" - >foo</a + ><a name="v:x" class="def" + >x</a > :: <a href="" >Int</a ></p ><div class="doc" ><p - >/multi-line - emphasis/ + >γλώσσα </p ></div ></div
_______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
