emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master af60618 03/13: Simplify cedet-utest-elapsed-time


From: Paul Eggert
Subject: master af60618 03/13: Simplify cedet-utest-elapsed-time
Date: Mon, 6 Dec 2021 02:24:21 -0500 (EST)

branch: master
commit af6061894598efdcb1aeebbac2283d6e1d085820
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>

    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.
---
 test/manual/cedet/cedet-utests.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/test/manual/cedet/cedet-utests.el 
b/test/manual/cedet/cedet-utests.el
index d68b5b8..af6b4de 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."
 (defun cedet-utest-elapsed-time (start end)
   "Copied from elp.el.  Was elp-elapsed-time.
 Argument START and END bound the time being calculated."
-  (+ (* (- (car end) (car start)) 65536.0)
-     (- (car (cdr end)) (car (cdr start)))
-     (/ (- (car (cdr (cdr end))) (car (cdr (cdr start)))) 1000000.0)))
+  (float-time (time-subtract start end)))
 
 (defun cedet-utest-log-shutdown (title &optional _errorcondition)
   "Shut-down a larger test suite.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]