comparison tests/automated/test-harness.el @ 863:42375619fa45

[xemacs-hg @ 2002-06-04 06:03:59 by andyp] merge 21.4 windows changes, minimally tested
author andyp
date Tue, 04 Jun 2002 06:05:53 +0000
parents 6728e641994e
children 17ba576dc36a
comparison
equal deleted inserted replaced
862:278c743f1578 863:42375619fa45
288 (message "%s" summary-msg)) 288 (message "%s" summary-msg))
289 (when unexpected-test-suite-failure 289 (when unexpected-test-suite-failure
290 (message "Test suite execution failed unexpectedly.")) 290 (message "Test suite execution failed unexpectedly."))
291 (fmakunbound 'Assert) 291 (fmakunbound 'Assert)
292 (fmakunbound 'Check-Error) 292 (fmakunbound 'Check-Error)
293 (fmakunbound 'Check-Message)
294 (fmakunbound 'Check-Error-Message)
293 (fmakunbound 'Ignore-Ebola) 295 (fmakunbound 'Ignore-Ebola)
294 (fmakunbound 'Int-to-Marker) 296 (fmakunbound 'Int-to-Marker)
295 ))) 297 )))
296 298
297 (defvar test-harness-results-point-max nil) 299 (defvar test-harness-results-point-max nil)