Idris2/tests/idris2/basic017/CaseInf.idr
Edwin Brady a972778eab Add test script
They don't all pass yet, for minor reasons. Coming shortly...
Unfortunately the startup overhead for chez is really noticeable here!
2020-05-19 18:25:18 +01:00

8 lines
157 B
Idris

test3ok : Nat
test3ok = case (the Nat 1, the Nat 2) of
(x, y) => x + y
test3ok' : Nat
test3ok' = case (1, 2) of
(x, y) => x + y