[squeak-dev] The Trunk: KernelTests-eem.325.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Mar 31 00:14:49 UTC 2017


Eliot Miranda uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-eem.325.mcz

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

Name: KernelTests-eem.325
Author: eem
Time: 30 March 2017, 5:14:42.144182 pm
UUID: d5ee2084-6cd3-4c9c-8000-58e3713a970a
Ancestors: KernelTests-eem.324

Make MethodContextTest Context-aware/sensitive/savvy...

=============== Diff against KernelTests-eem.324 ===============

Item was changed:
  ----- Method: MethodContextTest>>setUp (in category 'running') -----
  setUp
  	super setUp.
  	aCompiledMethod := Rectangle methodDict at: #rightCenter.
  	aReceiver := 100 at 100 corner: 200 at 200.
  	aSender := thisContext.
+ 	aMethodContext := Context sender: aSender receiver: aReceiver method: aCompiledMethod arguments: #(). !
- 	aMethodContext := MethodContext sender: aSender receiver: aReceiver method: aCompiledMethod arguments: #(). !

Item was changed:
  ----- Method: MethodContextTest>>testActivateReturnValue (in category 'tests') -----
  testActivateReturnValue
+ 	self assert:  (aSender activateReturn: aMethodContext value: #()) isContext.
- 	self assert:  ((aSender activateReturn: aMethodContext value: #()) isKindOf: MethodContext).
  	self assert:  ((aSender activateReturn: aMethodContext value: #()) receiver = aMethodContext).!

Item was changed:
  ----- Method: MethodContextTest>>testSetUp (in category 'tests') -----
  testSetUp
  	"Note: In addition to verifying that the setUp worked the way it was expected to, testSetUp is used to illustrate the meaning of the simple access methods, methods that are not normally otherwise 'tested'"
  	self assert: aMethodContext isContext.
+ 	self deny: aMethodContext isExecutingBlock.
- 	self assert: aMethodContext isMethodContext.
  	self deny: aMethodContext isClosure.
  	self deny: aMethodContext isDead.
  	"self assert: aMethodContext home = aReceiver."
  	"self assert: aMethodContext blockHome = aReceiver."
  	self assert: aMethodContext receiver = aReceiver.
  	self assert: aMethodContext method isCompiledMethod.
  	self assert: aMethodContext method = aCompiledMethod.
  	self assert: aMethodContext methodNode selector = #rightCenter.
  	self assert: (aMethodContext methodNodeFormattedAndDecorated: true) selector = #rightCenter.
  	self assert: aMethodContext client printString = 'MethodContextTest>>#testSetUp'.
  !



More information about the Squeak-dev mailing list