The Trunk: ShoutCore-nice.63.mcz

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

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

Name: ShoutCore-nice.63
Author: nice
Time: 7 April 2019, 3:24:31.721529 pm
UUID: 7440b898-b497-493b-adfa-67aef04e0980
Ancestors: ShoutCore-eem.62

Attempt to fix highlighting of 1to:-1

I don't see the point of testing the presence of a binary selector character after a colon $:, except maybe the case of assignment :=, so only test that case.

=============== Diff against ShoutCore-eem.62 ===============

Item was changed:
  ----- Method: SHParserST80>>scanIdentifier (in category 'scan') -----
  scanIdentifier
 
  | c start |
  start := sourcePosition.
  [
  (c := self nextChar) isAlphaNumeric
  or: [ allowUnderscoreSelectors and: [ c == $_ ] ] ] whileTrue.
+ (c == $: and: [ self peekChar ~= $= ])
- (c == $: and: [ (self isSelectorCharacter: self peekChar) not ])
  ifTrue: [ self nextChar ].
  currentToken := source copyFrom: start to: sourcePosition - 1.
  currentTokenSourcePosition := start!