correct cut pruning math: max -> min

Change-Id: Idc27197e527dbc88089acddc812c0d3812c6eaf9
kadena-io · Jun 14, 2024 · 17622c6 · 17622c6
1 parent 9fb14da
commit 17622c6
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/changes/2024-05-30T141430-0500.txt b/changes/2024-05-30T141430-0500.txt
@@ -0,0 +1,2 @@
+Fixes cut pruning logic; during a previous change, there was a math error that caused no cuts to
+ever be pruned from RocksDB
diff --git a/src/Chainweb/CutDB.hs b/src/Chainweb/CutDB.hs
@@ -382,7 +382,7 @@ pruneCuts
 pruneCuts logfun v conf curAvgBlockHeight cutHashesStore = do
     let avgBlockHeightPruningDepth = _cutDbParamsAvgBlockHeightPruningDepth conf
     let pruneCutHeight =
-            avgCutHeightAt v (curAvgBlockHeight - max curAvgBlockHeight avgBlockHeightPruningDepth)
+            avgCutHeightAt v (curAvgBlockHeight - min curAvgBlockHeight avgBlockHeightPruningDepth)
     logfun @T.Text Info $ "pruning CutDB before cut height " <> T.pack (show pruneCutHeight)
     deleteRangeRocksDb (unCasify cutHashesStore)
         (Nothing, Just (pruneCutHeight, 0, maxBound :: CutId))
Original file line number	Diff line number	Diff line change
		@@ -0,0 +1,2 @@
		Fixes cut pruning logic; during a previous change, there was a math error that caused no cuts to
		ever be pruned from RocksDB