diff options
author | Alec Theriault <alec.theriault@gmail.com> | 2018-07-20 04:49:47 -0700 |
---|---|---|
committer | Alexander Biehl <alexbiehl@gmail.com> | 2018-07-20 13:49:47 +0200 |
commit | 5ec7715d418bfac0f26aec6039792a99a6e89370 (patch) | |
tree | b329dfe0629d40b100cac782479ee8d881d66715 | |
parent | 2de7c2acf9b1ec85b09027a8bb58bf8512e91c05 (diff) |
Add some more unicode related tests (#872)
This has been fixed for sure ever since we switched from attoparsec to
parsec. Parts of it may have been working before that, but there was a
point where this would have failed (see #191).
A regression test never hurt anyone. :)
-rw-r--r-- | html-test/ref/Unicode2.html | 100 | ||||
-rw-r--r-- | html-test/src/Unicode2.hs | 18 |
2 files changed, 118 insertions, 0 deletions
diff --git a/html-test/ref/Unicode2.html b/html-test/ref/Unicode2.html new file mode 100644 index 00000000..bf667bae --- /dev/null +++ b/html-test/ref/Unicode2.html @@ -0,0 +1,100 @@ +<html xmlns="http://www.w3.org/1999/xhtml" +><head + ><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" + /><title + >Unicode2</title + ><link href="#" rel="stylesheet" type="text/css" title="Ocean" + /><link rel="stylesheet" type="text/css" href="#" + /><script src="haddock-bundle.min.js" async="async" type="text/javascript" + ></script + ><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript" + ></script + ></head + ><body + ><div id="package-header" + ><ul class="links" id="page-menu" + ><li + ><a href="#" + >Contents</a + ></li + ><li + ><a href="#" + >Index</a + ></li + ></ul + ><p class="caption empty" + ></p + ></div + ><div id="content" + ><div id="module-header" + ><table class="info" + ><tr + ><th + >Safe Haskell</th + ><td + >Safe</td + ></tr + ></table + ><p class="caption" + >Unicode2</p + ></div + ><div id="synopsis" + ><details id="syn" + ><summary + >Synopsis</summary + ><ul class="details-toggle" data-details-id="syn" + ><li class="src short" + ><a href="#" + >ü</a + > :: ()</li + ></ul + ></details + ></div + ><div id="interface" + ><h1 + >Documentation</h1 + ><div class="top" + ><p class="src" + ><a id="v:-252-" class="def" + >ü</a + > :: () <a href="#" class="selflink" + >#</a + ></p + ><div class="doc" + ><p + >All of the following work with a unicode character ü:</p + ><ul + ><li + >an italicized <em + >ü</em + ></li + ><li + >inline code <code + >ü</code + ></li + ><li + >a code block:</li + ></ul + ><pre + >ü</pre + ><ul + ><li + >a url <a href="#" + >https://www.google.com/search?q=ü</a + ></li + ><li + >a link to <code + ><a href="#" title="Unicode2" + >ü</a + ></code + ></li + ></ul + ></div + ></div + ></div + ></div + ><div id="footer" + ></div + ></body + ></html +>
\ No newline at end of file diff --git a/html-test/src/Unicode2.hs b/html-test/src/Unicode2.hs new file mode 100644 index 00000000..ca6b18ba --- /dev/null +++ b/html-test/src/Unicode2.hs @@ -0,0 +1,18 @@ +module Unicode2 where + +-- | All of the following work with a unicode character ü: +-- +-- * an italicized /ü/ +-- +-- * inline code @ü@ +-- +-- * a code block: +-- +-- > ü +-- +-- * a url <https://www.google.com/search?q=ü> +-- +-- * a link to 'ü' +-- +ü :: () +ü = () |