From 25ceea216ef7df30dc3a27455506f36133e26b65 Mon Sep 17 00:00:00 2001 From: voidlizard Date: Thu, 29 May 2025 11:44:28 +0300 Subject: [PATCH] ncqCompact --- hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs b/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs index 0f0b9c00..299e50b4 100644 --- a/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs +++ b/hbs2-storage-ncq/lib/HBS2/Storage/NCQ.hs @@ -1617,7 +1617,7 @@ ncqCompact ncq@NCQStorage{..} = do state0 <- readTVarIO q for_ (HM.toList state0) $ \(fk, es) -> do - notice $ "TO DELETE" <+> pretty fk <+> pretty (HS.size es) + trace $ "TO DELETE" <+> pretty fk <+> pretty (HS.size es) let fDataNameA = ncqGetDataFileName ncq fk let fIndexNameA = ncqGetIndexFileName ncq fk