--- /dev/null
+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>
--- /dev/null
+SSSTTTTSTSSN | PUSH 244
+SSSTTTTSSTTN | PUSH 243
+SSSTTTTSSTSN | PUSH 242
+
+SSSTSSSSSN | PUSH 32 (address)
+SSSTSN | PUSH 2 (count)
+NSTTTTTTN | JSR > 11111 (spew)
+
+SSSTSSSSSN | PUSH 32 (address)
+SSSTSN | PUSH 2 (count)
+NSTTTTTSN | JSR > 11110 (slurp)
+
+SSSTTN | PUSH 3 (count)
+NSTTTTSSTN | JSR > 111001 (dumpstack)
+
+NNN | DIE
+
+#include <heap.pvvs>
+#include <debug.pvvs>
['1001_stackrotate', '', 'TOS:\n14:\t+1\n13:\t+244\n12:\t+1\n11:\t+1\n10:\t+1\n9:\t+1\n8:\t+1\n7:\t+243\n6:\t+1\n5:\t+1\n4:\t+1\n3:\t+1\n2:\t+1\n1:\t+242\n'],
['1002_stackrotatereverse', '', 'TOS:\n14:\t+1\n13:\t+244\n12:\t+1\n11:\t+1\n10:\t+1\n9:\t+1\n8:\t+1\n7:\t+1\n6:\t+1\n5:\t+1\n4:\t+1\n3:\t+1\n2:\t+1\n1:\t+1\n'],
['1003_deepdup', '', 'TOS:\n15:\t+1\n14:\t+244\n13:\t+1\n12:\t+1\n11:\t+1\n10:\t+1\n9:\t+1\n8:\t+1\n7:\t+1\n6:\t+1\n5:\t+1\n4:\t+1\n3:\t+1\n2:\t+1\n1:\t+244\n'],
+ ['2001_spew', '', '32:\t+242\n33:\t+243\n34:\t+244\n'],
+ ['2002_slurp', '', 'TOS:\n3:\t+242\n2:\t+243\n1:\t+244\n'],
]
for test in tests: