summaryrefslogtreecommitdiff
path: root/src/Tests/Helpers.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-02-05 13:23:06 -0800
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-02-05 13:23:06 -0800
commit1f20f77712e31fa554b0c435a9d0376c4d4138d6 (patch)
tree94d64abe589499e279d1006325cb788ba5887711 /src/Tests/Helpers.hs
parent9bf32a7554da7912efff95a4cd59bb4faaf44fa5 (diff)
Changed infix level of testing combinators.
This avoids clash with (<>), which is defined in Data.Monoid as having infix 6.
Diffstat (limited to 'src/Tests/Helpers.hs')
-rw-r--r--src/Tests/Helpers.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Tests/Helpers.hs b/src/Tests/Helpers.hs
index b8d6b83a7..bd5a38869 100644
--- a/src/Tests/Helpers.hs
+++ b/src/Tests/Helpers.hs
@@ -79,7 +79,7 @@ vivid s = setSGRCode [SetColor Background Dull Red
, SetColor Foreground Vivid White] ++ s
++ setSGRCode [Reset]
-infix 6 =?>
+infix 5 =?>
(=?>) :: a -> b -> (a,b)
x =?> y = (x, y)