Merge pull request #113 from aeternity/test-fixes

Update test case
This commit is contained in:
Ulf Norell 2019-08-05 09:31:31 +02:00 committed by GitHub
commit e198dd8311
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1,36 +1,36 @@
contract TuplesMatch =
contract TuplesMatch =
entrypoint tuplify3() = (t) => switch(t)
(x, y, z) => 3
entrypoint fst(p : (int, string)) =
entrypoint fst(p : int * string) =
switch(p)
(x, y) => x
entrypoint fst'(p : (int, string)) =
entrypoint fst'(p : int * string) =
switch(p)
(x, _) => x
entrypoint snd(p : (int, string)) =
entrypoint snd(p : int * string) =
switch(p)
(x, y) => y
entrypoint snd'(p : (int, string)) =
entrypoint snd'(p : int * string) =
switch(p)
(_, y) => y
entrypoint sum(p) =
switch(p)
(x, y) => x + y
entrypoint swap(p : (int, string)) =
entrypoint swap(p : int * string) =
switch(p)
(x, y) => (y, x)
entrypoint id(p : (int, int, string)) =
entrypoint id(p : int * int * string) =
switch(p)
(x, y, z) => (x, y, z)
entrypoint nest(p : ((int, int), string)) =
entrypoint nest(p : (int * int) * string) =
switch(p)
(xy, z) => switch(xy) (x, y) => (x, y, z)
entrypoint deep(p : ((int, int), (int, int))) =
entrypoint deep(p : (int * int) * (int * int)) =
switch(p)
((x, y), (z, w)) => (x, y, z, w)
entrypoint deep_sum(p : ((int, int), (int, int))) =
entrypoint deep_sum(p : (int * int) * (int * int)) =
switch(p)
((x, y), (z, w)) => x + y + z + w