diff options
author | Brett Snyder <bsnyder@digitalocean.com> | 2019-05-11 09:28:11 -0500 |
---|---|---|
committer | Louis Pilfold <louis@lpil.uk> | 2019-05-11 16:53:59 +0100 |
commit | 1d91cb03285269794823843e54ae3dbb43e7c4d6 (patch) | |
tree | 17a61149c5d72eafdd3e8075c31cf3513e2db34f /src | |
parent | eb243dd13cbcdf5f6d37b7e2084414df95d7e0d9 (diff) | |
download | gleam_stdlib-1d91cb03285269794823843e54ae3dbb43e7c4d6.tar.gz gleam_stdlib-1d91cb03285269794823843e54ae3dbb43e7c4d6.zip |
list:repeat
Diffstat (limited to 'src')
-rw-r--r-- | src/list.gleam | 11 |
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, []) +} |