[squeak-dev] The Trunk: CollectionsTests-nice.200.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Mar 11 22:40:37 UTC 2013


Nicolas Cellier uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-nice.200.mcz

==================== Summary ====================

Name: CollectionsTests-nice.200
Author: nice
Time: 11 March 2013, 11:40:07.355 pm
UUID: 1a65f82a-6a1c-465f-b111-72b99e08ec14
Ancestors: CollectionsTests-nice.199

Change StringTest>>testNumArgs to reflect that an empty keyword message (composed uniquely of colons $: or with a single empty key #'a::') is not a valid Smalltalk pattern (I have a doubt about previous test, was it ever valid?).

=============== Diff against CollectionsTests-nice.199 ===============

Item was changed:
  ----- Method: StringTest>>testNumArgs (in category 'testing') -----
  testNumArgs
  
  	| binary punctuation |
  	binary := '+-*/<=>&|,?\~@'.
  	1 to: 3 do: [:length | binary combinations: length atATimeDo: [:each | self assert: each numArgs = 1]].
  	
  	self assert: 'foo' numArgs = 0.
  	self assert: 'bar:' numArgs = 1.
  	self assert: 'foo:bar:' numArgs = 2.
  	self assert: 'foo2:bar1:' numArgs = 2.
  	
+ 	self assert: '::' numArgs = -1 description: 'empty keywords are forbidden'.
- 	self assert: '::' numArgs = 2 description: 'empty keywords are authorized'.
  	
  	punctuation := '.;()[]{}"`''#$'.
  	punctuation , Character separators do: [:letter | self assert: ('foo' copyWith: letter) numArgs = -1 description: 'Smalltalk punctuation and separators are illegal in a selector'].
  	
  	self assert: 'nextPut:andCR' numArgs = -1 description: 'terminal colon is missing'.
  	self assert: 'a0:1:' numArgs = -1 description: 'a keyword cannot begin with a digit'.
  	self assert: '123' numArgs = -1.
  	self assert: '' numArgs = -1.!



More information about the Squeak-dev mailing list