cryptol/tests/enum/Sanity.cry
2024-01-31 12:01:52 -08:00

7 lines
66 B
Plaintext

enum Foo = MkFoo
f : Foo -> ()
f l =
case l of
MkFoo -> ()