d6e7172 · elk · git.iko.soy

git.iko.soy/elk

on master help sign in

Define convenience function List.replicate.

d6e7172Alexander Noriega13 years ago

libraries/List.elm+4

compare with master

unifiedsplit

@@ -185,3 +185,7 @@ take = Native.List.take

185-- Drop the first n members of a list: `(drop 2 [1,2,3,4] == [3,4])`

186drop : Int -> [a] -> [a]

187drop = Native.List.drop

188+

189+-- Creates a list with n copies of a value: `(replicate 3 (0,0) == [(0,0),(0,0),(0,0)]`

190+replicate : Int -> a -> [a]

191+replicate = Native.List.replicate

libraries/Native/List.js+11−1

@@ -241,6 +241,15 @@ Elm.Native.List = function(elm) {

241 return xs;

242 }

243

244+ function replicate(n, a) {

245+ var arr = [];

246+ while (n > 0) {

247+ arr.push(a);

248+ --n;

249+ }

250+ return fromArray(arr);

251+ }

252+

244 function join(sep, xss) {

253 function join(sep, xss) {

245 if (typeof sep === 'string') return toArray(xss).join(sep);

254 if (typeof sep === 'string') return toArray(xss).join(sep);

246 if (xss.ctor === '[]') return Nil;

255 if (xss.ctor === '[]') return Nil;

@@ -344,10 +353,11 @@ Elm.Native.List = function(elm) {

344 nth:F2(nth),

353 nth:F2(nth),

345 take:F2(take),

354 take:F2(take),

346 drop:F2(drop),

355 drop:F2(drop),

356+ replicate:F2(replicate),

347

357

348 join:F2(join),

358 join:F2(join),

349 split:F2(split)

359 split:F2(split)

350 };

360 };

351 return elm.Native.List = Elm.Native.List.values;

361 return elm.Native.List = Elm.Native.List.values;

352

362

353−};

363+};