我编写了以下方法来获取对象的所有插槽名称(没有 Lobby 和更高级别的插槽):
Object allSlotNames := method(
result := list()
object := self
while(object != Lobby,
result appendSeq(object slotNames)
object := object proto
)
result
)
但是当我运行它时,我得到一个错误:
Io> 123 allSlotNames
Exception: Number does not respond to 'object'
---------
Number object Command Line 1
Number allSlotNames Command Line 1
为什么?