2

我有问题。

我在测试用例中使用代码它开始像这样

|mapeos obj myClass|

myClass := Smalltalk at: #ClaseForTesting.

myClass addToComposition: TraitPruebaCondicion1.

这 #ClaseForTesting是一个空类

当smalltalk做

myClass addToComposition: TraitPruebaCondicion1

如果我（调试）尝试获取特征

myClass traits

我越来越

an OrderedCollection(AnObsoleteTraitPruebaCondicion1)

为什么要添加AnObsolete字符串特征名称？如果我在工作区中运行相同的代码，它工作得非常好。

为什么会这样？有任何想法吗？请，它的紧急:(

4

1 回答 1

3

我不敢相信我被困了很多时间，然后当我最终决定向人们询问时，我已经在两分钟内解决了它。真丢人。这个网站一定是某种神秘的头脑风暴。

无论如何，线索是使用

Smalltalk at: #

也有这个特质！（我只在课堂上使用它）

所以

myClass addToComposition:(Smalltalk at: #TraitPruebaCondicion1).

解决我的问题。

于 2013-05-04T03:57:05.160 回答