Skip to content

Instantly share code, notes, and snippets.

@kosh04

kosh04/gist:147081

Created July 14, 2009 17:40
Show Gist options
  • Save kosh04/147081 to your computer and use it in GitHub Desktop.
Save kosh04/147081 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.lisp
(multiple-value-bind (sec min hour date month year)
(decode-universal-time 3456789012)
(format nil "~A年~A月~A日~A時~A分~A秒" year month date hour min sec))
;; => "2009年7月17日12時10分12秒"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment