Как получить системную дату в 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 должны быть доступны в реализации R5RS PLTRacket в качестве расширений.