[squeak-dev] The Trunk: ShoutCore-ul.29.mcz
commits at source.squeak.org
commits at source.squeak.org
Mon Apr 25 17:10:14 UTC 2011
Levente Uzonyi uploaded a new version of ShoutCore to project The Trunk:
http://source.squeak.org/trunk/ShoutCore-ul.29.mcz
==================== Summary ====================
Name: ShoutCore-ul.29
Author: ul
Time: 25 April 2011, 7:10:03.884 pm
UUID: 22697e65-03a1-af47-9d53-ece1d4de460c
Ancestors: ShoutCore-ul.28
- fix: prevent debuggers opening when typing external call declarations. The cause of the problem was that the parser tried to create a range of #externalCallType when the end of the input was reached.
=============== Diff against ShoutCore-ul.28 ===============
Item was changed:
----- Method: SHParserST80>>parseExternalCall (in category 'parse') -----
parseExternalCall
self scanNext.
self scanPast: #externalCallType.
currentToken = '*'
ifTrue: [self scanPast: #externalCallTypePointerIndicator].
currentTokenFirst isDigit
ifTrue: [self scanPast: #integer]
ifFalse: [
self failUnless: currentTokenFirst == $'.
self parseString].
self failUnless: currentTokenFirst == $(.
self scanPast: #leftParenthesis.
[currentTokenFirst ~~ $)]
whileTrue: [
+ self failUnless: currentToken notNil.
self scanPast: #externalCallType.
currentToken = '*'
ifTrue: [self scanPast: #externalCallTypePointerIndicator]].
self scanPast: #rightParenthesis.
currentToken = 'module:'
ifTrue: [
self scanPast: #module.
self failUnless: currentTokenFirst == $'.
self parseString].
self failUnless: currentToken = '>'.
self scanPast: #primitiveOrExternalCallEnd!
More information about the Squeak-dev
mailing list
|