2つの時刻の差を求める - lisp-cookbook-ja/common-lisp GitHub Wiki

日付と時刻

2つの時刻の差を求める

秒数を表す数値なので、加減算は自由にできる。

;; 2000/1/1から現時刻までの秒数
(- (get-universal-time)
   (encode-universal-time 0 0 0 1 1 2000))
;=> 280679398