wip

IntersectMBO · Apr 25, 2024 · cc025a3 · cc025a3
1 parent 59d30e8
commit cc025a3
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/bench/macro/lsm-tree-bench-wp8.hs b/bench/macro/lsm-tree-bench-wp8.hs
@@ -219,7 +219,7 @@ doDryRun gopts opts = do
         let q = n * (1 - ((d - 1) / d) ** (n - 1))
 
         printf "Probability of a duplicate: %5f\n" p
-        printf "Expected number of duplicate: %5f\n" q
+        printf "Expected number of duplicate: %5f out of %f\n" q n
 
     -- TODO: open session to measure that as well.
     let initGen = SM.mkSMGen opts.seed
@@ -257,7 +257,7 @@ doDryRun gopts opts = do
                 | k <- inserts
                 ]
 
-        evaluate $ force (batch1, batch2)
+        _ <- evaluate $ force (batch1, batch2)
 
         return nextG