srfi-19の<date>型の値の曜日を知るには、date-week-day手続きが使えます。

 date-week-day date

date-week-day手続きは、dateが日曜日なら0、月曜日なら1、...土曜日なら6を返します。

例:

 gosh> (use srfi-19) ;; srfi-19ライブラリが使えるようにする
 #<undef>
 
 gosh> (date-week-day (current-date)) ;; 今日は何曜日か?
 1                                    ;; 月曜日

---

by えんどうやすゆき | Permalink | Comments(0) | Trackbacks(0)