Revert asynchronous tests

diff --git a/tests.lisp b/tests.lisp
index c0760b9..a09ee75 100644 (file)
--- a/tests.lisp
+++ b/tests.lisp
@@ -32,13 +32,6 @@
   (incf *total-tests*))
 
 
-#+jscl
-(defmacro test (condition)
-  `(funcall (oget *root* "setTimeout")
-            (lambda ()
-              (test-fn ,condition ',condition))
-            0))
-#-jscl
 (defmacro test (condition)
   `(test-fn ,condition ',condition))
 
@@ -48,6 +41,5 @@
 (defmacro test-equal (form value)
   `(test (equal ,form, value)))
 
-
 (format t "Running tests...~%~%")
 (setq *timestamp* (get-internal-real-time))