[Pkg] The Trunk: ShoutCore-nice.41.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Mar 14 22:14:01 UTC 2014


Nicolas Cellier uploaded a new version of ShoutCore to project The Trunk:
http://source.squeak.org/trunk/ShoutCore-nice.41.mcz

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

Name: ShoutCore-nice.41
Author: nice
Time: 14 March 2014, 11:13:43.751 pm
UUID: 3974817a-996f-4fa8-b397-d727f7c27542
Ancestors: ShoutCore-cwp.40

There can be more characters after a vertical bar (|) in a binary selector for a while now, tell Shout about it.

=============== Diff against ShoutCore-cwp.40 ===============

Item was changed:
  ----- Method: SHParserST80>>scanBinary (in category 'scan') -----
  scanBinary
  	| c d |
  	c := self currentChar.
  	currentTokenSourcePosition := sourcePosition.
  	currentToken := c asString.
  	d := self nextChar.
  	((self isSelectorCharacter: c) or: [c == $:]) ifFalse: [^currentToken].
  	(c == $: and: [d == $=]) 
  		ifTrue: [" := assignment"
  			currentToken := currentToken , d asString.
  			self nextChar.
  			^currentToken].
- 	c == $| ifTrue:["| cannot precede a longer token" ^currentToken].
  	[self isSelectorCharacter: d] 
  		whileTrue: [
  			currentToken := currentToken , d asString.
  			d := self nextChar].
  	^currentToken!



More information about the Packages mailing list