aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLouis Pilfold <louis@lpil.uk>2019-09-15 21:34:53 +0100
committerLouis Pilfold <louis@lpil.uk>2019-09-17 12:59:32 +0100
commit9d282d68b5a2764ab73c2dead1df0b0ab8b8edaa (patch)
tree69de2167e440b2f0414dd1d8d9bc920f3f7d4383
parent0579308bf0559635e3742e7fa634648182d916c5 (diff)
downloadgleam_stdlib-9d282d68b5a2764ab73c2dead1df0b0ab8b8edaa.tar.gz
gleam_stdlib-9d282d68b5a2764ab73c2dead1df0b0ab8b8edaa.zip
Note stdlib sites to be updated
-rw-r--r--src/gleam/any.gleam1
-rw-r--r--src/gleam/bool.gleam1
-rw-r--r--src/gleam/list.gleam1
-rw-r--r--src/gleam/map.gleam1
-rw-r--r--src/gleam/order.gleam1
-rw-r--r--src/gleam/tuple.gleam2
-rw-r--r--test/gleam/any_test.gleam1
-rw-r--r--test/gleam/list_test.gleam1
-rw-r--r--test/gleam/map_test.gleam1
-rw-r--r--test/gleam/result_test.gleam1
-rw-r--r--test/gleam/tuple_test.gleam2
11 files changed, 13 insertions, 0 deletions
diff --git a/src/gleam/any.gleam b/src/gleam/any.gleam
index 5f0d5e3..611d4fd 100644
--- a/src/gleam/any.gleam
+++ b/src/gleam/any.gleam
@@ -46,6 +46,7 @@ pub fn list(any, decode) {
|> result.then(_, list_mod.traverse(_, decode))
}
+// TODO: replace struct with Pair
pub external fn struct2(Any) -> Result(struct(Any, Any), String)
= "gleam__stdlib" "decode_struct2"
diff --git a/src/gleam/bool.gleam b/src/gleam/bool.gleam
index 438c232..81e0cea 100644
--- a/src/gleam/bool.gleam
+++ b/src/gleam/bool.gleam
@@ -7,6 +7,7 @@ pub fn negate(bool) {
}
}
+// TODO: replace struct with Pair
pub fn compare(a, b) {
case struct(a, b) {
| struct(True, True) -> order.Eq
diff --git a/src/gleam/list.gleam b/src/gleam/list.gleam
index 7b13760..195e1b5 100644
--- a/src/gleam/list.gleam
+++ b/src/gleam/list.gleam
@@ -187,6 +187,7 @@ pub fn any(list, f) {
}
}
+// TODO: replace struct with Pair
pub fn zip(l1, l2) {
case struct(l1, l2) {
| struct([], _) -> []
diff --git a/src/gleam/map.gleam b/src/gleam/map.gleam
index 5e24816..ba03b78 100644
--- a/src/gleam/map.gleam
+++ b/src/gleam/map.gleam
@@ -88,6 +88,7 @@ pub fn update(dict, key, f) {
}
fn do_fold(list, acc, f) {
+ // TODO: replace struct with Pair
case list {
| [] -> acc
| [struct(k, v) | tail] -> do_fold(tail, f(k, v, acc), f)
diff --git a/src/gleam/order.gleam b/src/gleam/order.gleam
index 48a4b40..5913479 100644
--- a/src/gleam/order.gleam
+++ b/src/gleam/order.gleam
@@ -20,6 +20,7 @@ pub fn to_int(order) {
}
}
+// TODO: replace struct with Pair
pub fn compare(a, b) {
case struct(a, b) {
| struct(Lt, Lt) -> Eq
diff --git a/src/gleam/tuple.gleam b/src/gleam/tuple.gleam
index 03ee14d..88c2a6a 100644
--- a/src/gleam/tuple.gleam
+++ b/src/gleam/tuple.gleam
@@ -1,5 +1,7 @@
import gleam/list
+// TODO: replace struct with Pair
+
pub fn new(a, b) {
struct(a, b)
}
diff --git a/test/gleam/any_test.gleam b/test/gleam/any_test.gleam
index 13af0cb..fc9640d 100644
--- a/test/gleam/any_test.gleam
+++ b/test/gleam/any_test.gleam
@@ -210,6 +210,7 @@ pub fn list_test() {
|> expect.is_error
}
+// TODO: replace struct with Pair
pub fn struct2_test() {
struct(1, [])
|> any.from
diff --git a/test/gleam/list_test.gleam b/test/gleam/list_test.gleam
index 4be190d..1270ff3 100644
--- a/test/gleam/list_test.gleam
+++ b/test/gleam/list_test.gleam
@@ -195,6 +195,7 @@ pub fn zip_test() {
list.zip([1, 2], [])
|> expect.equal(_, [])
+ // TODO: replace struct with Pair
list.zip([1, 2, 3], [4, 5, 6])
|> expect.equal(_, [struct(1, 4), struct(2, 5), struct(3, 6)])
diff --git a/test/gleam/map_test.gleam b/test/gleam/map_test.gleam
index 529afe2..bef0e76 100644
--- a/test/gleam/map_test.gleam
+++ b/test/gleam/map_test.gleam
@@ -2,6 +2,7 @@ import gleam/string
import gleam/expect
import gleam/map
+// TODO: replace struct with Pair
pub fn from_list_test() {
[
struct(4, 0),
diff --git a/test/gleam/result_test.gleam b/test/gleam/result_test.gleam
index 10d2cf6..9113e6c 100644
--- a/test/gleam/result_test.gleam
+++ b/test/gleam/result_test.gleam
@@ -36,6 +36,7 @@ pub fn map_error_test() {
|> result.map_error(_, fn(x) { x + 1 })
|> expect.equal(_, Ok(1))
+ // TODO: replace struct with Pair
Error(1)
|> result.map_error(_, fn(x) { struct("ok", x + 1) })
|> expect.equal(_, Error(struct("ok", 2)))
diff --git a/test/gleam/tuple_test.gleam b/test/gleam/tuple_test.gleam
index 4876241..a1693b0 100644
--- a/test/gleam/tuple_test.gleam
+++ b/test/gleam/tuple_test.gleam
@@ -1,6 +1,8 @@
import gleam/expect
import gleam/tuple
+// TODO: replace struct with Pair
+
pub fn new_test() {
tuple.new(1, 2)
|> expect.equal(_, struct(1, 2))