# HG changeset patch # User unc0rr # Date 1361132889 -14400 # Node ID 0a39b2f9c7489e4b6376b1cadc9596e5a97aff55 # Parent eda9f2106d8da860a1698d0d7d953e5cddd2c998 No NFData instance for ByteString when ghc >= 7.6 diff -r eda9f2106d8d -r 0a39b2f9c748 gameServer/Actions.hs --- a/gameServer/Actions.hs Mon Feb 18 00:22:13 2013 +0400 +++ b/gameServer/Actions.hs Mon Feb 18 00:28:09 2013 +0400 @@ -88,7 +88,10 @@ rnf (AnswerClients chans msg) = chans `deepseq` msg `deepseq` () rnf a = a `seq` () +#if __GLASGOW_HASKELL__ < 706 instance NFData B.ByteString +#endif + instance NFData (Chan a)