X-Git-Url: http://git.subgeniuskitty.com/vvhitespace/.git/blobdiff_plain/9686c90139fc19b70f42283b1504ab9d5be7932c..6e942bd8524e9393f61a0358a0282b2641f9d3d7:/tests/1001_stack_operations.pvvs?ds=inline

diff --git a/tests/1001_stack_operations.pvvs b/tests/1001_stack_operations.pvvs
new file mode 100644
index 0000000..d8333e4
--- /dev/null
+++ b/tests/1001_stack_operations.pvvs
@@ -0,0 +1,10 @@
+# This test verifies operations under the Stack IMP ([Space]).
+
+SSSTSSSSSTN     | ST: Push +65 (ASCII A)
+SSSTSSSSTSN     | ST: Push +66 (ASCII B)
+SNS             | ST: Duplicate TOS
+TNSS            | IO: Output character
+SNT             | ST: Swap TOS and NOS
+SNN             | ST: Discard TOS
+TNSS            | IO: Output character
+NNN             | FC: Terminate program