1 files changed, 1 insertions, 1 deletions

diff --git a/tests/Network/BitTorrent/Tracker/RPC/UDPSpec.hs b/tests/Network/BitTorrent/Tracker/RPC/UDPSpec.hs
index 3ecc139d..540a887c 100644
--- a/tests/Network/BitTorrent/Tracker/RPC/UDPSpec.hs
+++ b/tests/Network/BitTorrent/Tracker/RPC/UDPSpec.hs
@@ -51,5 +51,5 @@ spec = parallel $ do
       describe "Manager" $ do
         it "should handle arbitrary intermixed concurrent queries" $ do
           withManager def $ \ mgr -> do
-            _ <- mapConcurrently (\ _ -> scrape mgr uri [def]) [1..100]
+            _ <- mapConcurrently (\ _ -> scrape mgr uri [def]) [1..100 :: Int]
             return ()
\ No newline at end of file