aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLouis Pilfold <louis@lpil.uk>2024-03-04 19:05:56 +0000
committerLouis Pilfold <louis@lpil.uk>2024-03-04 19:05:56 +0000
commit87c54cf8b12aed34578e4f919b6c8fa22edb2b8c (patch)
tree79a08d92cbb6d820c6d8595f7b43c7c70045ed45
parent9a908c5e77a5fdf786326f7cd81cc16e93b16c5f (diff)
downloadgleam_stdlib-87c54cf8b12aed34578e4f919b6c8fa22edb2b8c.tar.gz
gleam_stdlib-87c54cf8b12aed34578e4f919b6c8fa22edb2b8c.zip
Update for latest Gleam
-rw-r--r--.github/workflows/ci.yml4
-rw-r--r--src/gleam/bytes_builder.gleam10
-rw-r--r--src/gleam/dict.gleam35
-rw-r--r--src/gleam/dynamic.gleam4
-rw-r--r--src/gleam/iterator.gleam14
-rw-r--r--src/gleam/list.gleam6
-rw-r--r--src/gleam/set.gleam15
-rw-r--r--src/gleam/string.gleam17
-rw-r--r--src/gleam/string_builder.gleam5
9 files changed, 28 insertions, 82 deletions
diff --git a/.github/workflows/ci.yml b/.github/workflows/ci.yml
index ec12a1b..b85f373 100644
--- a/.github/workflows/ci.yml
+++ b/.github/workflows/ci.yml
@@ -15,8 +15,8 @@ jobs:
- uses: erlef/setup-beam@v1
with:
otp-version: "26.0.2"
- gleam-version: "0.34.0"
- - uses: actions/setup-node@v3.5.1
+ gleam-version: "1.0.0"
+ - uses: actions/setup-node@v3
with:
node-version: "16.18.1"
- run: gleam test --target erlang
diff --git a/src/gleam/bytes_builder.gleam b/src/gleam/bytes_builder.gleam
index 45f7cc9..20c145d 100644
--- a/src/gleam/bytes_builder.gleam
+++ b/src/gleam/bytes_builder.gleam
@@ -37,10 +37,7 @@ pub fn new() -> BytesBuilder {
///
/// Runs in constant time.
///
-pub fn prepend(
- to second: BytesBuilder,
- prefix first: BitArray,
-) -> BytesBuilder {
+pub fn prepend(to second: BytesBuilder, prefix first: BitArray) -> BytesBuilder {
append_builder(from_bit_array(first), second)
}
@@ -68,7 +65,10 @@ pub fn prepend_builder(
/// Runs in constant time.
///
@external(erlang, "gleam_stdlib", "iodata_append")
-pub fn append_builder(to first: BytesBuilder, suffix second: BytesBuilder) -> BytesBuilder {
+pub fn append_builder(
+ to first: BytesBuilder,
+ suffix second: BytesBuilder,
+) -> BytesBuilder {
case second {
Many(builders) -> Many([first, ..builders])
_ -> Many([first, second])
diff --git a/src/gleam/dict.gleam b/src/gleam/dict.gleam
index 35f5861..e6b6e5b 100644
--- a/src/gleam/dict.gleam
+++ b/src/gleam/dict.gleam
@@ -151,11 +151,7 @@ fn do_get(a: Dict(key, value), b: key) -> Result(value, Nil)
/// // -> from_list([#("a", 5)])
/// ```
///
-pub fn insert(
- into dict: Dict(k, v),
- for key: k,
- insert value: v,
-) -> Dict(k, v) {
+pub fn insert(into dict: Dict(k, v), for key: k, insert value: v) -> Dict(k, v) {
do_insert(key, value, dict)
}
@@ -277,10 +273,10 @@ pub fn filter(
}
@external(erlang, "maps", "filter")
-fn do_filter(f: fn(key, value) -> Bool, dict: Dict(key, value)) -> Dict(
- key,
- value,
-) {
+fn do_filter(
+ f: fn(key, value) -> Bool,
+ dict: Dict(key, value),
+) -> Dict(key, value) {
let insert = fn(dict, k, v) {
case f(k, v) {
True -> insert(dict, k, v)
@@ -308,10 +304,7 @@ fn do_filter(f: fn(key, value) -> Bool, dict: Dict(key, value)) -> Dict(
/// // -> from_list([#("a", 0), #("b", 1)])
/// ```
///
-pub fn take(
- from dict: Dict(k, v),
- keeping desired_keys: List(k),
-) -> Dict(k, v) {
+pub fn take(from dict: Dict(k, v), keeping desired_keys: List(k)) -> Dict(k, v) {
do_take(desired_keys, dict)
}
@@ -351,10 +344,7 @@ fn insert_taken(
/// // -> from_list([#("a", 0), #("b", 2), #("c", 3)])
/// ```
///
-pub fn merge(
- into dict: Dict(k, v),
- from new_entries: Dict(k, v),
-) -> Dict(k, v) {
+pub fn merge(into dict: Dict(k, v), from new_entries: Dict(k, v)) -> Dict(k, v) {
do_merge(dict, new_entries)
}
@@ -419,10 +409,7 @@ fn do_delete(a: k, b: Dict(k, v)) -> Dict(k, v)
/// // -> from_list([])
/// ```
///
-pub fn drop(
- from dict: Dict(k, v),
- drop disallowed_keys: List(k),
-) -> Dict(k, v) {
+pub fn drop(from dict: Dict(k, v), drop disallowed_keys: List(k)) -> Dict(k, v) {
case disallowed_keys {
[] -> dict
[x, ..xs] -> drop(delete(dict, x), xs)
@@ -464,11 +451,7 @@ pub fn update(
|> insert(dict, key, _)
}
-fn do_fold(
- list: List(#(k, v)),
- initial: acc,
- fun: fn(acc, k, v) -> acc,
-) -> acc {
+fn do_fold(list: List(#(k, v)), initial: acc, fun: fn(acc, k, v) -> acc) -> acc {
case list {
[] -> initial
[#(k, v), ..rest] -> do_fold(rest, fun(initial, k, v), fun)
diff --git a/src/gleam/dynamic.gleam b/src/gleam/dynamic.gleam
index b8217a9..2a99510 100644
--- a/src/gleam/dynamic.gleam
+++ b/src/gleam/dynamic.gleam
@@ -234,9 +234,7 @@ fn decode_bool(a: Dynamic) -> Result(Bool, DecodeErrors)
/// // -> Error([DecodeError(expected: "List", found: "Int", path: [])])
/// ```
///
-pub fn shallow_list(
- from value: Dynamic,
-) -> Result(List(Dynamic), DecodeErrors) {
+pub fn shallow_list(from value: Dynamic) -> Result(List(Dynamic), DecodeErrors) {
decode_list(value)
}
diff --git a/src/gleam/iterator.gleam b/src/gleam/iterator.gleam
index 36f2c7b..44d3103 100644
--- a/src/gleam/iterator.gleam
+++ b/src/gleam/iterator.gleam
@@ -448,10 +448,7 @@ fn do_append(first: fn() -> Action(a), second: fn() -> Action(a)) -> Action(a) {
/// // -> [1, 2, 3, 4]
/// ```
///
-pub fn append(
- to first: Iterator(a),
- suffix second: Iterator(a),
-) -> Iterator(a) {
+pub fn append(to first: Iterator(a), suffix second: Iterator(a)) -> Iterator(a) {
fn() { do_append(first.continuation, second.continuation) }
|> Iterator
}
@@ -628,10 +625,7 @@ pub fn range(from start: Int, to stop: Int) -> Iterator(Int) {
}
}
-fn do_find(
- continuation: fn() -> Action(a),
- f: fn(a) -> Bool,
-) -> Result(a, Nil) {
+fn do_find(continuation: fn() -> Action(a), f: fn(a) -> Bool) -> Result(a, Nil) {
case continuation() {
Stop -> Error(Nil)
Continue(e, next) ->
@@ -1147,9 +1141,7 @@ pub fn all(
|> do_all(predicate)
}
-fn update_group_with(
- el: element,
-) -> fn(Option(List(element))) -> List(element) {
+fn update_group_with(el: element) -> fn(Option(List(element))) -> List(element) {
fn(maybe_group) {
case maybe_group {
Some(group) -> [el, ..group]
diff --git a/src/gleam/list.gleam b/src/gleam/list.gleam
index 4cbc71a..8235d77 100644
--- a/src/gleam/list.gleam
+++ b/src/gleam/list.gleam
@@ -398,11 +398,7 @@ pub fn map(list: List(a), with fun: fn(a) -> b) -> List(b) {
/// // -> [#(1, "a"), #(2, "b")]
/// ```
///
-pub fn map2(
- list1: List(a),
- list2: List(b),
- with fun: fn(a, b) -> c,
-) -> List(c) {
+pub fn map2(list1: List(a), list2: List(b), with fun: fn(a, b) -> c) -> List(c) {
do_map2(list1, list2, fun, [])
}
diff --git a/src/gleam/set.gleam b/src/gleam/set.gleam
index 240ff06..e36d47f 100644
--- a/src/gleam/set.gleam
+++ b/src/gleam/set.gleam
@@ -197,10 +197,7 @@ pub fn filter(
Set(dict.filter(in: set.map, keeping: fn(m, _) { predicate(m) }))
}
-pub fn drop(
- from set: Set(member),
- drop disallowed: List(member),
-) -> Set(member) {
+pub fn drop(from set: Set(member), drop disallowed: List(member)) -> Set(member) {
list.fold(over: disallowed, from: set, with: delete)
}
@@ -218,17 +215,11 @@ pub fn drop(
/// // -> [1, 3]
/// ```
///
-pub fn take(
- from set: Set(member),
- keeping desired: List(member),
-) -> Set(member) {
+pub fn take(from set: Set(member), keeping desired: List(member)) -> Set(member) {
Set(dict.take(from: set.map, keeping: desired))
}
-fn order(
- first: Set(member),
- second: Set(member),
-) -> #(Set(member), Set(member)) {
+fn order(first: Set(member), second: Set(member)) -> #(Set(member), Set(member)) {
case dict.size(first.map) > dict.size(second.map) {
True -> #(first, second)
False -> #(second, first)
diff --git a/src/gleam/string.gleam b/src/gleam/string.gleam
index da5c394..5bfd83b 100644
--- a/src/gleam/string.gleam
+++ b/src/gleam/string.gleam
@@ -213,11 +213,7 @@ fn less_than(a: String, b: String) -> Bool
/// // -> ""
/// ```
///
-pub fn slice(
- from string: String,
- at_index idx: Int,
- length len: Int,
-) -> String {
+pub fn slice(from string: String, at_index idx: Int, length len: Int) -> String {
case len < 0 {
True -> ""
False ->
@@ -394,10 +390,7 @@ pub fn split_once(
fn erl_split(a: String, b: String) -> List(String)
@target(erlang)
-fn do_split_once(
- x: String,
- substring: String,
-) -> Result(#(String, String), Nil) {
+fn do_split_once(x: String, substring: String) -> Result(#(String, String), Nil) {
case erl_split(x, substring) {
[first, rest] -> Ok(#(first, rest))
_ -> Error(Nil)
@@ -509,11 +502,7 @@ fn do_join(strings: List(String), separator: String) -> String {
/// // -> "121"
/// ```
///
-pub fn pad_left(
- string: String,
- to desired_length: Int,
- with pad_string: String,
-) {
+pub fn pad_left(string: String, to desired_length: Int, with pad_string: String) {
let current_length = length(string)
let to_pad_length = desired_length - current_length
padding(to_pad_length, pad_string)
diff --git a/src/gleam/string_builder.gleam b/src/gleam/string_builder.gleam
index cd2b247..06916bc 100644
--- a/src/gleam/string_builder.gleam
+++ b/src/gleam/string_builder.gleam
@@ -38,10 +38,7 @@ pub fn prepend(
///
/// Runs in constant time.
///
-pub fn append(
- to builder: StringBuilder,
- suffix second: String,
-) -> StringBuilder {
+pub fn append(to builder: StringBuilder, suffix second: String) -> StringBuilder {
append_builder(builder, from_string(second))
}