Minimal standard library i'll improve it later

2026-07-25 22:16:30 -04:00 · 2026-07-25 22:16:30 -04:00 · d89d239f89
commit d89d239f89
parent d2f314622a
1 changed files with 20 additions and 0 deletions
--- a/flagpole/fvmstd.fp
+++ b/flagpole/fvmstd.fp
@ -0,0 +1,20 @@
+proc putchar
+  0xCFFFFFFFFFFFFFFD st8
+endproc 
+
+proc getchar
+  0xCFFFFFFFFFFFFFFE ld8
+endproc 
+
+proc puts
+  while dup ld8 0 == not do
+    dup ld8 :putchar
+    1 u+
+  endwhile
+  pop
+endproc 
+
+proc newline
+  10 :putchar
+endproc 
+