un-namespace enum constructors

4 files changed, 14 insertions, 27 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) {
diff --git a/src/list.gleam b/src/list.gleam
index 8c269f9..03762db 100644
--- a/src/list.gleam
+++ b/src/list.gleam
@@ -1,12 +1,9 @@
 import assert
-import result:Result:*
-import bool:Bool:*
+import result:[Ok, Error]
 
 pub enum Error =
   | Empty
 
-import Error:*
-
 // Using the Erlang C BIF implementation.
 //
 pub external fn length(List(a)) => Int = 'erlang' 'length'
@@ -197,7 +194,7 @@ pub fn new() {
   []
 }
 
-test new() {
+test new {
   new() |> assert:equal(_, [])
 }
 
@@ -205,7 +202,7 @@ pub fn flatten(lists) {
   do_flatten(lists, [])
 }
 
-test flatten() {
+test flatten {
   flatten([])
     |> assert:equal(_, [])
 
@@ -233,7 +230,7 @@ pub fn foldl(list, acc, fun) {
   }
 }
 
-test foldl() {
+test foldl {
   [1, 2, 3]
     |> foldl(_, [], fn(x, acc) { x :: acc })
     |> assert:equal(_, [3, 2, 1])
@@ -246,7 +243,7 @@ pub fn foldr(list, acc, fun) {
   }
 }
 
-test foldr() {
+test foldr {
   [1, 2, 3]
     |> foldr(_, [], fn(x, acc) { x :: acc })
     |> assert:equal(_, [1, 2, 3])
diff --git a/src/order.gleam b/src/order.gleam
index dbeb8e1..f38d41c 100644
--- a/src/order.gleam
+++ b/src/order.gleam
@@ -6,8 +6,6 @@ pub enum Order =
   | GT
 ;
 
-import Order:*
-
 pub fn reverse(order) {
   case order {
   | LT => GT
diff --git a/src/result.gleam b/src/result.gleam
index 996d92a..0bb1bb1 100644
--- a/src/result.gleam
+++ b/src/result.gleam
@@ -9,8 +9,6 @@ pub enum Result(error, value) =
   | Error(error)
 ;
 
-import Result:*
-
 pub fn is_ok(result) {
   case result {
   | Error(_) => False