mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-08-15 14:50:42 +03:00
22 lines
321 B
Plaintext
22 lines
321 B
Plaintext
---
|
|
source: tests/golden_tests.rs
|
|
input_file: tests/golden_tests/encode_pattern_match/match_adt_unscoped_in_arm.bend
|
|
---
|
|
Scott
|
|
(main) = λ* λ$x $x
|
|
|
|
(bool/T) = λa λ* a
|
|
|
|
(bool/F) = λ* λb b
|
|
|
|
NumScott
|
|
(main) = λ* λ$x $x
|
|
|
|
(bool/T) = λa (a bool/T/tag)
|
|
|
|
(bool/F) = λa (a bool/F/tag)
|
|
|
|
(bool/T/tag) = 0
|
|
|
|
(bool/F/tag) = 1
|