Bend/tests/golden_tests/run_lazy/adt_match.bend

14 lines
195 B
Plaintext
Raw Permalink Normal View History

data Opt = (Some x) | None
2024-05-10 22:42:32 +03:00
Opt/map = @opt @f
match opt {
2024-05-10 22:42:32 +03:00
Opt/Some: (Opt/Some (f opt.x));
Opt/None: Opt/None
}
inc = @x (+ x 1)
main =
2024-05-10 22:42:32 +03:00
let opt = (Opt/Some 1);
(Opt/map opt inc)