Fixed build of testsuite.

1 files changed, 2 insertions, 1 deletions

diff --git a/tests/Network/BitTorrent/DHT/RoutingSpec.hs b/tests/Network/BitTorrent/DHT/RoutingSpec.hs
index aeccff5f..3077a52a 100644
--- a/tests/Network/BitTorrent/DHT/RoutingSpec.hs
+++ b/tests/Network/BitTorrent/DHT/RoutingSpec.hs
@@ -1,4 +1,5 @@
 {-# LANGUAGE ScopedTypeVariables #-}
+{-# LANGUAGE FlexibleContexts    #-}
 module Network.BitTorrent.DHT.RoutingSpec (spec) where
 import Control.Applicative
 import Control.Monad.State
@@ -73,4 +74,4 @@ spec = do
       let t1 = runSimulation e (T.insert n t)
       let t2 = runSimulation e (T.insert n t >>= T.insert n)
       t1 `shouldBe` t2
--}
\ No newline at end of file
+-}