问题描述
我正在学习Guile GOOPS。我的插槽访问器有问题。下面的代码
(use-modules (oop goops))
(define-class <person> ()
(name #:init-keyword #:name
#:accessor person-name))
(let ([p (make <person> #:name "Vlad")])
(display (person-name p)))
给出错误:oop / goops.scm:1585:2:#不是有效的泛型函数
我做错了什么?
解决方法
问题中的代码是正确的,并且可以正常工作。 person-name
访问者名称与我的测试文件person
记录中具有相同访问者名称的上述定义发生冲突。