mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-17 13:27:30 +03:00
9 lines
198 B
Plaintext
9 lines
198 B
Plaintext
structural type Choice = First | Second
|
|
structural type Wrapper = Wrapper Choice
|
|
|
|
broken = match Wrapper.Wrapper Choice.Second with
|
|
Wrapper.Wrapper Choice.First -> true
|
|
_ -> false
|
|
|
|
> broken
|