Mercurial > hg > xemacs-beta
diff tests/automated/test-harness.el @ 4948:8b230c53075b
fix some tests in `make check', also add our own file-tests
-------------------- ChangeLog entries follow: --------------------
lisp/ChangeLog addition:
2010-01-25 Ben Wing <ben@xemacs.org>
* mule/cyrillic.el (koi8-c):
Fix bug in #83 mapping.
* mule/vietnamese.el (viscii):
Fix bug in #A6 mapping.
tests/ChangeLog addition:
2010-01-25 Ben Wing <ben@xemacs.org>
* automated/file-tests.el:
New file.
* automated/mule-tests.el (featurep):
* automated/test-harness.el (test-harness-from-buffer):
* automated/test-harness.el (batch-test-emacs):
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Mon, 25 Jan 2010 03:03:49 -0600 |
parents | 9bf09492cff7 |
children | db2db229ee82 |
line wrap: on
line diff
--- a/tests/automated/test-harness.el Mon Jan 25 02:48:52 2010 -0600 +++ b/tests/automated/test-harness.el Mon Jan 25 03:03:49 2010 -0600 @@ -303,7 +303,7 @@ default, the unevalated comparison expressions are given. FAILING-CASE and DESCRIPTION are useful when Assert is used in a loop." (let* ((assertion `(,test ,testval ,expected)) - (failmsg `(format "expected %S, got %S" ,expected ,testval)) + (failmsg `(format "got %S, expected %S" ,testval ,expected)) (failmsg2 (if failing-case `(concat (format "%S, " ,failing-case) ,failmsg) @@ -614,7 +614,10 @@ Use this from the command line, with `-batch'; it won't work in an interactive Emacs. Each file is processed even if an error occurred previously. -For example, invoke \"xemacs -batch -f batch-test-emacs tests/*.el\"" +A directory can be given as well, and all files will be processed -- +however, the file test-harness.el, which implements the test harness, +will be skipped. +For example, invoke \"xemacs -batch -f batch-test-emacs tests\"" ;; command-line-args-left is what is left of the command line (from ;; startup.el) (defvar command-line-args-left) ;Avoid 'free variable' warning