on master help sign in
Add missing NOINLINE for tests
4c30237Michael Snoyman
warp/test/RunSpec.hs+1
@@ -77,6 +77,7 @@ doubleConnect icount req = do
77
77
78nextPort :: I.IORef Int
78nextPort :: I.IORef Int
79nextPort = unsafePerformIO $ I.newIORef 5000
79nextPort = unsafePerformIO $ I.newIORef 5000
80+{-# NOINLINE nextPort #-}
80
81
81getPort :: IO Int
82getPort :: IO Int
82getPort = do
83getPort = do
warp/warp.cabal+1−1
@@ -1,5 +1,5 @@
1Name: warp
1Name: warp
2−Version: 2.1.5
2+Version: 2.1.5.1
3Synopsis: A fast, light-weight web server for WAI applications.
3Synopsis: A fast, light-weight web server for WAI applications.
4License: MIT
4License: MIT
5License-file: LICENSE
5License-file: LICENSE