summaryrefslogtreecommitdiff
path: root/test.toc
diff options
context:
space:
mode:
Diffstat (limited to 'test.toc')
-rw-r--r--test.toc19
1 files changed, 17 insertions, 2 deletions
diff --git a/test.toc b/test.toc
index 3346b9e..d182a0f 100644
--- a/test.toc
+++ b/test.toc
@@ -5,7 +5,22 @@ puti @= fn(x: int) {
// #C("printf(\"%ld\\n\", (long)x)");
};
+foo @= fn() int {
+ X := new([100]int);
+ i := 0;
+ while i < 100 {
+ (*X)[i] = i;
+ i = i + 1;
+ }
+ total := 0;
+ i = 0;
+ while i < 100 {
+ total = total + (*X)[i];
+ i = i + 1;
+ }
+ total
+};
+
main @= fn() {
- Ar := new([5]int);
- A:=new(int, 100);
+ Ar : [foo()]int;
};