From 8d3df49ae1aa2eb58af530bba0c71817411fd49d Mon Sep 17 00:00:00 2001
From: jpmoresmau <jp@moresmau.fr>
Date: Wed, 21 Jan 2015 21:31:24 +0100
Subject: support GHC 7.10: no Safe-Inferred, Foldable instance

---
 html-test/src/Bug8.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'html-test/src/Bug8.hs')

diff --git a/html-test/src/Bug8.hs b/html-test/src/Bug8.hs
index e569b01d..30afae1f 100644
--- a/html-test/src/Bug8.hs
+++ b/html-test/src/Bug8.hs
@@ -7,6 +7,7 @@ data Typ = Type (Typ,[Typ])
          | TFree (Typ, [Typ])
 
 x --> y = Type(s,[s,t])
+(--->) :: (Foldable t0) => t0 t -> Typ -> Typ
 (--->) = flip $ foldr (-->)
 
 s = undefined
-- 
cgit v1.2.3