; * test/src/comp-tests.el (non-locals): Repair botched test.

diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el
index 673a9342f1fcb72c0ab193dfb9252a420bdcfab3..ee6a05582d5df6f998987fedd9f888f7c78fcdb8 100644 (file)
--- a/test/src/comp-tests.el
+++ b/test/src/comp-tests.el
@@ -305,7 +305,8 @@ Check that the resulting binaries do not differ."
               (lambda () (throw 'foo 3)))
              3))
   (should (= (catch 'foo
-               (comp-tests-throw-f 3)))))
+               (comp-tests-throw-f 3))
+             3)))
 
 (comp-deftest gc ()
   "Try to do some longer computation to let the GC kick in."