Fix ROT/-ROT (Ian Osgood).

[jonesforth.git] / test_stack.f

diff --git a/test_stack.f b/test_stack.f
index e8e558d..1c4563d 100644 (file)
--- a/test_stack.f
+++ b/test_stack.f
@@ -7,8 +7,8 @@
        23 DROP DEPTH . CR
        1 2 SWAP . . CR
        1 2 OVER . . . CR
-       1 2 3 ROT . . . CR
        1 2 3 -ROT . . . CR
+       1 2 3 ROT . . . CR
        1 2 3 4 2DROP . . CR
        1 2 3 4 2DUP . . . . . . CR
        1 2 3 4 2SWAP . . . . CR