[squeak-dev] The Trunk: Collections-ar.378.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Sep 6 22:32:40 UTC 2010


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

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

Name: Collections-ar.378
Author: ar
Time: 6 September 2010, 3:32:09.703 pm
UUID: a33f37e6-04a1-dd47-b75f-d8e52d36d7e6
Ancestors: Collections-ar.377

Move #lastIndexOfPKSignature: from Collections to Compression.

=============== Diff against Collections-ar.377 ===============

Item was removed:
- ----- Method: String>>lastIndexOfPKSignature: (in category 'accessing') -----
- lastIndexOfPKSignature: aSignature
- 	"Answer the last index in me where aSignature (4 bytes long) occurs, or 0 if not found"
- 	| a b c d |
- 	a := aSignature first.
- 	b := aSignature second.
- 	c := aSignature third.
- 	d := aSignature fourth.
- 	(self size - 3) to: 1 by: -1 do: [ :i |
- 		(((self at: i) = a)
- 			and: [ ((self at: i + 1) = b)
- 				and: [ ((self at: i + 2) = c)
- 					and: [ ((self at: i + 3) = d) ]]])
- 						ifTrue: [ ^i ]
- 	].
- 	^0!

Item was removed:
- ----- Method: ByteArray>>lastIndexOfPKSignature: (in category 'zip archive') -----
- lastIndexOfPKSignature: aSignature
- 	"Answer the last index in me where aSignature (4 bytes long) occurs, or 0 if not found"
- 	| a b c d |
- 	a := aSignature first.
- 	b := aSignature second.
- 	c := aSignature third.
- 	d := aSignature fourth.
- 	(self size - 3) to: 1 by: -1 do: [ :i |
- 		(((self at: i) = a)
- 			and: [ ((self at: i + 1) = b)
- 				and: [ ((self at: i + 2) = c)
- 					and: [ ((self at: i + 3) = d) ]]])
- 						ifTrue: [ ^i ]
- 	].
- 	^0!




More information about the Squeak-dev mailing list