2019-06-23 05:21:30 +03:00
|
|
|
// Copyright (c) 2019 Alexander Medvednikov. All rights reserved.
|
|
|
|
// Use of this source code is governed by an MIT license
|
|
|
|
// that can be found in the LICENSE file.
|
|
|
|
|
2019-06-22 21:20:28 +03:00
|
|
|
module builtin
|
|
|
|
|
|
|
|
struct array {
|
|
|
|
// Using a void pointer allows to implement arrays without generics and without generating
|
|
|
|
// extra code for every type.
|
|
|
|
pub:
|
2019-06-23 01:24:16 +03:00
|
|
|
data voidptr
|
2019-06-22 21:20:28 +03:00
|
|
|
len int
|
|
|
|
cap int
|
|
|
|
element_size int
|
|
|
|
}
|
|
|
|
|
|
|
|
// Private function, used by V (`nums := []int`)
|
2019-06-26 17:39:40 +03:00
|
|
|
fn new_array(mylen, cap, elm_size int) array {
|
2019-06-22 21:20:28 +03:00
|
|
|
arr := array {
|
|
|
|
len: mylen
|
|
|
|
cap: cap
|
|
|
|
element_size: elm_size
|
|
|
|
data: malloc(cap * elm_size)
|
|
|
|
}
|
|
|
|
return arr
|
|
|
|
}
|
|
|
|
|
|
|
|
// Private function, used by V (`nums := [1, 2, 3]`)
|
|
|
|
fn new_array_from_c_array(len, cap, elm_size int, c_array voidptr) array {
|
|
|
|
arr := array {
|
|
|
|
len: len
|
|
|
|
cap: cap
|
|
|
|
element_size: elm_size
|
|
|
|
data: malloc(cap * elm_size)
|
|
|
|
}
|
|
|
|
// TODO Write all memory functions (like memcpy) in V
|
|
|
|
C.memcpy(arr.data, c_array, len * elm_size)
|
|
|
|
return arr
|
|
|
|
}
|
|
|
|
|
|
|
|
// Private function, used by V (`nums := [1, 2, 3] !`)
|
|
|
|
fn new_array_from_c_array_no_alloc(len, cap, elm_size int, c_array voidptr) array {
|
|
|
|
arr := array {
|
|
|
|
len: len
|
|
|
|
cap: cap
|
|
|
|
element_size: elm_size
|
|
|
|
data: c_array
|
|
|
|
}
|
|
|
|
return arr
|
|
|
|
}
|
|
|
|
|
|
|
|
// Private function, used by V (`[0; 100]`)
|
2019-06-26 17:39:40 +03:00
|
|
|
fn array_repeat(val voidptr, nr_repeats, elm_size int) array {
|
2019-06-22 21:20:28 +03:00
|
|
|
arr := array {
|
|
|
|
len: nr_repeats
|
|
|
|
cap: nr_repeats
|
|
|
|
element_size: elm_size
|
|
|
|
data: malloc(nr_repeats * elm_size)
|
|
|
|
}
|
|
|
|
for i := 0; i < nr_repeats; i++ {
|
|
|
|
C.memcpy(arr.data + i * elm_size, val, elm_size)
|
|
|
|
}
|
|
|
|
return arr
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a mut array) append_array(b array) {
|
2019-06-22 21:20:28 +03:00
|
|
|
for i := 0; i < b.len; i++ {
|
|
|
|
val := b[i]
|
|
|
|
a._push(val)
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a mut array) sort_with_compare(compare voidptr) {
|
2019-06-22 21:20:28 +03:00
|
|
|
C.qsort(a.data, a.len, a.element_size, compare)
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a mut array) insert(i int, val voidptr) {
|
2019-06-22 21:20:28 +03:00
|
|
|
if i >= a.len {
|
|
|
|
panic('array.insert: index larger than length')
|
|
|
|
return
|
|
|
|
}
|
|
|
|
a._push(val)
|
|
|
|
size := a.element_size
|
|
|
|
C.memmove(a.data + (i + 1) * size, a.data + i * size, (a.len - i) * size)
|
|
|
|
a.set(i, val)
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a mut array) prepend(val voidptr) {
|
2019-06-22 21:20:28 +03:00
|
|
|
a.insert(0, val)
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a mut array) delete(idx int) {
|
2019-06-22 21:20:28 +03:00
|
|
|
size := a.element_size
|
|
|
|
C.memmove(a.data + idx * size, a.data + (idx + 1) * size, (a.len - idx) * size)
|
|
|
|
a.len--
|
|
|
|
a.cap--
|
|
|
|
}
|
|
|
|
|
|
|
|
fn (a array) _get(i int) voidptr {
|
|
|
|
if i < 0 || i >= a.len {
|
|
|
|
panic('array index out of range: $i/$a.len')
|
|
|
|
}
|
|
|
|
return a.data + i * a.element_size
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a array) first() voidptr {
|
2019-06-22 21:20:28 +03:00
|
|
|
if a.len == 0 {
|
|
|
|
panic('array.first: empty array')
|
|
|
|
}
|
|
|
|
return a.data + 0
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a array) last() voidptr {
|
2019-06-22 21:20:28 +03:00
|
|
|
if a.len == 0 {
|
|
|
|
panic('array.last: empty array')
|
|
|
|
}
|
|
|
|
return a.data + (a.len - 1) * a.element_size
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (s array) left(n int) array {
|
2019-06-22 21:20:28 +03:00
|
|
|
if n >= s.len {
|
|
|
|
return s
|
|
|
|
}
|
|
|
|
return s.slice(0, n)
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (s array) right(n int) array {
|
2019-06-22 21:20:28 +03:00
|
|
|
if n >= s.len {
|
|
|
|
return s
|
|
|
|
}
|
|
|
|
return s.slice(n, s.len)
|
|
|
|
}
|
|
|
|
|
|
|
|
pub fn (s array) slice(start, _end int) array {
|
|
|
|
mut end := _end
|
|
|
|
if start > end {
|
|
|
|
panic('invalid slice index: $start > $end')
|
|
|
|
}
|
|
|
|
if end >= s.len {
|
|
|
|
end = s.len
|
|
|
|
}
|
|
|
|
l := end - start
|
|
|
|
res := array {
|
|
|
|
element_size: s.element_size
|
|
|
|
data: s.data + start * s.element_size
|
|
|
|
len: l
|
|
|
|
cap: l
|
|
|
|
}
|
|
|
|
return res
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a mut array) set(idx int, val voidptr) {
|
2019-06-22 21:20:28 +03:00
|
|
|
if idx < 0 || idx >= a.len {
|
|
|
|
panic('array index out of range: $idx / $a.len')
|
|
|
|
}
|
|
|
|
C.memcpy(a.data + a.element_size * idx, val, a.element_size)
|
|
|
|
}
|
|
|
|
|
2019-06-30 00:56:55 +03:00
|
|
|
fn (arr mut array) _push(val voidptr) {
|
2019-06-22 21:20:28 +03:00
|
|
|
if arr.len >= arr.cap - 1 {
|
|
|
|
cap := (arr.len + 1) * 2
|
|
|
|
// println('_push: realloc, new cap=$cap')
|
|
|
|
if arr.cap == 0 {
|
|
|
|
arr.data = malloc(cap * arr.element_size)
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
arr.data = C.realloc(arr.data, cap * arr.element_size)
|
|
|
|
}
|
|
|
|
arr.cap = cap
|
|
|
|
}
|
|
|
|
C.memcpy(arr.data + arr.element_size * arr.len, val, arr.element_size)
|
|
|
|
arr.len++
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (arr mut array) _push_many(val voidptr, size int) {
|
2019-06-22 21:20:28 +03:00
|
|
|
if arr.len >= arr.cap - size {
|
|
|
|
cap := (arr.len + size) * 2
|
|
|
|
// println('_push: realloc, new cap=$cap')
|
|
|
|
if arr.cap == 0 {
|
|
|
|
arr.data = malloc(cap * arr.element_size)
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
arr.data = C.realloc(arr.data, cap * arr.element_size)
|
|
|
|
}
|
|
|
|
arr.cap = cap
|
|
|
|
}
|
|
|
|
C.memcpy(arr.data + arr.element_size * arr.len, val, arr.element_size * size)
|
|
|
|
arr.len += size
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a[]int) str() string {
|
2019-06-22 21:20:28 +03:00
|
|
|
mut res := '['
|
|
|
|
for i := 0; i < a.len; i++ {
|
|
|
|
val := a[i]
|
|
|
|
res += '$val'
|
|
|
|
if i < a.len - 1 {
|
|
|
|
res += ', '
|
|
|
|
}
|
|
|
|
}
|
|
|
|
res += ']'
|
|
|
|
return res
|
|
|
|
}
|
|
|
|
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a[]int) free() {
|
2019-06-22 21:20:28 +03:00
|
|
|
// println('array free')
|
|
|
|
C.free(a.data)
|
|
|
|
}
|
|
|
|
|
|
|
|
// TODO generic
|
|
|
|
// "[ 'a', 'b', 'c' ]"
|
2019-06-27 14:14:59 +03:00
|
|
|
pub fn (a[]string) str() string {
|
2019-06-22 21:20:28 +03:00
|
|
|
mut res := '['
|
|
|
|
for i := 0; i < a.len; i++ {
|
|
|
|
val := a[i]
|
|
|
|
res += '"$val"'
|
|
|
|
if i < a.len - 1 {
|
|
|
|
res += ', '
|
|
|
|
}
|
|
|
|
}
|
|
|
|
res += ']'
|
|
|
|
return res
|
|
|
|
}
|
|
|
|
|
|
|
|
fn free(a voidptr) {
|
|
|
|
C.free(a)
|
|
|
|
}
|
|
|
|
|