diff options
| author | Paul Eggert | 2021-12-05 17:58:11 -0800 |
|---|---|---|
| committer | Paul Eggert | 2021-12-05 23:24:08 -0800 |
| commit | af6061894598efdcb1aeebbac2283d6e1d085820 (patch) | |
| tree | 55065f8078339e4930bda6ff345f56a3decec14c | |
| parent | 83fa35bb16a219faba6f2c793dd0fce83833a5ec (diff) | |
| download | emacs-af6061894598efdcb1aeebbac2283d6e1d085820.tar.gz emacs-af6061894598efdcb1aeebbac2283d6e1d085820.zip | |
Simplify cedet-utest-elapsed-time
* test/manual/cedet/cedet-utests.el (cedet-utest-elapsed-time):
Copy newer (circa-2011) implementation from elp.el, so that the
code matches its documentation again.
| -rw-r--r-- | test/manual/cedet/cedet-utests.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/test/manual/cedet/cedet-utests.el b/test/manual/cedet/cedet-utests.el index d68b5b8c090..af6b4defb3c 100644 --- a/test/manual/cedet/cedet-utests.el +++ b/test/manual/cedet/cedet-utests.el | |||
| @@ -252,9 +252,7 @@ Optional argument TITLE is the title of this testing session." | |||
| 252 | (defun cedet-utest-elapsed-time (start end) | 252 | (defun cedet-utest-elapsed-time (start end) |
| 253 | "Copied from elp.el. Was elp-elapsed-time. | 253 | "Copied from elp.el. Was elp-elapsed-time. |
| 254 | Argument START and END bound the time being calculated." | 254 | Argument START and END bound the time being calculated." |
| 255 | (+ (* (- (car end) (car start)) 65536.0) | 255 | (float-time (time-subtract start end))) |
| 256 | (- (car (cdr end)) (car (cdr start))) | ||
| 257 | (/ (- (car (cdr (cdr end))) (car (cdr (cdr start)))) 1000000.0))) | ||
| 258 | 256 | ||
| 259 | (defun cedet-utest-log-shutdown (title &optional _errorcondition) | 257 | (defun cedet-utest-log-shutdown (title &optional _errorcondition) |
| 260 | "Shut-down a larger test suite. | 258 | "Shut-down a larger test suite. |