Idris2/tests/idris2/reg019/lazybug.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

15 lines
253 B
Idris

bools : List Bool
bools = [True, False]
main : IO ()
main = printLn $ or (map id bools)
main2 : IO ()
main2 = printLn $ or (map (\x => x) bools)
main3 : IO ()
main3 = printLn $ or (map (\x => Delay x) bools)
main4 : IO ()
main4 = printLn $ or bools