X-Git-Url: http://git.subgeniuskitty.com/vvhitespace/.git/blobdiff_plain/2c2764b7b8e43652fe172d5fa678e0b4b647fa22..eabd8f3e2e7da4b4a3b8fef2810ec8d141e5f590:/stdlib_tests/2005_memcmp.pvvs

diff --git a/stdlib_tests/2005_memcmp.pvvs b/stdlib_tests/2005_memcmp.pvvs
new file mode 100644
index 0000000..5c59238
--- /dev/null
+++ b/stdlib_tests/2005_memcmp.pvvs
@@ -0,0 +1,24 @@
+@ Push '42' onto heap[32]-heap[33].
+SSSTSTSTSN      | PUSH 42 (pattern)
+SSSTSSSSSN      | PUSH 32 (address)
+SSSTN           | PUSH 1 (count)
+NSTTTSSSN       | JSR > 11000 (memset)
+
+@ Push '42' onto heap[64]-heap[64].
+SSSTSTSTSN      | PUSH 42 (pattern)
+SSSTSSSSSSN     | PUSH 64 (address)
+SSSTN           | PUSH 1 (count)
+NSTTTSSSN       | JSR > 11000 (memset)
+
+@ This comparison should return true.
+SSSTN           | PUSH 1 (count)
+SSSTSSSSSN      | PUSH 32 (blk1ptr)
+SSSTSSSSSSN     | PUSH 64 (blk2ptr)
+NSTTTSTTN       | JSR > 11011 (memcmp)
+
+NSTTSSTN        | JSR > 1001 (print number from stack)
+
+NNN             | DIE
+
+#include <heap.pvvs>
+#include <stdio.pvvs>