nice-html-0.3.0: benchmarks/MemProf.hs

-- with stack, compile this with --profile --benchmark-arguments '+RTS -p'
import qualified BigTable.Nice as Nice
import qualified Weigh         as Mem

{-# NOINLINE rows #-}
rows :: Int -> [[Int]]
rows i = replicate i [1..10]

main :: IO ()
main = Mem.mainWith (Nice.weight (rows 100))