summaryrefslogtreecommitdiff
path: root/test.toc
diff options
context:
space:
mode:
Diffstat (limited to 'test.toc')
-rw-r--r--test.toc23
1 files changed, 20 insertions, 3 deletions
diff --git a/test.toc b/test.toc
index d79f526..8523940 100644
--- a/test.toc
+++ b/test.toc
@@ -1,5 +1,22 @@
-f();
+#include "std/io.toc", io;
+#include "std/base.toc", base;
-f ::= fn( ) int {
- return 3;
+main ::= fn() {
+ file, err := io.fopen_write("test.txt");
+ if err {
+ base.error("Couldn't open file!");
+ }
+ io.fputs(file, "This file has some stuff in it.");
+ io.puts("Hello!");
+ io.puts("yes");
+ io.fputs(file, "here is more stuff for the file.");
+ for i := 1..1000 {
+ io.fwrites(file, "Here's a line in the file");
+ for j := 1..i {
+ io.fwrites(file, "!");
+ }
+ io.fwrites(file, "\n");
+ }
+ io.fclose(file);
}
+main();