summaryrefslogtreecommitdiff
path: root/tests/std/io.toc
diff options
context:
space:
mode:
Diffstat (limited to 'tests/std/io.toc')
-rw-r--r--tests/std/io.toc9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/std/io.toc b/tests/std/io.toc
index 9fa7e08..2b9e999 100644
--- a/tests/std/io.toc
+++ b/tests/std/io.toc
@@ -51,3 +51,12 @@ puti ::= fn(x: int) {
toc_putchar('\n');
}
+printf ::= #foreign("printf", base.libc) fn (#C &"const char", #C ..) #C int;
+writef ::= fn(x: float) {
+ fmt := "%f\0";
+ printf(&fmt[0], x);
+}
+putf ::= fn(x: float) {
+ writef(x);
+ toc_putchar('\n');
+}