Include size of the table in WP8 benchmark snapshots

This allows each `setup` to store its own snapshot based on the `--initial-size`
parameter. This makes it slightly easier to run multiple benchmarks with
different `--initial-size`s from the same session directory.

Author: jorisdral

bench/macro/utxo-bench.hs

@@ -447,7 +447,7 @@ doSetup' gopts opts = do
 
     hasBlockIO <- FsIO.ioHasBlockIO hasFS FS.defaultIOCtxParams
 
-    let name = LSM.toSnapshotName "bench"
+    let name = LSM.toSnapshotName ("bench_" ++ show (initialSize gopts))
 
     LSM.withOpenSession (mkTracer gopts) hasFS hasBlockIO benchSalt (FS.mkFsPath []) $ \session -> do
         tbl <- LSM.newTableWith @IO @K @V @B (mkTableConfigSetup gopts opts benchTableConfig) session