[Pkg] The Trunk: Collections-ul.339.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Mar 15 04:05:18 UTC 2010

Levente Uzonyi uploaded a new version of Collections to project The Trunk:

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

Name: Collections-ul.339
Author: ul
Time: 15 March 2010, 4:53:56.284 am
UUID: 556fddfd-0f27-1d4c-91c7-a3d7745f80cf
Ancestors: Collections-ul.338

- added missing negation

=============== Diff against Collections-ul.338 ===============

Item was changed:
  ----- Method: ArrayedCollection class>>newFromStream: (in category 'instance creation') -----
  newFromStream: s
  	"Only meant for my subclasses that are raw bits and word-like.  For quick unpack form the disk."
  	| len |
+ 	(self isPointers or: [ self isWords not ]) ifTrue: [ ^self ].
- 	(self isPointers or: [ self isWords ]) ifTrue: [ ^self ].
  	s next = 16r80 ifTrue: [
  		"A compressed format.  Could copy what BitMap does, or use a 
  		special sound compression format.  Callers normally compress their own way."
  		^self error: 'not implemented' ].
  	s skip: -1.
  	len := s nextInt32.
  	^s nextWordsInto: (self basicNew: len)!

More information about the Packages mailing list