samples/set_pattern.tri at string-repr-callable

Actually just three programming languages in a trenchcoat

trilogy / samples / set_pattern.tri

at string-repr-callable 10 lines 201 B view raw

wrap content

 1proc main!() {
 2    let set = [| 1, 2, 3, 4, 5 |]
 3
 4    let y = match set
 5        case [| 0, 1, 2, ..rest |] then rest
 6        case [| 1, 2, 5, ..rest |] then rest
 7        else _ then unit
 8
 9    exit y
10}