[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