Mercurial > hg > xemacs-beta

comparison tests/automated/weak-tests.el @ 4366:7b628daa39d4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Move debugging code to usage example. * automated/test-harness.el (test-harness-test-compiled): Improve docstring. * automated/weak-tests.el (test-harness-test-compiled): Remove debugging code.
author Stephen J. Turnbull <stephen@xemacs.org>
date Sat, 29 Dec 2007 20:22:04 -0800
parents cef5f57bb9e2
children 189fb67ca31a
comparison
equal deleted inserted replaced
4365:c9ab656691c0 4366:7b628daa39d4
33 (require 'test-harness) 33 (require 'test-harness)
34 (file-error 34 (file-error
35 (when (and (boundp 'load-file-name) (stringp load-file-name)) 35 (when (and (boundp 'load-file-name) (stringp load-file-name))
36 (push (file-name-directory load-file-name) load-path) 36 (push (file-name-directory load-file-name) load-path)
37 (require 'test-harness)))) 37 (require 'test-harness))))
38
39 (when test-harness-test-compiled
40 ;; this ha-a-ack depends on the compiled test coming last
41 (setq test-harness-failure-tag
42 "KNOWN BUG - fix reverted; after 2003-10-31 bitch at stephen\n"))
43 38
44 (garbage-collect) 39 (garbage-collect)
45 40
46 ;; tests for weak-boxes 41 ;; tests for weak-boxes
47 (let ((w (make-weak-box (cons 2 3)))) 42 (let ((w (make-weak-box (cons 2 3))))