diff options
Diffstat (limited to 'bench')
| -rw-r--r-- | bench/Main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bench/Main.hs b/bench/Main.hs index 01d9a3f..2058e77 100644 --- a/bench/Main.hs +++ b/bench/Main.hs @@ -144,10 +144,10 @@ main_tests = defaultMain ,bench "ixxFromLinear 10000x" $ let n = 10000 sh0 = SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% ZSX - in nf (\sh -> [ixxFromLinear sh i | i <- [1..n]]) sh0 + in nf (\sh -> [ixxFromLinear @Int sh i | i <- [1..n]]) sh0 ,bench "ixxFromLinear 1x" $ let sh0 = SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% ZSX - in nf (\sh -> ixxFromLinear sh 1234) sh0 + in nf (\sh -> ixxFromLinear @Int sh 1234) sh0 ,bench "shxEnum" $ let sh0 = SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% SUnknown 10 :$% ZSX in nf (\sh -> shxEnum sh) sh0 |