diff --git a/Network/Wai/Test.hs b/Network/Wai/Test.hs
--- a/Network/Wai/Test.hs
+++ b/Network/Wai/Test.hs
@@ -1,4 +1,5 @@
 {-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE CPP #-}
 module Network.Wai.Test
     ( -- * Session
       Session
@@ -80,7 +81,9 @@
     , queryString = []
     , requestBody = mempty
     , vault = mempty
+#if MIN_VERSION_wai(1, 4, 0)
     , requestBodyLength = KnownLength 0
+#endif
     }
 
 setRawPathInfo :: Request -> S8.ByteString -> Request
diff --git a/wai-test.cabal b/wai-test.cabal
--- a/wai-test.cabal
+++ b/wai-test.cabal
@@ -1,5 +1,5 @@
 name:            wai-test
-version:         1.3.0.3
+version:         1.3.0.4
 license:         MIT
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>