TestGeneratePrimes
Definition
TestCase subclass: #TestGeneratePrimes
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''
Class side
Instance side
testPrimes
| nullArray
minArray threeArray centArray |
nullArray :=
GeneratePrimes generatePrimes: 0.
self assert: nullArray size = 0.
minArray :=
GeneratePrimes generatePrimes: 2.
self assert: minArray size = 1.
self assert: ((minArray at: 1) = 2).
threeArray :=
GeneratePrimes generatePrimes: 3.
self assert: threeArray size = 2.
self assert: ((threeArray at: 1) = 2).
self assert: ((threeArray at: 2) = 3).
centArray :=
GeneratePrimes generatePrimes: 100.
self assert: (centArray size = 25).
self assert: ((centArray at: 25) = 97).