1

smalltalk visualworks の Collection クラスの関数のテストケースを作成しました。関数コードは次のとおりです。

valuesBetween: a and: b
| array1 arraysize |
arraysize := self size.
"array1:=nil."
array1 := ((1 to: arraysize) select: [:k | k >= a & (k <= b)])
            collect: [:k | self at: k].
^array1

テストケースコードは次のとおりです。

       testvaluesbetween 
       |test1|
       test1:=#(1 2 3 4 5 6).
       self assert: test1 valuesBetween:2 and:4=#(2 3 4).

このテストが機能していないので、誰でもこれを手伝ってもらえますか。ありがとう。

4

1 に答える 1

2

デバッガーは何と言っていますか? 何かのようなもの：

MessageNotUnderstood: YourTestCase>>assert:valuesBetween:and:

次のような括弧で試してください。

self assert: ((test1 valuesBetween: 2 and: 4) = #(2 3 4))
于 2013-09-22T07:51:05.910 に答える