Andreas Raab uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-ar.197.mcz

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

Name: Compiler-ar.197
Author: ar
Time: 25 March 2011, 9:17:09.411 am
UUID: 6eb026eb-8e91-d844-b9c0-6dbe7997385a
Ancestors: Compiler-ul.196

Remove left-over cruft for positional args in scanner.

=============== Diff against Compiler-ul.196 ===============

Item was changed:
  ----- Method: Scanner>>xLetter (in category 'multi-character scans') -----
  xLetter
  	"Form a word or keyword."
  
  	| type |
  	buffer reset.
  	[(type := self typeTableAt: hereChar) == #xLetter
  		or: [type == #xDigit
  		or: [type == #xUnderscore and:[self allowUnderscoreSelectors]]]] whileTrue:
  			["open code step for speed"
  			buffer nextPut: hereChar.
  			hereChar := aheadChar.
  			aheadChar := source atEnd
  							ifTrue: [30 asCharacter "doit"]
  							ifFalse: [source next]].
  	tokenType := (type == #colon or: [type == #xColon and: [aheadChar ~~ $=]])
  					ifTrue: 
  						[buffer nextPut: self step.
  						"Allow any number of embedded colons in literal symbols"
  						[(self typeTableAt: hereChar) == #xColon] whileTrue:
  							[buffer nextPut: self step].
  						#keyword]
  					ifFalse: 
+ 						[#word].
- 						[type == #leftParenthesis 
- 							ifTrue:
- 								[buffer nextPut: self step; nextPut: $).
- 								 #positionalMessage]
- 							ifFalse:[#word]].
  	token := buffer contents!