mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(timer-next-integral-multiple-of-time): Doc fix.

Browse Source
This commit is contained in:
Richard M. Stallman 1996-12-10 07:24:21 +00:00
parent bf6c5df1a1
commit 59b1de826d
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/timer.el
View File

@ -71,8 +71,9 @@ fire each time Emacs is idle for that many seconds."
timer)
(defun timer-next-integral-multiple-of-time (time secs)
"Yield the next value after TIME that is an integral number of SECS
since the epoch. SECS may be a fraction."
"Yield the next value after TIME that is an integral multiple of SECS.
More precisely, the next value, after TIME, that is an integral multiple
of SECS seconds since the epoch. SECS may be a fraction."
(let ((time-base (ash 1 16)))
(if (fboundp 'atan)
;; Use floating point, taking care to not lose precision.