diff options
Diffstat (limited to 'src')
-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 |
6 files changed, 7 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) } |