@@ -55,6 +55,8 @@ import Control.Monad.Trans.Resource (allocate, release, register)
5555#if MIN_VERSION_conduit(1, 0, 0)
5656import Data.Conduit.Internal (Pipe (NeedInput, HaveOutput), (>+>), withUpstream, injectLeftovers, ConduitM (..))
5757import Data.Void (Void)
58+#else
59+import Data.Conduit.Internal (sinkToPipe)
5860#endif
5961
6062breakDiscard :: Word8 -> S.ByteString -> (S.ByteString, S.ByteString)