unison/unison-src/tests/fix528.u
2021-08-24 11:33:27 -07:00

13 lines
191 B
Plaintext

(|>) : a -> (a -> b) -> b
a |> f = f a
ex1 = "bob" |> (Text.++) "hi, "
structural type Woot = Woot Text Int Nat
ex2 = match 0 |> Woot "Zonk" +10 with
Woot.Woot _ i _ -> i
> (ex1, ex2)