Function: decoded-time-period
decoded-time-period is a byte-compiled function defined in
time-date.el.gz.
Signature
(decoded-time-period TIME)
Documentation
Interpret TIME as a period and return its length in seconds.
For computational purposes, years are 365 days long and months are 30 days long.
Probably introduced at or before Emacs version 28.1.
Source Code
;; Defined in /usr/src/emacs/lisp/calendar/time-date.el.gz
(defun decoded-time-period (time)
"Interpret TIME as a period and return its length in seconds.
For computational purposes, years are 365 days long and months
are 30 days long."
(+ (if (consp (decoded-time-second time))
;; Fractional second.
(/ (float (car (decoded-time-second time)))
(cdr (decoded-time-second time)))
(or (decoded-time-second time) 0))
(* (or (decoded-time-minute time) 0) 60)
(* (or (decoded-time-hour time) 0) 60 60)
(* (or (decoded-time-day time) 0) 60 60 24)
(* (or (decoded-time-month time) 0) 60 60 24 30)
(* (or (decoded-time-year time) 0) 60 60 24 365)))