Mercurial > hg > xemacs-beta
comparison lisp/test-harness.el @ 5369:4141aeddc55b
Eliminate byte-compile warnings, core Lisp.
2011-03-10 Aidan Kehoe <kehoea@parhasard.net>
* etags.el (buffer-tag-table-list):
* files.el (find-file-read-only):
* files.el (find-file-read-only-other-window):
* info.el (Info-dir-outdated-p):
* info.el (Info-dump-dir-entries):
* info.el (Info-rebuild-dir):
* menubar-items.el (default-menubar):
* mouse.el (drag-window-divider):
* mouse.el (vertical-divider-map):
* test-harness.el (emacs-lisp-file-regexp):
Eliminate byte-compile warnings, again aside from those linked to
Stephen's various non-defined fontconfig functions.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Thu, 10 Mar 2011 19:14:25 +0000 |
| parents | f00192e1cd49 |
| children | ac37a5f7e5be |
comparison
equal
deleted
inserted
replaced
| 5368:ed74d2ca7082 | 5369:4141aeddc55b |
|---|---|
| 126 (defvar test-harness-risk-infloops nil | 126 (defvar test-harness-risk-infloops nil |
| 127 "*Non-nil to run tests that may loop infinitely in buggy implementations.") | 127 "*Non-nil to run tests that may loop infinitely in buggy implementations.") |
| 128 | 128 |
| 129 (defvar test-harness-current-file nil) | 129 (defvar test-harness-current-file nil) |
| 130 | 130 |
| 131 (defvar emacs-lisp-file-regexp (purecopy "\\.el\\'") | 131 (defvar emacs-lisp-file-regexp "\\.el\\'" |
| 132 "*Regexp which matches Emacs Lisp source files.") | 132 "*Regexp which matches Emacs Lisp source files.") |
| 133 | 133 |
| 134 (defconst test-harness-file-summary-template | 134 (defconst test-harness-file-summary-template |
| 135 (format "%%-%ds %%%dd of %%%dd tests successful (%%3d%%%%)." | 135 (format "%%-%ds %%%dd of %%%dd tests successful (%%3d%%%%)." |
| 136 (length "byte-compiler-tests.el:") ; use the longest file name | 136 (length "byte-compiler-tests.el:") ; use the longest file name |