時刻に任意の時間を加減する - lisp-cookbook-ja/common-lisp GitHub Wiki

日付と時刻

時刻に任意の時間を加減する

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

;; 現時刻から一時間後
(decode-universal-time (+ (* 60 60)
                          (get-universal-time)))
;=> 46
    27
    15
    22
    11
    2008
    5
    NIL
    -9