summaryrefslogtreecommitdiff
path: root/std/arr.toc
diff options
context:
space:
mode:
authorLeo Tenenbaum <pommicket@gmail.com>2020-01-29 11:27:37 -0500
committerLeo Tenenbaum <pommicket@gmail.com>2020-01-29 11:27:37 -0500
commitd79ac12de0ceb4ff82f486c26608b754b145f0fc (patch)
treec20bb457b7ad2a9ac9e99483d58cdcb58351e6b8 /std/arr.toc
parentc4c91e3444c4a530761f900d4f7268801e5cc55d (diff)
got rid of packages.
Diffstat (limited to 'std/arr.toc')
-rw-r--r--std/arr.toc11
1 files changed, 4 insertions, 7 deletions
diff --git a/std/arr.toc b/std/arr.toc
index 12d44f5..24fdf9f 100644
--- a/std/arr.toc
+++ b/std/arr.toc
@@ -1,13 +1,10 @@
-// array package
-pkg "arr";
-
-#export Arr ::= fn (t :: Type) Type {
+Arr ::= fn (t :: Type) Type {
struct {
data : []t;
cap : int;
}
};
-#export arr_add ::= fn(t ::=, a : &Arr(t), x : t) {
+arr_add ::= fn(t ::=, a : &Arr(t), x : t) {
if a.data.len >= a.cap {
a.cap = a.cap * 2 + 2;
new_data := new(t, a.cap);
@@ -17,7 +14,7 @@ pkg "arr";
}
a.data = new_data;
}
- a.data[a.data.len] = x;
a.data.len += 1;
+ a.data[a.data.len-1] = x;
};
-#export arr_len ::= fn(t ::=, a : Arr(t)) int { a.data.len };
+arr_len ::= fn(t ::=, a : Arr(t)) int { a.data.len };