diff options
| author | Louis Pilfold <louis@lpil.uk> | 2018-10-13 20:54:55 +0000 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2018-10-13 20:54:55 +0000 |
| commit | 9ccf9d85a17c554f3fd78379b641467e79213413 (patch) | |
| tree | 98da0ca430a59afedf3431bd91ed3a051a38e2aa /src/bool.gleam | |
| parent | 0e41165e9ce288a253c78e8d7a5f224cd9489535 (diff) | |
| download | gleam_stdlib-9ccf9d85a17c554f3fd78379b641467e79213413.tar.gz gleam_stdlib-9ccf9d85a17c554f3fd78379b641467e79213413.zip | |
un-namespace enum constructors
Diffstat (limited to 'src/bool.gleam')
| -rw-r--r-- | src/bool.gleam | 24 |
1 files changed, 9 insertions, 15 deletions
diff --git a/src/bool.gleam b/src/bool.gleam index a4d6878..a409bc1 100644 --- a/src/bool.gleam +++ b/src/bool.gleam @@ -1,10 +1,4 @@ -import order:Order - -pub enum Bool = - | True - | False - -import Bool:* +import order:[GT, EQ, LT] pub fn not(bool) { case bool { @@ -23,25 +17,25 @@ test not { pub fn compare(a, b) { case (a, b) { - | (True, True) => Order:EQ - | (True, False) => Order:GT - | (False, False) => Order:EQ - | (False, True) => Order:GT + | (True, True) => EQ + | (True, False) => GT + | (False, False) => EQ + | (False, True) => GT } } test compare { compare(True, True) - |> assert:equal(_, Order:EQ) + |> assert:equal(_, EQ) compare(True, False) - |> assert:equal(_, Order:GT) + |> assert:equal(_, GT) compare(False, False) - |> assert:equal(_, Order:LT) + |> assert:equal(_, LT) compare(False, True) - |> assert:equal(_, Order:GT) + |> assert:equal(_, GT) } pub fn max(a, b) { |