如何在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中没有日期时间支持。 在PLTRacket的R5RS实现中，应使用current-seconds ， seconds->date和date-month这一过程作为扩展。