nikita-volkov/hasql
1
1
Fork 0
mirror of https://github.com/nikita-volkov/hasql.git synced 2024-11-23 10:42:19 +03:00
Code Issues Projects Releases Wiki Activity

Fix the benchmarks declaration evaluation issues

Browse Source
This commit is contained in:
Nikita Volkov 2015-11-21 10:16:21 +03:00
parent f0b6708542
commit 9d7bfadb27
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
benchmark/Main.hs
View File

@ -26,20 +26,20 @@ main =
[
bgroup "1 column"
[
bench "1 row" $ nfIO $ query () (Q.select1 1)
bench "1 row" $ nfIO $! query () $! Q.select1 1
,
bench "100 rows" $ nfIO $ query () (Q.select1 100)
bench "100 rows" $ nfIO $! query () $! Q.select1 100
,
bench "10000 rows" $ nfIO $ query () (Q.select1 10000)
bench "10000 rows" $ nfIO $! query () $! Q.select1 10000
]
,
bgroup "4 columns"
[
bench "1 row" $ nfIO $ query () (Q.select4 1)
bench "1 row" $ nfIO $! query () $! Q.select4 1
,
bench "100 rows" $ nfIO $ query () (Q.select4 100)
bench "100 rows" $ nfIO $! query () $! Q.select4 100
,
bench "10000 rows" $ nfIO $ query () (Q.select4 10000)
bench "10000 rows" $ nfIO $! query () $! Q.select4 10000
]
]
]