[Pkg] The Trunk: Kernel-nice.379.mcz

[commits at source.squeak.org]

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

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

Name: Kernel-nice.379
Author: nice
Time: 17 January 2010, 6:49:12.215 pm
UUID: ac207c0c-7d27-4f71-ac89-83342ab1a41a
Ancestors: Kernel-nice.378

Correct a small bug in SqNumberParser #expected: does not expect a block argument.
The bug was never reached because requestor is never set. The idea of requestor was st80 compiler based: insert the error message in source text, but it's not active yet.

=============== Diff against Kernel-nice.378 ===============

Item was changed:
  ----- Method: SqNumberParser>>readNamedFloatOrFail (in category 'parsing-private') -----
  readNamedFloatOrFail
  	"This method is used when there is no digit encountered:
  	It try and read a named Float NaN or Infinity.
  	Negative sign for -Infinity has been read before sending this method, and is indicated in the neg inst.var.
  	Fail if no named Float is found"
  		
  	neg ifFalse: [(sourceStream nextMatchAll: 'NaN')
  			ifTrue: [^ Float nan]].
  	(sourceStream nextMatchAll: 'Infinity')
  		ifTrue: [^ neg
  			ifTrue: [Float infinity negated]
  			ifFalse: [Float infinity]].
+ 	^self expected: 'a digit between 0 and ' , (Character digitValue: base - 1)!
- 	^self expected: ['a digit between 0 and ' , (Character digitValue: base - 1)]!