要在Scheme48中定义记录吗

我在scheme48中尝试了一个定义记录类型的示例，但它似乎不起作用。怎么了

(define-record-type circle
 (make-circle r)
 circle?
 (r get-radius))

给予

我尝试过其他例子，得到了类似的结果。我甚至尝试了scheme48用户手册中的一个例子

提前感谢。

中指出，

记录的定义如下：

(define-record-type tag type-name
  (constructor-name field-tag ...)
  predicate-name
  (field-tag accessor-name [modifier-name])
  ...)

因此，在您的示例中，似乎缺少
类型名称
。试试这个：

(define-record-type circle :circle
  (make-circle r)
  circle?
  (r get-radius))

别忘了先导入库：

,open define-record-types

@FredFinkle我更新了我的答案，尝试上一个版本-只使用
：circle
作为标记和标记-name@FredFinkle以上内容对我有用，您是否导入了正确的库？在中，说明您必须“使用、打开命令或模块语言打开下面描述的结构”@FredFinkle，并尝试
定义记录类型圆圈：圆圈
和
定义记录类型圆圈
查看哪一个适合您
，打开定义记录类型
。有没有像你引用的页面那样指定这些库而不是暗示它们的地方？@FredFinkle我不知道，这是官方文档，如果没有的话。。。
,open define-record-types