如何在Scheme / DrRacket中的R5R中获取系统日期

Question

在DrRacket IDE中，当语言设置为“Swindle”时，我能够以下列方式获取系统日期：

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

现在，我需要在R5R中做同样的事情，但不知道如何做。我可以请你寻求你的建议/帮助..

谢谢！

Answer 1

R5RS中没有日期时间支持。程序current-seconds，seconds->date和date-month应该在PLTRacket的R5RS实现中作为扩展提供。