From 3b39ec8b1f8695f88fcf499d33d136aa14f15340 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 22 Mar 2015 03:37:44 +0000 Subject: remove Applicative derivation for old GHC on demeter --- src/Control/Monad/SariulClocks.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Control/Monad/SariulClocks.hs b/src/Control/Monad/SariulClocks.hs index 3146d87..707e1d8 100644 --- a/src/Control/Monad/SariulClocks.hs +++ b/src/Control/Monad/SariulClocks.hs @@ -32,11 +32,11 @@ class ( Monad a newtype SariulClocksCGI a = SCC { getSCC :: StateT (Session, ScoresList) (CGIT IO) a } - deriving (Functor, Applicative, Monad, MonadIO, MonadState (Session, ScoresList)) + deriving (Functor, Monad, MonadIO, MonadState (Session, ScoresList)) newtype SariulClocksIO a = SCI { getSCI :: StateT ScoresList IO a } - deriving (Functor, Applicative, Monad, MonadIO, MonadState ScoresList) + deriving (Functor, Monad, MonadIO, MonadState ScoresList) instance MonadCGI SariulClocksCGI where cgiAddHeader n v = SCC . lift $ cgiAddHeader n v -- cgit v1.2.3