diff options
author | Louis Pilfold <louis@lpil.uk> | 2019-09-15 21:34:53 +0100 |
---|---|---|
committer | Louis Pilfold <louis@lpil.uk> | 2019-09-17 12:59:32 +0100 |
commit | 9d282d68b5a2764ab73c2dead1df0b0ab8b8edaa (patch) | |
tree | 69de2167e440b2f0414dd1d8d9bc920f3f7d4383 | |
parent | 0579308bf0559635e3742e7fa634648182d916c5 (diff) | |
download | gleam_stdlib-9d282d68b5a2764ab73c2dead1df0b0ab8b8edaa.tar.gz gleam_stdlib-9d282d68b5a2764ab73c2dead1df0b0ab8b8edaa.zip |
Note stdlib sites to be updated
-rw-r--r-- | src/gleam/any.gleam | 1 | ||||
-rw-r--r-- | src/gleam/bool.gleam | 1 | ||||
-rw-r--r-- | src/gleam/list.gleam | 1 | ||||
-rw-r--r-- | src/gleam/map.gleam | 1 | ||||
-rw-r--r-- | src/gleam/order.gleam | 1 | ||||
-rw-r--r-- | src/gleam/tuple.gleam | 2 | ||||
-rw-r--r-- | test/gleam/any_test.gleam | 1 | ||||
-rw-r--r-- | test/gleam/list_test.gleam | 1 | ||||
-rw-r--r-- | test/gleam/map_test.gleam | 1 | ||||
-rw-r--r-- | test/gleam/result_test.gleam | 1 | ||||
-rw-r--r-- | test/gleam/tuple_test.gleam | 2 |
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)) |