From 35e701c127df75fcc99142bf22d4b9f592feea0e Mon Sep 17 00:00:00 2001
From: Dmitry Zuykov <dzuikov@gmail.com>
Date: Thu, 15 May 2025 05:04:58 +0300
Subject: [PATCH] wip

---
 hbs2-storage-ncq/hbs2-storage-ncq.cabal  | 1 +
 hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs | 5 +++++
 2 files changed, 6 insertions(+)

diff --git a/hbs2-storage-ncq/hbs2-storage-ncq.cabal b/hbs2-storage-ncq/hbs2-storage-ncq.cabal
index ed6f6ce9..32e5da94 100644
--- a/hbs2-storage-ncq/hbs2-storage-ncq.cabal
+++ b/hbs2-storage-ncq/hbs2-storage-ncq.cabal
@@ -91,6 +91,7 @@ library
                     , unliftio
                     , unordered-containers
                     , vector
+                    , zstd
 
 
     hs-source-dirs:   lib
diff --git a/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs b/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs
index 6bb315cf..29d61526 100644
--- a/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs
+++ b/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs
@@ -17,6 +17,11 @@ import HBS2.Data.Log.Structured.SD
 import Data.Config.Suckless.System
 import Data.Config.Suckless.Script hiding (void)
 
+import Codec.Compression.Zstd qualified as Zstd
+import Codec.Compression.Zstd.Lazy as ZstdL
+import Codec.Compression.Zstd.Streaming qualified as ZstdS
+import Codec.Compression.Zstd.Streaming (Result(..))
+
 import Control.Applicative
 import Data.ByteString.Builder
 import Network.ByteOrder qualified as N