moonlight-delta-0.1.0.0: bench/patch/Main.hs

module Main
  ( main,
  )
where

import BenchSupport (readStateScale)
import PatchBench
  ( patchBenchmarks,
  )
import Patch.Allocation
  ( runPatchAllocationOrBenchmarks,
  )

main :: IO ()
main = do
  stateScale <- readStateScale
  runPatchAllocationOrBenchmarks [patchBenchmarks stateScale]