Added stdlib tests for slurp and spew.

[vvhitespace] / stdlib_tests / 2001_spew.pvvs

diff --git a/stdlib_tests/2001_spew.pvvs b/stdlib_tests/2001_spew.pvvs
new file mode 100644 (file)
index 0000000..8d89bc1
--- /dev/null
+++ b/stdlib_tests/2001_spew.pvvs
@@ -0,0 +1,16 @@
+SSSTTTTSTSSN    | PUSH 244
+SSSTTTTSSTTN    | PUSH 243
+SSSTTTTSSTSN    | PUSH 242
+
+SSSTSSSSSN      | PUSH 32 (address)
+SSSTSN          | PUSH 2 (count)
+NSTTTTTTN       | JSR > 11111 (spew)
+
+SSSTSSSTSN      | PUSH 34 (end address)
+SSSTSSSSSN      | PUSH 32 (start address)
+NSTTTTSSSN      | JSR > 111000 (dumpheap)
+
+NNN             | DIE
+
+#include <heap.pvvs>
+#include <debug.pvvs>