[squeak-dev] The Inbox: ToolsTests-fbs.34.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Mar 29 17:17:26 UTC 2011


A new version of ToolsTests was added to project The Inbox:
http://source.squeak.org/inbox/ToolsTests-fbs.34.mcz

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

Name: ToolsTests-fbs.34
Author: fbs
Time: 29 March 2011, 4:47:57.148 pm
UUID: 44997699-a02e-f142-91df-8fce64038c0f
Ancestors: ToolsTests-fbs.33

Further MessageSet subclass tests.

=============== Diff against ToolsTests-fbs.33 ===============

Item was added:
+ ----- Method: MessageNamesTest>>testSelectedClassOrMetaClass (in category 'as yet unclassified') -----
+ testSelectedClassOrMetaClass
+ 	| firstClass |
+ 	browser searchString: 'cull'.
+ 	firstClass := browser messageList first actualClass.
+ 	
+ 	browser selectMessageNamed: browser messageList first selector.
+ 	self assert: browser selectedClassOrMetaClass = firstClass.
+ 	
+ 	browser selectMessageNamed: nil.
+ 	self assert: browser selectedClassOrMetaClass isNil.
+ 	
+ 	"And just to be sure:"
+ 	browser selectMessageNamed: browser messageList first selector.
+ 	self assert: browser selectedClassOrMetaClass = firstClass.!

Item was changed:
  ----- Method: MessageNamesTest>>testSelection (in category 'as yet unclassified') -----
  testSelection
  	browser searchString: 'cull'.
  	browser selectorListIndex: 1.
  	browser messageListIndex: 1.
  	self assert: (browser selection isKindOf: MethodReference).
  	browser messageListIndex: 0.
+ 	self assert: browser selection isNil.!
- 	self assert: browser selection isSymbol.!

Item was changed:
  ----- Method: MessageSetTest>>testRemoveMessageFromBrowser (in category 'as yet unclassified') -----
  testRemoveMessageFromBrowser
  	| count sel |
  	browser messageListIndex: 1.
  	sel := browser selection.
  	
  	browser removeMessageFromBrowser.
  	self deny: (browser messageList includes: sel) description: 'Method not removed'.
+ 
- 	
  	browser selectMessageNamed: nil.
  	count := browser messageList size.
  	browser removeMessageFromBrowser.
  	self assert: count = browser messageList size description: 'Some method was removed'.!

Item was added:
+ MessageSetTest subclass: #MessageTraceTest
+ 	instanceVariableNames: ''
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'ToolsTests-Browser'!

Item was added:
+ ----- Method: MessageTraceTest>>setUp (in category 'as yet unclassified') -----
+ setUp
+ 	browser := (MessageTrace
+ 		openMessageList: (SystemNavigation default allImplementorsOf: #browseAllImplementorsOf:)
+ 		name: 'Test MessageSet'
+ 		autoSelect: nil) model.!




More information about the Squeak-dev mailing list