From d613e26ebd67b704ab58c28cc559ee01ae03b547 Mon Sep 17 00:00:00 2001
From: Louis Pilfold <louis@lpil.uk>
Date: Fri, 15 Mar 2019 14:50:11 +0000
Subject: Erase directly called capture funs

---
 src/bool.gleam   | 24 ++++++++++++------------
 src/result.gleam |  2 +-
 2 files changed, 13 insertions(+), 13 deletions(-)

(limited to 'src')

diff --git a/src/bool.gleam b/src/bool.gleam
index 84e5f6c..89d39f0 100644
--- a/src/bool.gleam
+++ b/src/bool.gleam
@@ -1,20 +1,20 @@
 import expect
 import order
 
-// pub fn not(bool) {
-//   case bool {
-//   | True -> False
-//   | False -> True
-//   }
-// }
+pub fn negate(bool) {
+  case bool {
+  | True -> False
+  | False -> True
+  }
+}
 
-// test not {
-//   not(True)
-//     |> expect:false
+test negate {
+  negate(True)
+    |> expect:false
 
-//   not(False)
-//     |> expect:true
-// }
+  negate(False)
+    |> expect:true
+}
 
 // pub fn compare(a, b) {
 //   case {a, b} {
diff --git a/src/result.gleam b/src/result.gleam
index 1e4a0be..113925e 100644
--- a/src/result.gleam
+++ b/src/result.gleam
@@ -111,7 +111,7 @@ test flat_map {
     |> expect:equal(_, Ok(2))
 
   Ok(1)
-    |> flat_map(_, fn(unused) { Error(1) })
+    |> flat_map(_, fn(_) { Error(1) })
     |> expect:equal(_, Error(1))
 }
 
-- 
cgit v1.2.3