Mercurial > hg > xemacs-beta

comparison tests/automated/test-harness.el @ 928:17ba576dc36a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-07-20 15:22:44 by michaels] 2002-07-20 Mike Sperber <mike@xemacs.org> * automated/test-harness.el (test-harness-read-from-buffer): Fix incorrect call of `princ'.
author michaels
date Sat, 20 Jul 2002 15:22:46 +0000
parents 42375619fa45
children ea6a06f7bf2c
comparison
equal deleted inserted replaced
927:e40f8d860d5f 928:17ba576dc36a
98 (condition-case error-info 98 (condition-case error-info
99 (while t 99 (while t
100 (setq body (cons (read buffer) body))) 100 (setq body (cons (read buffer) body)))
101 (end-of-file nil) 101 (end-of-file nil)
102 (error 102 (error
103 (princ "Unexpected error %S reading forms from buffer\n" error-info))) 103 (princ (format "Unexpected error %S reading forms from buffer\n" error-info))))
104 `(lambda () 104 `(lambda ()
105 (defvar passes) 105 (defvar passes)
106 (defvar assertion-failures) 106 (defvar assertion-failures)
107 (defvar no-error-failures) 107 (defvar no-error-failures)
108 (defvar wrong-error-failures) 108 (defvar wrong-error-failures)