From 0a5ad1ca981dd5cd4bed68715415fc89c054af13 Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@galois.com>
Date: Sun, 14 Oct 2007 01:00:20 +0200
Subject: Combo requires FlexibleContexts (but still doesn't compile under ghc
 head)

darcs-hash:20071013230020-cba2c-abce26b8edf763174e813885b17725ac9f156f05.gz
---
 Combo.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Combo.hs')

diff --git a/Combo.hs b/Combo.hs
index 99dba29..8392e8e 100644
--- a/Combo.hs
+++ b/Combo.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, UndecidableInstances #-}
+{-# LANGUAGE FlexibleContexts, FlexibleInstances, MultiParamTypeClasses, UndecidableInstances #-}
 
 -----------------------------------------------------------------------------
 -- |
@@ -54,7 +54,7 @@ combo :: (Eq a, Show a, Read a, ReadableLayout a, LayoutClass l (Layout a, Int))
 combo = Combo []
 
 data Combo l a = Combo [a] (l (Layout a, Int)) [(Layout a, Int)]
-                 deriving ( Show, Read )
+                 deriving (Show, Read)
 
 instance (Eq a, Show a, Read a, ReadableLayout a, LayoutClass l (Layout a, Int))
     => LayoutClass (Combo l) a where
-- 
cgit v1.2.3