shtuff

tests/programs/fib.alpha

@@ -1 +1 @@
-(* TODO: Prints out fib sequence. *)
+(* TODO *)

tests/programs/io.alpha

@@ -0,0 +1,18 @@
+#include "std.alpha"
+
+function entry: string2integer
+
+entry (arg) := {
+    [integer: x; string: s; character: c; integer: result]
+
+    s := inS(1);
+    result := printS(s);
+
+    x := inI(1);
+    result := printI(x);
+
+    c := inC(1);
+    result := printC(c);
+
+    return 0;
+}