blob: 9d80856434761d8f3196252cde2b60d0d55b8b37 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
#
#
# Nim's Runtime Library
# (c) Copyright 2015 Andreas Rumpf
#
# See the file "copying.txt", included in this
# distribution, for details about the copyright.
#
## Module that implements a fixed length array whose size
## is determined at runtime. Note: This is not ready for other people to use!
const
ArrayPartSize = 10
type
RtArray*[T] = object ##
L: Natural
spart: seq[T]
apart: array [ArrayPartSize, T]
UncheckedArray* {.unchecked.}[T] = array[0..100_000_000, T]
template usesSeqPart(x): expr = x.L > ArrayPartSize
proc initRtArray*[T](len: Natural): RtArray[T] =
result.L = len
if usesSeqPart(result):
newSeq(result.spart, len)
proc getRawData*[T](x: var RtArray[T]): ptr UncheckedArray[T] =
if usesSeqPart(x): cast[ptr UncheckedArray[T]](addr(x.spart[0]))
else: cast[ptr UncheckedArray[T]](addr(x.apart[0]))
#proc len*[T](x: RtArray[T]): int = x.L
|