Added tests for stdlib subroutine `strlen`.

[vvhitespace] / stdlib_tests / 4001_strlen.pvvs

diff --git a/stdlib_tests/4001_strlen.pvvs b/stdlib_tests/4001_strlen.pvvs
new file mode 100644 (file)
index 0000000..7c0e0af
--- /dev/null
+++ b/stdlib_tests/4001_strlen.pvvs
@@ -0,0 +1,14 @@
+A"Hello World"
+SSSTSSSSSN      | PUSH 32 (address)
+SSSTSTTN        | PUSH 11 (count)
+NSTTTTTTN       | JSR > 11111 (spew)
+
+SSSTSSSSSN      | PUSH 32 (address)
+NSTTSSSSSN      | JSR > 100000 (strlen)
+NSTTSSTN        | JSR > 1001 (print number from stack)
+
+NNN             | DIE
+
+#include <stdio.pvvs>
+#include <heap.pvvs>
+#include <string.pvvs>