[squeak-dev] The Trunk: ShoutCore-mt.77.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Dec 10 14:26:22 UTC 2019


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

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

Name: ShoutCore-mt.77
Author: mt
Time: 10 December 2019, 3:26:21.931553 pm
UUID: 2df6bf09-c3d1-4e42-9a40-51bbfce1712c
Ancestors: ShoutCore-mt.76

Fixes args/temps styling for dead contexts.

=============== Diff against ShoutCore-mt.76 ===============

Item was changed:
  ----- Method: SHParserST80>>initializeInstanceVariables (in category 'parse support') -----
  initializeInstanceVariables
  
  	instanceVariables := classOrMetaClass 
  		ifNil: [ #() ]
  		ifNotNil: [ classOrMetaClass allInstVarNames asArray ].
  	allowUnderscoreAssignments := Scanner allowUnderscoreAsAssignment.
  	allowUnderscoreSelectors := Scanner prefAllowUnderscoreSelectors.
  	allowBlockArgumentAssignment := Scanner allowBlockArgumentAssignment.
  	sourcePosition := 1.
  	arguments
  		ifNil: [ arguments := OrderedCollection with: nil ]
  		ifNotNil: [ arguments reset; addLast: nil ].
  	temporaries
  		ifNil: [ temporaries := OrderedCollection with: nil ]
  		ifNotNil: [ temporaries reset; addLast: nil ].
+ 	context ifNotNil: [ self initializeVariablesFromContext ].
- 	(context notNil and: [ context isDead not ])
- 		ifTrue: [ self initializeVariablesFromContext ].
  	bracketDepth := 0.
  	ranges
  		ifNil: [ ranges := OrderedCollection new: 40 "Covers over 80% of all methods." ]
  		ifNotNil: [ ranges reset ]!

Item was changed:
  ----- Method: SHParserST80>>initializeVariablesFromContext (in category 'parse support') -----
  initializeVariablesFromContext
  
  	| contextSourcePcIndex contextSourceParser |
  	contextSourcePcIndex := (context debuggerMap
+ 		rangeForPC: (context isDead ifTrue: [context endPC] ifFalse: [context pc])
- 		rangeForPC: context pc
  		in: context method
  		contextIsActiveContext: true "... to really use the context's pc.")
  			start.
  	contextSourceParser := self class new
  		classOrMetaClass: context method methodClass;
  		environment: self environment;
  		source: (context method getSource first: contextSourcePcIndex);
  		yourself.
  	contextSourceParser parse.
  	arguments := contextSourceParser activeArguments.
  	temporaries  := contextSourceParser activeTemporaries.!



More information about the Squeak-dev mailing list