unison/unison-src/tests/sequence-literal-argument-parsing.u

7 lines
95 B
Plaintext

structural type X a = X [a]
f : X a -> a
f = cases
X.X [b] -> b
X.X _ -> bug "unexpected"