在Scheme 中是否有一个相当于Lisp 的“运行时”原语？

Question

根据SICP 第 1.2.6 节，练习 1.22：

大多数 Lisp 实现包括一个称为 runtime 的原语，它返回一个整数，指定系统运行的时间量（例如，以微秒为单位）。

我正在使用DrScheme ，其中运行时似乎不可用，所以我正在寻找一个好的替代品。 我在 PLT-Scheme Reference 中发现有一个current-milliseconds原语。 有谁知道 Scheme 中是否有分辨率更高的计时器？

Answer 1

current-milliseconds是一个从系统返回当前毫秒计数的函数，但它可能会减少。 current-inexact-milliseconds类似，但返回一个保证增加的浮点数。

您还可以在该页面上找到一堆类似的函数，但是如果您只需要为某个函数计时，那么只需使用 ( time expr ) 它将打印出计算表达式所花费的时间。

此处相关的另一件事是profiler ，以防您需要对代码进行更详细的分析。

Answer 2

我今天也遇到了这个问题。 我正在使用 DrRacket，因为它似乎已经取代了 DrScheme。 虽然这是一个旧线程，但我会为任何偶然发现此线程的新人添加我的发现。

使用 R5RS ( #lang r5rs ) 作为选择的语言，在程序前添加以下两行以使其工作

(#%require (only racket/base current-milliseconds))
(define (runtime) (current-milliseconds))

Answer 3

您可以使用包含runtime定义的包sicp 。

这是包装说明。

这是安装说明：

• 打开包管理器：在 DrRacket 中选择菜单文件然后选择包管理器...。

• 在选项卡Do What I Mean 中找到文本字段并输入： sicp

• 最后点击安装按钮。

现在您可以从 SICP 调用runtime和其他过程：

#lang sicp
(runtime)

预期的输出是这样的：

1606611898030115
> 

Answer 4

我正在使用 mit-scheme 进行 SICP 并发现毫秒是由(real-time-clock)根据用户手册给出的。