Fill array with same values (was issue #2462)

This commit is contained in:
Boris Vassilev
2015-05-12 15:52:38 +03:00
parent 0b184f2584
commit 3a3a7d012f

View File

@@ -24,6 +24,17 @@ proc `*`*(x: int, order: SortOrder): int {.inline.} =
var y = order.ord - 1
result = (x xor y) - y
proc fill*[T](a: var openArray[T], first, last: Natural, value: T) =
## fills the array ``a[first..last]`` with `value`.
var x = first
while x <= last:
a[x] = value
inc(x)
proc fill*[T](a: var openArray[T], value: T) =
## fills the array `a` with `value`.
fill(a, 0, a.high, value)
proc reverse*[T](a: var openArray[T], first, last: Natural) =
## reverses the array ``a[first..last]``.
var x = first