soak: Pop test-program stack before comparing it to the reference.

Not after, which makes no sense.

diff --git a/soak b/soak
index 5e95d15c9a7dab45779428fcec70f36f8b4730d3..dcbba76ddf6ec7ad6c59462632f748993504b4d0 100755 (executable)
--- a/soak
+++ b/soak
@@ -403,7 +403,7 @@ while True:
   check_tree()
   if not ST.stack: break
   put(")\n")
+  ST.pop()
   dump_tree()
   check_tree()
-  ST.pop()
 ST.clear_ckpt()