Как получить системную дату в R5Rs в Схеме / DrRacket

Question

В DrRacket IDE мне удалось получить системную дату следующим образом, когда языковой настройкой было «Мошенничество»:

(define currentMonth 0)
(let ((date (seconds->date (current-seconds))))
  (set! currentMonth (date-month date))
  )

Теперь мне нужно сделать то же самое в R5R, но не знаю, как это сделать. Могу ли я обратиться за советом / помощью по этому вопросу ...

Спасибо!

Answer 1

В R5RS нет поддержки даты и времени. Процедуры current-seconds, seconds->date и date-month должны быть доступны в реализации RTRRS PLTRacket в качестве расширений.