[squeak-dev] The Trunk: ShoutCore-ul.17.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Apr 29 09:34:04 UTC 2010


Levente Uzonyi uploaded a new version of ShoutCore to project The Trunk:
http://source.squeak.org/trunk/ShoutCore-ul.17.mcz

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

Name: ShoutCore-ul.17
Author: ul
Time: 29 April 2010, 11:33:55.576 am
UUID: e852d6d6-16bb-c245-b81c-47fbea80f793
Ancestors: ShoutCore-ul.16

- accept symbols as arguments of #primitive: and #primitive:module: pragmas

=============== Diff against ShoutCore-ul.16 ===============

Item was changed:
  ----- Method: SHParserST80>>parsePrimitive (in category 'parse') -----
  parsePrimitive
  	self scanNext.
  	currentTokenFirst isDigit 
  		ifTrue: [self scanPast: #integer]
  		ifFalse: [
+ 			currentTokenFirst == $'
+ 				ifTrue: [ self parseString ]
+ 				ifFalse: [
+ 					currentTokenFirst == $#
+ 						ifTrue: [ self parseSymbol ]
+ 						ifFalse: [ self error ] ].
- 			self failUnless: currentTokenFirst == $'.
- 			self parseString.
  			currentToken = 'module:' 
  				ifTrue: [
  					self scanPast: #module.
+ 					currentTokenFirst == $'
+ 						ifTrue: [ self parseString ]
+ 						ifFalse: [
+ 							currentTokenFirst == $#
+ 								ifTrue: [ self parseSymbol ]
+ 								ifFalse: [ self error ] ] ] ].
+ 	self failUnless: currentTokenFirst == $>.
- 					self failUnless: currentTokenFirst == $'.
- 					self parseString]].
- 	self failUnless: currentToken = '>'.
  	self scanPast: #primitiveOrExternalCallEnd!




More information about the Squeak-dev mailing list