diff tests/automated/c-tests.el @ 4747:294a86d29f99

Eliminate C asserts from c-tests.
author Stephen J. Turnbull <stephen@xemacs.org>
date Mon, 16 Nov 2009 12:00:38 +0900
parents 2f8bb876ab1d
children 6bff4f219697
line wrap: on
line diff
--- a/tests/automated/c-tests.el	Mon Nov 16 11:58:19 2009 +0900
+++ b/tests/automated/c-tests.el	Mon Nov 16 12:00:38 2009 +0900
@@ -40,4 +40,6 @@
 
 (when (boundp 'test-function-list)	; Only if configure --debug
   (loop for fun in test-function-list do
-    (Assert (eq 'PASS (funcall fun)))))
+    ;; #### I hope there's no way we can signal ...
+    (loop for result in (funcall fun) do
+      (Assert (nth 1 result) (nth 2 result) (nth 0 result)))))