A new version of Tests was added to project The Inbox:
http://source.squeak.org/inbox/Tests-cwp.174.mcz

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

Name: Tests-cwp.174
Author: cwp
Time: 22 October 2012, 12:40:08.762 am
UUID: 9a24e9f2-77cc-450b-827d-96ff66ecd7d3
Ancestors: Tests-eem.172

Added tests to ensure that String>>numArgs respects the #allowUnderscoreSelectors, but Symbol>>numArgs doesn't.

=============== Diff against Tests-eem.172 ===============

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>assertString:hasNumArgs: (in category 'support') -----
+ assertString: aString hasNumArgs: anInteger
+ 	| num |
+ 	num := aString numArgs.
+ 	self assert: num = anInteger!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA0NoUnderscoreAllowed (in category 'tests') -----
+ testA0NoUnderscoreAllowed
+ 	self pref: true during: [self assertString: 'ab' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA0NoUnderscoreForbidden (in category 'tests') -----
+ testA0NoUnderscoreForbidden
+ 	self pref: false during: [self assertString: 'ab' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA0UnderscoreAllowed (in category 'tests') -----
+ testA0UnderscoreAllowed
+ 	self pref: true during: [self assertString: 'a_b' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA0UnderscoreForbidden (in category 'tests') -----
+ testA0UnderscoreForbidden
+ 	self pref: false during: [self assertString: 'a_b' hasNumArgs: -1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA1NoUnderscoreAllowed (in category 'tests') -----
+ testA1NoUnderscoreAllowed
+ 	self pref: true during: [self assertString: 'ab:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA1NoUnderscoreForbidden (in category 'tests') -----
+ testA1NoUnderscoreForbidden
+ 	self pref: false during: [self assertString: 'ab:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA1UnderscoreAllowed (in category 'tests') -----
+ testA1UnderscoreAllowed
+ 	self pref: true during: [self assertString: 'a_b:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA1UnderscoreForbidden (in category 'tests') -----
+ testA1UnderscoreForbidden
+ 	self pref: false during: [self assertString: 'a_b:' hasNumArgs: -1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA2NoUnderscoreAllowed (in category 'tests') -----
+ testA2NoUnderscoreAllowed
+ 	self pref: true during: [self assertString: 'ab:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA2NoUnderscoreForbidden (in category 'tests') -----
+ testA2NoUnderscoreForbidden
+ 	self pref: false during: [self assertString: 'ab:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA2UnderscoreAllowed (in category 'tests') -----
+ testA2UnderscoreAllowed
+ 	self pref: true during: [self assertString: 'a_b:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testA2UnderscoreForbidden (in category 'tests') -----
+ testA2UnderscoreForbidden
+ 	self pref: false during: [self assertString: 'a_b:cd:' hasNumArgs: -1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testB1Allowed (in category 'tests') -----
+ testB1Allowed
+ 	self pref: true during: [self assertString: '+' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testB1Forbidden (in category 'tests') -----
+ testB1Forbidden
+ 	self pref: false during: [self assertString: '+' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testB2Allowed (in category 'tests') -----
+ testB2Allowed
+ 	self pref: true during: [self assertString: '++' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testB2Forbidden (in category 'tests') -----
+ testB2Forbidden
+ 	self pref: false during: [self assertString: '++' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testEmpty (in category 'tests') -----
+ testEmpty
+ 	self assertString: '' hasNumArgs: -1!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA0NoUnderscoreAllowed (in category 'tests') -----
+ testSelA0NoUnderscoreAllowed
+ 	self pref: true during: [self assertString: #'ab' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA0NoUnderscoreForbidden (in category 'tests') -----
+ testSelA0NoUnderscoreForbidden
+ 	self pref: false during: [self assertString: #'ab' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA0UnderscoreAllowed (in category 'tests') -----
+ testSelA0UnderscoreAllowed
+ 	self pref: true during: [self assertString: #'a_b' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA0UnderscoreForbidden (in category 'tests') -----
+ testSelA0UnderscoreForbidden
+ 	self pref: false during: [self assertString: #'a_b' hasNumArgs: 0]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA1NoUnderscoreAllowed (in category 'tests') -----
+ testSelA1NoUnderscoreAllowed
+ 	self pref: true during: [self assertString: #'ab:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA1NoUnderscoreForbidden (in category 'tests') -----
+ testSelA1NoUnderscoreForbidden
+ 	self pref: false during: [self assertString: #'ab:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA1UnderscoreAllowed (in category 'tests') -----
+ testSelA1UnderscoreAllowed
+ 	self pref: true during: [self assertString: #'a_b:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA1UnderscoreForbidden (in category 'tests') -----
+ testSelA1UnderscoreForbidden
+ 	self pref: false during: [self assertString: #'a_b:' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA2NoUnderscoreAllowed (in category 'tests') -----
+ testSelA2NoUnderscoreAllowed
+ 	self pref: true during: [self assertString: #'ab:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA2NoUnderscoreForbidden (in category 'tests') -----
+ testSelA2NoUnderscoreForbidden
+ 	self pref: false during: [self assertString: #'ab:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA2UnderscoreAllowed (in category 'tests') -----
+ testSelA2UnderscoreAllowed
+ 	self pref: true during: [self assertString: #'a_b:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelA2UnderscoreForbidden (in category 'tests') -----
+ testSelA2UnderscoreForbidden
+ 	self pref: false during: [self assertString: #'a_b:cd:' hasNumArgs: 2]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelB1Allowed (in category 'tests') -----
+ testSelB1Allowed
+ 	self pref: true during: [self assertString: #'+' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelB1Forbidden (in category 'tests') -----
+ testSelB1Forbidden
+ 	self pref: false during: [self assertString: #'+' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelB2Allowed (in category 'tests') -----
+ testSelB2Allowed
+ 	self pref: true during: [self assertString: #'++' hasNumArgs: 1]!

Item was added:
+ ----- Method: UnderscoreSelectorsTest>>testSelB2Forbidden (in category 'tests') -----
+ testSelB2Forbidden
+ 	self pref: false during: [self assertString: #'++' hasNumArgs: 1]!