Implemented getuint and fixed a bug with variables

2026-07-26 17:49:29 -04:00 · 2026-07-26 17:49:29 -04:00 · 022e812c1d
commit 022e812c1d
parent 441d737cf1
7 changed files with 75 additions and 1 deletions
--- a/flagpole/tests/ascii.fp
+++ b/flagpole/tests/ascii.fp
@ -0,0 +1,7 @@
+$inc fvmstd.fp
+
+proc main
+  :getchar
+  :putuint
+  :newline
+endproc
--- a/flagpole/tests/cat.fp
+++ b/flagpole/tests/cat.fp
@ -0,0 +1,7 @@
+$inc fvmstd.fp
+
+proc main
+  while 1 do
+    :getchar :putchar
+  endwhile
+endproc
--- a/flagpole/tests/numinp.fp
+++ b/flagpole/tests/numinp.fp
@ -0,0 +1,8 @@
+$inc fvmstd.fp
+
+proc main
+  "Sum Program" :puts :newline
+  :getuint
+  :getuint u+
+  :putuint :newline
+endproc