diff options
| -rw-r--r-- | src/bool.gleam | 10 | ||||
| -rw-r--r-- | src/result.gleam | 9 |
2 files changed, 5 insertions, 14 deletions
diff --git a/src/bool.gleam b/src/bool.gleam index 69f01f9..a83391d 100644 --- a/src/bool.gleam +++ b/src/bool.gleam @@ -16,11 +16,11 @@ test not { } pub fn compare(a, b) { - case (a, b) { - | (True, True) -> Eq - | (True, False) -> Gt - | (False, False) -> Eq - | (False, True) -> Gt + case {a, b} { + | {True, True} -> Eq + | {True, False} -> Gt + | {False, False} -> Eq + | {False, True} -> Gt } } diff --git a/src/result.gleam b/src/result.gleam index 38dd552..ffd99e0 100644 --- a/src/result.gleam +++ b/src/result.gleam @@ -77,15 +77,6 @@ pub fn flatten(result) { } } -// TODO: This one doesn't type check. I think because we don't generalize for -// case expressions -// pub fn flatten(result) { -// case result { -// | Ok(x) -> x -// | Error(_) -> result -// } -// } - test flatten { flatten(Ok(Ok(1))) |> expect:equal(_, Ok(1)) |