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

commits at source.squeak.org commits at source.squeak.org
Sun Jan 3 23:35:53 UTC 2010


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

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

Name: Collections-ar.272
Author: ar
Time: 4 January 2010, 12:35:10 pm
UUID: 27d2de35-817a-9846-af4e-27c7342a1091
Ancestors: Collections-nice.271

Make Etoys unloadable: Move Etoys content to Etoys package.

=============== Diff against Collections-nice.271 ===============

Item was removed:
- ----- Method: WordArray>>primAddArray:and:into: (in category 'array arithmetic primitives') -----
- primAddArray: rcvr and: other into: result
- 
- 	<primitive: 'primitiveAddArrays' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveAddArrays."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) + (other at: i)
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>primAddScalar:and:into: (in category 'array arithmetic primitives') -----
- primAddScalar: rcvr and: other into: result
- 
- 	<primitive: 'primitiveAddScalar' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveAddScalar."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) + other.
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>/ (in category 'array arithmetic') -----
- / other
- 
- 	| result |
- 	other isNumber ifTrue: [
- 		other isFloat ifTrue: [
- 			result := KedamaFloatArray new: self size.
- 			^ self primDivScalar: self and: other into: result.
- 		] ifFalse: [
- 			result := WordArray new: self size.
- 			^ self primDivScalar: self and: other into: result.
- 		].
- 	].
- 	(other isMemberOf: WordArray) ifTrue: [	
- 		result := WordArray new: self size.
- 		^ self primDivArray: self and: other into: result.
- 	].
- 	(other isMemberOf: KedamaFloatArray) ifTrue: [	
- 		result := KedamaFloatArray new: self size.
- 		^ self primDivArray: self and: other into: result.
- 	].
- 	^ super / other.
- !

Item was removed:
- ----- Method: WordArray>>primSubScalar:and:into: (in category 'array arithmetic primitives') -----
- primSubScalar: rcvr and: other into: result
- 
- 	<primitive: 'primitiveSubScalar' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveSubScalar."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) - other.
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>primMulScalar:and:into: (in category 'array arithmetic primitives') -----
- primMulScalar: rcvr and: other into: result
- 
- 	<primitive: 'primitiveMulScalar' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveMulScalar."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) * other.
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>primSubArray:and:into: (in category 'array arithmetic primitives') -----
- primSubArray: rcvr and: other into: result
- 
- 	<primitive: 'primitiveSubArrays' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveSubArrays."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) - (other at: i)
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>- (in category 'array arithmetic') -----
- - other
- 
- 	| result |
- 	other isNumber ifTrue: [
- 		other isFloat ifTrue: [
- 			result := KedamaFloatArray new: self size.
- 			^ self primSubScalar: self and: other into: result.
- 		] ifFalse: [
- 			result := WordArray new: self size.
- 			^ self primSubScalar: self and: other into: result.
- 		].
- 	].
- 	(other isMemberOf: WordArray) ifTrue: [	
- 		result := WordArray new: self size.
- 		^ self primSubArray: self and: other into: result.
- 	].
- 	(other isMemberOf: KedamaFloatArray) ifTrue: [	
- 		result := KedamaFloatArray new: self size.
- 		^ self primSubArray: self and: other into: result.
- 	].
- 	^ super - other.
- !

Item was removed:
- ----- Method: WordArray>>+ (in category 'array arithmetic') -----
- + other
- 
- 	| result |
- 	other isNumber ifTrue: [
- 		other isFloat ifTrue: [
- 			result := KedamaFloatArray new: self size.
- 			^ self primAddScalar: self and: other into: result.
- 		] ifFalse: [
- 			result := WordArray new: self size.
- 			^ self primAddScalar: self and: other into: result.
- 		].
- 	].
- 	(other isMemberOf: WordArray) ifTrue: [	
- 		result := WordArray new: self size.
- 		^ self primAddArray: self and: other into: result.
- 	].
- 	(other isMemberOf: KedamaFloatArray) ifTrue: [	
- 		result := KedamaFloatArray new: self size.
- 		^ self primAddArray: self and: other into: result.
- 	].
- 	^ super + other.
- !

Item was removed:
- ----- Method: WordArray>>primDivScalar:and:into: (in category 'array arithmetic primitives') -----
- primDivScalar: rcvr and: other into: result
- 
- 	<primitive: 'primitiveDivScalar' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveDivScalar."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) / other.
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>* (in category 'array arithmetic') -----
- * other
- 
- 	| result |
- 	other isNumber ifTrue: [
- 		other isFloat ifTrue: [
- 			result := KedamaFloatArray new: self size.
- 			^ self primMulScalar: self and: other into: result.
- 		] ifFalse: [
- 			result := WordArray new: self size.
- 			^ self primMulScalar: self and: other into: result.
- 		].
- 	].
- 	(other isMemberOf: WordArray) ifTrue: [	
- 		result := WordArray new: self size.
- 		^ self primMulArray: self and: other into: result.
- 	].
- 	(other isMemberOf: KedamaFloatArray) ifTrue: [	
- 		result := KedamaFloatArray new: self size.
- 		^ self primMulArray: self and: other into: result.
- 	].
- 	^ super * other.
- !

Item was removed:
- ----- Method: WordArray>>primMulArray:and:into: (in category 'array arithmetic primitives') -----
- primMulArray: rcvr and: other into: result
- 
- 	<primitive: 'primitiveMulArrays' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveMulArrays."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) * (other at: i)
- 	].
- 	^ result.
- !

Item was removed:
- ----- Method: WordArray>>primDivArray:and:into: (in category 'array arithmetic primitives') -----
- primDivArray: rcvr and: other into: result
- 
- 	<primitive: 'primitiveDivArrays' module:'KedamaPlugin'>
- 	"^ KedamaPlugin doPrimitive: #primitiveDivArrays."
- 
- 	1 to: rcvr size do: [:i |
- 		result at: i put: (rcvr at: i) / (other at: i)
- 	].
- 	^ result.
- !




More information about the Squeak-dev mailing list