[squeak-dev] The Trunk: Kernel-dtl.1336.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Aug 19 18:41:15 UTC 2020


David T. Lewis uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-dtl.1336.mcz

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

Name: Kernel-dtl.1336
Author: dtl
Time: 19 August 2020, 2:41:12.037984 pm
UUID: 1a934e94-87e5-4af3-b6c7-0d1caa848121
Ancestors: Kernel-eem.1335

Remove obsolete Classbuilder>>format:variable:words:pointers:weak: which was replaced by Classbuilder>>format:variable:bitsUnitSize:pointers:weak: a few years ago. This is effectively a private method and does not require deprecation.

=============== Diff against Kernel-eem.1335 ===============

Item was removed:
- ----- Method: ClassBuilder>>format:variable:words:pointers:weak: (in category 'class format') -----
- format: nInstVars variable: isVar words: is32BitWords pointers: isPointers weak: isWeak
- 	"Compute the format for the given instance specfication.
- 	 Above Cog Spur the class format is
- 		<5 bits inst spec><16 bits inst size>
- 	 where the 5-bit inst spec is
- 			0	= 0 sized objects (UndefinedObject True False et al)
- 			1	= non-indexable objects with inst vars (Point et al)
- 			2	= indexable objects with no inst vars (Array et al)
- 			3	= indexable objects with inst vars (Context BlockClosure AdditionalMethodState et al)
- 			4	= weak indexable objects with inst vars (WeakArray et al)
- 			5	= weak non-indexable objects with inst vars (ephemerons) (Ephemeron)
- 			6	= unused
- 			7	= immediates (SmallInteger, Character)
- 			8	= unused
- 			9	= reserved for 64-bit indexable
- 		10-11	= 32-bit indexable (Bitmap)
- 		12-15	= 16-bit indexable
- 		16-23	= 8-bit indexable
- 		24-31	= compiled methods (CompiledMethod)"
- 	| instSpec |
- 	instSpec := isWeak
- 					ifTrue:
- 						[isVar
- 							ifTrue: [4]
- 							ifFalse: [5]]
- 					ifFalse:
- 						[isPointers
- 							ifTrue:
- 								[isVar
- 									ifTrue: [nInstVars > 0 ifTrue: [3] ifFalse: [2]]
- 									ifFalse: [nInstVars > 0 ifTrue: [1] ifFalse: [0]]]
- 							ifFalse:
- 								[isVar
- 									ifTrue: [is32BitWords ifTrue: [10] ifFalse: [16]]
- 									ifFalse: [7]]].
- 	^(instSpec bitShift: 16) + nInstVars!



More information about the Squeak-dev mailing list