From 4723fc10d5d0038b68f1f93654f8f7c4d5eb5296 Mon Sep 17 00:00:00 2001 From: voidlizard Date: Mon, 25 Aug 2025 09:51:36 +0300 Subject: [PATCH] minor endurance test fix --- hbs2-tests/test/NCQ3/Endurance.hs | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/hbs2-tests/test/NCQ3/Endurance.hs b/hbs2-tests/test/NCQ3/Endurance.hs index 329ee28d..c3be6045 100644 --- a/hbs2-tests/test/NCQ3/Endurance.hs +++ b/hbs2-tests/test/NCQ3/Endurance.hs @@ -230,6 +230,11 @@ validateTestResult logFile = do atomically $ modifyTVar refs (HM.insert h (Left ())) _ -> none + entry $ bindMatch "compact" $ nil_ $ const none + entry $ bindMatch "merge" $ nil_ $ const none + entry $ bindMatch "sweep" $ nil_ $ const none + + -- читаем лог построчно и скармливаем dict rs <- lines <$> liftIO (IO.readFile logFile) for_ rs $ \s -> case parseTop s of