[squeak-dev] The Trunk: Kernel-nice.963.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Oct 31 22:49:42 UTC 2015


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

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

Name: Kernel-nice.963
Author: nice
Time: 31 October 2015, 11:48:47.351 pm
UUID: 251411b2-0110-4d17-8469-5b3aef45ebee
Ancestors: Kernel-nice.962

Let's correct my fresh DataStream correction...
The ugly 37777777 pattern may happen in octal, but 50 birthdays is well too young for practicing such sport correctly ;)

<rant>
if the MC commit window would not try and reformat the code (especially rewrite hexadecimal constants in decimal) - that would have given me one more chance to correct before committing...
</rant>

=============== Diff against Kernel-nice.962 ===============

Item was changed:
  ----- Method: SmallInteger>>objectForDataStream: (in category 'objects from disk') -----
  objectForDataStream: refStrm
  	"In a 64bits sput VM, we may have to fake 32bits SmallInteger for compatibility"
  
  	| large |
+ 	self > 16r3FFFFFFF ifTrue: [
- 	self > 16r37777777 ifTrue: [
  		large := LargePositiveInteger new: self digitLength neg: false.
  		1 to: self digitLength do: [:i | large digitAt: i put: (self digitAt: i)].
  		^large].
  	self < -16r40000000 ifTrue: [
  		large := LargeNegativeInteger new: self digitLength neg: true.
  		1 to: self digitLength do: [:i | large digitAt: i put: (self digitAt: i)].
  		^large].
  	^ self
  !



More information about the Squeak-dev mailing list