Marcel Taeumel uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-mt.422.mcz

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

Name: Tests-mt.422
Author: mt
Time: 18 November 2019, 2:26:02.437051 pm
UUID: ca0f56f4-3671-3849-9bc9-f81d886ad0cb
Ancestors: Tests-mt.421

More tests for simple setter/getter conversion.

=============== Diff against Tests-mt.421 ===============

Item was changed:
  ----- Method: StringSystemSupportTest>>testAsSimpleGetter (in category 'tests') -----
  testAsSimpleGetter
  	self 
  		assert: #x: asSimpleGetter = #x ;
  		assert: #x asSimpleGetter = #x ;
  		assert: #x: asSimpleGetter isSymbol ;
+ 		
  		assert: 'x:' asSimpleGetter = #x ;
  		assert: 'x' asSimpleGetter = #x ;
+ 		assert: 'x:' asSimpleGetter isSymbol ;
+ 		
+ 		should: [#+ asSimpleSetter] raise: Error ;
+ 		should: ['+' asSimpleSetter] raise: Error ;
+ 		
+ 		should: ['' asSimpleGetter] raise: Error ;
+ 		should: [#'' asSimpleGetter] raise: Error ;
+ 		should: [':' asSimpleGetter] raise: Error ;
+ 		should: [#':' asSimpleGetter] raise: Error!
- 		assert: 'x:' asSimpleGetter isSymbol!

Item was changed:
  ----- Method: StringSystemSupportTest>>testAsSimpleSetter (in category 'tests') -----
  testAsSimpleSetter
  	self 
  		assert: #x asSimpleSetter = #x: ;
  		assert: #x: asSimpleSetter = #x: ;
  		assert: #x asSimpleSetter isSymbol ;
+ 
  		assert: 'x' asSimpleSetter = #x: ;
  		assert: 'x:' asSimpleSetter = #x: ;
+ 		assert: 'x' asSimpleSetter isSymbol ;
+ 
+ 		"should: [#'+:' asSimpleGetter] raise: Error ; --- We should not introduce that Symbol into the system..."
+ 		should: ['+:' asSimpleGetter] raise: Error ;
+ 
+ 		should: [':' asSimpleSetter] raise: Error ;
+ 		should: [#':' asSimpleSetter] raise: Error ;		
+ 		should: ['' asSimpleSetter] raise: Error ;
+ 		should: [#'' asSimpleSetter] raise: Error !
- 		assert: 'x' asSimpleSetter isSymbol!

Item was changed:
  ----- Method: StringSystemSupportTest>>testIsSimpleGetter (in category 'tests') -----
  testIsSimpleGetter
  	self 
  		assert: #x isSimpleGetter ;
  		deny: #x: isSimpleGetter ;
  		deny: #+ isSimpleGetter ;
+ 		
+ 		deny: 'x' isSimpleGetter ;
+ 		
+ 		deny: '' isSimpleGetter ;
+ 		deny: #'' isSimpleGetter ;
+ 		deny: ':' isSimpleGetter ;
+ 		deny: #':' isSimpleGetter!
- 		deny: 'x' isSimpleGetter!

Item was changed:
  ----- Method: StringSystemSupportTest>>testIsSimpleSetter (in category 'tests') -----
  testIsSimpleSetter
  	self 
  		assert: #x: isSimpleSetter ;
  		deny: #x isSimpleSetter ;
  		deny: #+ isSimpleSetter ;
  		deny: #a:b: isSimpleSetter ;
+ 		
+ 		deny: 'x:' isSimpleSetter ;
+ 
+ 		deny: '' isSimpleSetter ;
+ 		deny: #'' isSimpleSetter ;
+ 		deny: ':' isSimpleSetter ;
+ 		deny: #':' isSimpleSetter!
- 		deny: 'x:' isSimpleSetter!