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

Question

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

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

现在，我需要在 R5Rs 中做同样的事情，但不知道该怎么做。我可以请你在这方面的建议/帮助..

谢谢！

Answer 1

R5RS 不支持日期时间。过程current-seconds、seconds->date 和date-month 应该作为扩​​展在PLRTacket 的R5RS 实现中可用。