Commit 8c2d131c authored by Camil Staps's avatar Camil Staps 🚀

Shrink match and matchlarge test cases (they were used to benchmark against...

Shrink match and matchlarge test cases (they were used to benchmark against the JMVM, which has a super-instruction for pattern matching)
parent df808685
53595600 535560
halt at 4 halt at 4
53791 470497 524288 327464 196824 524288
53595600 535560
halt at 4 halt at 4
64847 197297 262144 65454 196690 262144
...@@ -4,7 +4,7 @@ import StdEnum ...@@ -4,7 +4,7 @@ import StdEnum
import StdInt import StdInt
import StdList import StdList
Start = match 4000 Start = match 400
match :: !Int -> Int match :: !Int -> Int
match n = sum (map mtest [1..n]) match n = sum (map mtest [1..n])
......
9 9
halt at 4 halt at 4
384494 139794 524288 438990 85298 524288
9 9
halt at 4 halt at 4
191155 70989 262144 177555 84589 262144
...@@ -19,4 +19,4 @@ match H = 7 ...@@ -19,4 +19,4 @@ match H = 7
match I = 8 match I = 8
match J = 9 match J = 9
Start = maxList [match t \\ i <- [0..10000000], t <- all_constructors] Start = maxList [match t \\ i <- [0..100000], t <- all_constructors]
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment