[BUG][TEST] IntervalTest
marcus at ira.uka.de
marcus at ira.uka.de
Tue Jan 20 20:29:34 UTC 2004
from preamble:
"Change Set: IntervalTest
Date: 14 January 2004
Author: Marcus Denker
A small test for Intervall class>>newFrom:
self shouldnt: [
self assert: ( (Interval newFrom: (1 to: 1)) = (1 to: 1)).
self assert: ( (Interval newFrom: #(1)) = (1 to: 1)).
self assert: ( (Interval newFrom: (1 to: 0)) = (1 to: 0)) .
] raise: Error.
"!
-------------- next part --------------
A non-text attachment was scrubbed...
Name: IntervalTest.cs.gz
Type: application/octet-stream
Size: 399 bytes
Desc: not available
Url : http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20040120/5261ddb5/IntervalTest.cs.obj
More information about the Squeak-dev
mailing list
|