[Pkg] The Trunk: System-ul.448.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Jul 16 09:13:36 UTC 2011


Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.448.mcz

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

Name: System-ul.448
Author: ul
Time: 16 July 2011, 11:12:48.138 am
UUID: de5c8937-c539-c34d-ac36-3a3302b78212
Ancestors: System-bf.447

Added accessors for #maxExternalSemaphores.

=============== Diff against System-bf.447 ===============

Item was added:
+ ----- Method: SmalltalkImage>>maxExternalSemaphores (in category 'vm parameters') -----
+ maxExternalSemaphores
+ 	"The size of table where external semaphores are registered. Only in Cog"
+ 	self isRunningCog ifFalse: [^nil].
+ 	^self vmParameterAt: 49!

Item was added:
+ ----- Method: SmalltalkImage>>maxExternalSemaphores: (in category 'vm parameters') -----
+ maxExternalSemaphores: aSize
+ 	"Changes the size of table where external semaphores are registered. 
+ 	The size can only grow, and will always be the next power of two larger than the parameter.
+ 	
+ 	Setting this at any time other than start-up can potentially lose requests.
+ 	 i.e. during the realloc new storage is allocated, t
+ 	he old contents are copied and then pointers are switched. 
+ 	 Requests occurring during copying won't be seen if they occur to indices already copied. 
+ 	The intended use is to set the table to some adequate maximum at start-up"
+ 	
+ 	self isRunningCog ifFalse: [^0].
+ 	"The vm-header field is a short, maximum 64k entries. Well, on most platforms anyways "
+ 	(aSize < 0 or: [aSize > 16rFFFF]) ifTrue: [^DomainError signalFrom: 0 to: 16rFFFF].
+ 	^self vmParameterAt: 49 put: aSize!



More information about the Packages mailing list