aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMateusz Kowalczyk <fuuzetsu@fuuzetsu.co.uk>2014-08-15 02:52:56 +0100
committerMateusz Kowalczyk <fuuzetsu@fuuzetsu.co.uk>2014-08-15 02:52:56 +0100
commiteba425b7872be52f8b83afd0b7a9803652ede70b (patch)
tree5ee23c639e21a1110fc2b1b6edf2fcf25276fd3a
parent08db4c81ffac672a4a5a90291be70279e9a1f098 (diff)
Stop testing #188.
Because the change is in GHC 7.9 and we now work against 7.8.3, this test no longer makes sense. We revert it until 7.10 becomes the standard version. If anything, there should be a test for this in GHC itself.
-rw-r--r--html-test/ref/Bug188.html81
-rw-r--r--html-test/ref/Operators.html16
-rw-r--r--html-test/src/Bug188.hs7
3 files changed, 8 insertions, 96 deletions
diff --git a/html-test/ref/Bug188.html b/html-test/ref/Bug188.html
deleted file mode 100644
index 3e9f4eec..00000000
--- a/html-test/ref/Bug188.html
+++ /dev/null
@@ -1,81 +0,0 @@
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml"
-><head
- ><meta http-equiv="Content-Type" content="text/html; charset=UTF-8"
- /><title
- >Bug188</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_Bug188.html");};
-//]]>
-</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"
- >&nbsp;</p
- ></div
- ><div id="content"
- ><div id="module-header"
- ><table class="info"
- ><tr
- ><th
- >Safe Haskell</th
- ><td
- >Safe-Inferred</td
- ></tr
- ></table
- ><p class="caption"
- >Bug188</p
- ></div
- ><div id="interface"
- ><h1
- >Documentation</h1
- ><div class="top"
- ><p class="src"
- ><span class="keyword"
- >class</span
- > <a name="t:A" class="def"
- >A</a
- > a <span class="keyword"
- >where</span
- ></p
- ><div class="subs methods"
- ><p class="caption"
- >Methods</p
- ><p class="src"
- ><a name="v:f" class="def"
- >f</a
- >, <a name="v:g" class="def"
- >g</a
- >, <a name="v:h" class="def"
- >h</a
- >, <a name="v:i" class="def"
- >i</a
- > :: a -&gt; ()</p
- ></div
- ></div
- ></div
- ></div
- ><div id="footer"
- ><p
- >Produced by <a href=""
- >Haddock</a
- > version 2.15.0</p
- ></div
- ></body
- ></html
->
diff --git a/html-test/ref/Operators.html b/html-test/ref/Operators.html
index bfecfb38..fac8c94d 100644
--- a/html-test/ref/Operators.html
+++ b/html-test/ref/Operators.html
@@ -151,11 +151,11 @@ window.onload = function () {pageLoad();setSynopsis("mini_Operators.html");};
><a href=""
>(**&gt;)</a
>, <a href=""
- >(**&lt;)</a
+ >(&lt;**)</a
>, <a href=""
>(&gt;**)</a
>, <a href=""
- >(&lt;**)</a
+ >(**&lt;)</a
> :: a -&gt; a -&gt; ()</li
></ul
></li
@@ -407,16 +407,16 @@ window.onload = function () {pageLoad();setSynopsis("mini_Operators.html");};
><p class="src"
><a name="v:-42--42--62-" class="def"
>(**&gt;)</a
- >, <a name="v:-42--42--60-" class="def"
- >(**&lt;)</a
- >, <a name="v:-62--42--42-" class="def"
- >(&gt;**)</a
>, <a name="v:-60--42--42-" class="def"
>(&lt;**)</a
+ >, <a name="v:-62--42--42-" class="def"
+ >(&gt;**)</a
+ >, <a name="v:-42--42--60-" class="def"
+ >(**&lt;)</a
> :: a -&gt; a -&gt; () <span class="fixity"
>infixr 8 **&gt;, &gt;**</span
><span class="fixity"
- >infixl 8 **&lt;, &lt;**</span
+ >infixl 8 &lt;**, **&lt;</span
><span class="rightedge"
></span
></p
@@ -450,7 +450,7 @@ window.onload = function () {pageLoad();setSynopsis("mini_Operators.html");};
><p
>Produced by <a href=""
>Haddock</a
- > version 2.15.0</p
+ > version 2.14.4</p
></div
></body
></html
diff --git a/html-test/src/Bug188.hs b/html-test/src/Bug188.hs
deleted file mode 100644
index 15089699..00000000
--- a/html-test/src/Bug188.hs
+++ /dev/null
@@ -1,7 +0,0 @@
--- Tests that the listed order of functions grouped under a single
--- type signature is preserved as in-source. Before fixing #188, it
--- seems to have preserved the first function but reversed the rest.
-module Bug188 where
-
-class A a where
- f, g, h, i :: a -> ()