9 lines
142 B
Plaintext
9 lines
142 B
Plaintext
namespace Foo =
|
|
datatype x = A | B(int)
|
|
|
|
contract Bar =
|
|
entrypoint f(a : Foo.x) =
|
|
switch(a)
|
|
Foo.A => 0
|
|
Foo.B(n) => n
|