samples/record_pattern.tri at main · eldridge.cam/trilogy

eldridge.cam / trilogy

Actually just three programming languages in a trenchcoat

trilogy / samples / record_pattern.tri

at main 15 lines 254 B view raw

 1proc main!() {
 2    let rec = {|
 3        1 => "a",
 4        2 => "b",
 5        3 => "c",
 6    |};
 7
 8    let y = match rec {
 9        case {| 1 => "b", 2 => _, ..c |} then c
10        case {| 1 => "a", 3 => _, ..c |} then c
11        else unit
12    }
13
14    exit y;
15}