Idris2/tests/idris2/with002/Temp.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

10 lines
185 B
Idris

module Temp
import Data.List
foo : (l : List Int) -> String -> String
foo l "length" with (length l)
foo l "length" | 0 = "Zero"
foo l "length" | n = "Not Zero"
foo l s = "Other"