オブジェクトのすべてのスロット名を取得するために、次のメソッドを作成しました (ロビー以降のスロットは除く)。
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
なんで?