Clean-up old gc disable refuse in comp-tests-non-locals

diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el
index bd844a90c3c329bac11a0f402f579f91554fbfcf..15a39c4e8832cc7b728f266c2682565a461d0e61 100644 (file)
--- a/test/src/comp-tests.el
+++ b/test/src/comp-tests.el
@@ -258,16 +258,15 @@ Check that the resulting binaries do not differ."
 
 (ert-deftest comp-tests-non-locals ()
   "Test non locals."
-  (let ((gc-cons-threshold most-positive-fixnum)) ;; FIXME!!
-    (should (string= (comp-tests-condition-case-0-f)
-                     "arith-error Arithmetic error catched"))
-    (should (string= (comp-tests-condition-case-1-f)
-                     "error foo catched"))
-    (should (= (comp-tests-catch-f
-                                (lambda () (throw 'foo 3)))
-               3))
-    (should (= (catch 'foo
-                 (comp-tests-throw-f 3))))))
+  (should (string= (comp-tests-condition-case-0-f)
+                   "arith-error Arithmetic error catched"))
+  (should (string= (comp-tests-condition-case-1-f)
+                   "error foo catched"))
+  (should (= (comp-tests-catch-f
+              (lambda () (throw 'foo 3)))
+             3))
+  (should (= (catch 'foo
+               (comp-tests-throw-f 3)))))
 
 (ert-deftest comp-tests-gc ()
   "Try to do some longer computation to let the gc kick in."