diff options
Diffstat (limited to 'test/order_test.gleam')
-rw-r--r-- | test/order_test.gleam | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/test/order_test.gleam b/test/order_test.gleam new file mode 100644 index 0000000..07b527c --- /dev/null +++ b/test/order_test.gleam @@ -0,0 +1,52 @@ +import expect +import order + +// TODO: https://github.com/lpil/gleam/issues/141 + +// pub fn reverse_test() { +// order:reverse(Lt) |> expect:equal(_, Gt) +// order:reverse(Eq) |> expect:equal(_, Eq) +// order:reverse(Gt) |> expect:equal(_, Lt) +// } + +// pub fn to_int_test() { +// order:to_int(Lt) |> expect:equal(_, -1) +// order:to_int(Eq) |> expect:equal(_, 0) +// order:to_int(Gt) |> expect:equal(_, 1) +// } + +// pub fn compare_test() { +// order:compare(Lt, Lt) |> expect:equal(_, Eq) +// order:compare(Lt, Eq) |> expect:equal(_, Lt) +// order:compare(Lt, Gt) |> expect:equal(_, Lt) +// order:compare(Eq, Lt) |> expect:equal(_, Gt) +// order:compare(Eq, Eq) |> expect:equal(_, Eq) +// order:compare(Eq, Gt) |> expect:equal(_, Lt) +// order:compare(Gt, Lt) |> expect:equal(_, Gt) +// order:compare(Gt, Eq) |> expect:equal(_, Gt) +// order:compare(Gt, Gt) |> expect:equal(_, Eq) +// } + +// pub fn max_test() { +// order:max(Lt, Lt) |> expect:equal(_, Lt) +// order:max(Lt, Eq) |> expect:equal(_, Eq) +// order:max(Lt, Gt) |> expect:equal(_, Gt) +// order:max(Eq, Lt) |> expect:equal(_, Eq) +// order:max(Eq, Eq) |> expect:equal(_, Eq) +// order:max(Eq, Gt) |> expect:equal(_, Gt) +// order:max(Gt, Lt) |> expect:equal(_, Gt) +// order:max(Gt, Eq) |> expect:equal(_, Gt) +// order:max(Gt, Gt) |> expect:equal(_, Gt) +// } + +// pub fn min_test() { +// order:min(Lt, Lt) |> expect:equal(_, Lt) +// order:min(Lt, Eq) |> expect:equal(_, Lt) +// order:min(Lt, Gt) |> expect:equal(_, Lt) +// order:min(Eq, Lt) |> expect:equal(_, Lt) +// order:min(Eq, Eq) |> expect:equal(_, Eq) +// order:min(Eq, Gt) |> expect:equal(_, Eq) +// order:min(Gt, Lt) |> expect:equal(_, Lt) +// order:min(Gt, Eq) |> expect:equal(_, Eq) +// order:min(Gt, Gt) |> expect:equal(_, Gt) +// } |