@@ -1,6 +1,10 @@
1{-# LANGUAGE CPP, ForeignFunctionInterface #-}
1{-# LANGUAGE CPP, ForeignFunctionInterface #-}
3−module Network.Wai.Handler.Warp.SendFile where
3+module Network.Wai.Handler.Warp.SendFile (
6+ , packHeader -- for testing
5import Data.ByteString.Internal
9import Data.ByteString.Internal
6import Foreign.ForeignPtr (newForeignPtr_, withForeignPtr)
10import Foreign.ForeignPtr (newForeignPtr_, withForeignPtr)