aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorBrett Snyder <bsnyder@digitalocean.com>2019-05-11 09:28:11 -0500
committerLouis Pilfold <louis@lpil.uk>2019-05-11 16:53:59 +0100
commit1d91cb03285269794823843e54ae3dbb43e7c4d6 (patch)
tree17a61149c5d72eafdd3e8075c31cf3513e2db34f /src
parenteb243dd13cbcdf5f6d37b7e2084414df95d7e0d9 (diff)
downloadgleam_stdlib-1d91cb03285269794823843e54ae3dbb43e7c4d6.tar.gz
gleam_stdlib-1d91cb03285269794823843e54ae3dbb43e7c4d6.zip
list:repeat
Diffstat (limited to 'src')
-rw-r--r--src/list.gleam11
1 files changed, 11 insertions, 0 deletions
diff --git a/src/list.gleam b/src/list.gleam
index 288d971..352fc77 100644
--- a/src/list.gleam
+++ b/src/list.gleam
@@ -263,3 +263,14 @@ pub fn range(start, stop) {
| order:Lt -> [start | range(start + 1, stop)]
}
}
+
+fn do_repeat(a, times, acc) {
+ case times <= 0 {
+ | True -> acc
+ | False -> do_repeat(a, times - 1, [a | acc])
+ }
+}
+
+pub fn repeat(a, times) {
+ do_repeat(a, times, [])
+}