diff options
author | Louis Pilfold <louis@lpil.uk> | 2019-03-02 19:08:46 +0000 |
---|---|---|
committer | Louis Pilfold <louis@lpil.uk> | 2019-03-02 19:10:45 +0000 |
commit | ea5e146cf5ffd26a1c77a6b7e3160d98fc503c3c (patch) | |
tree | 98c7273268ed5eecaccb2d9d88d983181496c293 /src/bool.gleam | |
parent | ceb115b4dbc878b885521743f6018563b2dea3c8 (diff) | |
download | gleam_stdlib-ea5e146cf5ffd26a1c77a6b7e3160d98fc503c3c.tar.gz gleam_stdlib-ea5e146cf5ffd26a1c77a6b7e3160d98fc503c3c.zip |
Compile stdlib
Diffstat (limited to 'src/bool.gleam')
-rw-r--r-- | src/bool.gleam | 93 |
1 files changed, 47 insertions, 46 deletions
diff --git a/src/bool.gleam b/src/bool.gleam index a83391d..5375d0e 100644 --- a/src/bool.gleam +++ b/src/bool.gleam @@ -1,42 +1,43 @@ -import order:[Gt, Eq, Lt] - -pub fn not(bool) { - case bool { - | True -> False - | False -> True - } -} - -test not { - not(True) - |> expect:false - - not(False) - |> expect:true -} - -pub fn compare(a, b) { - case {a, b} { - | {True, True} -> Eq - | {True, False} -> Gt - | {False, False} -> Eq - | {False, True} -> Gt - } -} - -test compare { - compare(True, True) - |> expect:equal(_, Eq) - - compare(True, False) - |> expect:equal(_, Gt) - - compare(False, False) - |> expect:equal(_, Lt) - - compare(False, True) - |> expect:equal(_, Gt) -} +import expect +// import order:[Gt, Eq, Lt] + +// pub fn not(bool) { +// case bool { +// | True -> False +// | False -> True +// } +// } + +// test not { +// not(True) +// |> expect:false + +// not(False) +// |> expect:true +// } + +// pub fn compare(a, b) { +// case {a, b} { +// | {True, True} -> Eq +// | {True, False} -> Gt +// | {False, False} -> Eq +// | {False, True} -> Gt +// } +// } + +// test compare { +// compare(True, True) +// |> expect:equal(_, Eq) + +// compare(True, False) +// |> expect:equal(_, Gt) + +// compare(False, False) +// |> expect:equal(_, Lt) + +// compare(False, True) +// |> expect:equal(_, Gt) +// } pub fn max(a, b) { case a { @@ -46,13 +47,13 @@ pub fn max(a, b) { } test max { - max(True, True) + let _ = max(True, True) |> expect:equal(_, True) - max(True, False) + let _ = max(True, False) |> expect:equal(_, True) - max(False, False) + let _ = max(False, False) |> expect:equal(_, False) max(False, True) @@ -67,13 +68,13 @@ pub fn min(a, b) { } test min { - min(True, True) + let _ = min(True, True) |> expect:equal(_, True) - min(True, False) + let _ = min(True, False) |> expect:equal(_, False) - min(False, False) + let _ = min(False, False) |> expect:equal(_, False) min(False, True) @@ -88,7 +89,7 @@ pub fn to_int(bool) { } test to_int { - to_int(True) + let _ = to_int(True) |> expect:equal(_, 1) to_int(False) |