Mercurial > hg > xemacs-beta

comparison tests/automated/test-harness.el @ 1425:74cb069b8417

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-04-23 15:42:44 by stephent] stale match data <87fzo99rje.fsf@tleepslib.sk.tsukuba.ac.jp> new split-string <87d6jd9qis.fsf@tleepslib.sk.tsukuba.ac.jp> support (info "(file)node") <87adeh9qa7.fsf@tleepslib.sk.tsukuba.ac.jp>
author stephent
date Wed, 23 Apr 2003 15:42:52 +0000
parents aa15a2bbba1a
children f8bd59163c60
comparison
equal deleted inserted replaced
1424:c35e2ad2f97d 1425:74cb069b8417
45 (require 'bytecomp) 45 (require 'bytecomp)
46 46
47 (defvar test-harness-verbose 47 (defvar test-harness-verbose
48 (and (not noninteractive) (> (device-baud-rate) search-slow-speed)) 48 (and (not noninteractive) (> (device-baud-rate) search-slow-speed))
49 "*Non-nil means print messages describing progress of emacs-tester.") 49 "*Non-nil means print messages describing progress of emacs-tester.")
50
51 (defvar test-harness-risk-infloops nil
52 "*Non-nil to run tests that may loop infinitely in buggy implementations.")
50 53
51 (defvar test-harness-current-file nil) 54 (defvar test-harness-current-file nil)
52 55
53 (defvar emacs-lisp-file-regexp (purecopy "\\.el\\'") 56 (defvar emacs-lisp-file-regexp (purecopy "\\.el\\'")
54 "*Regexp which matches Emacs Lisp source files.") 57 "*Regexp which matches Emacs Lisp source files.")