現在の日付を求める - lisp-cookbook-ja/common-lisp GitHub Wiki

日付と時刻 metatilities

現在の日付を求める

自作するか、ライブラリを使用する。下記では、ライブラリ:Metatilitiesを利用

(metatilities:date-string)
;=>"Saturday, November 22, 2008"

(metatilities:date-string-brief)
;=> "11-22-2008"

get-decoded-time は多値で秒、分、時、日、月、年、曜日、サマータイム、タイムゾーンを返すのでそれを利用することもできます。

(get-decoded-time)
;=> 38
;   28
;   17
;   29
;   11
;   2008
;   5
;   NIL
;   -9
(multiple-value-bind (second
                      minute
                      hour
                      date
                      month
                      year
                      day-of-weak
                      daylight-p
                      time-zone)
    (get-decoded-time)
  (format nil "~d-~d-~d" year month date))
;=> "2008-11-29"