The Trunk: System-eem.805.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: System-eem.805.mcz

commits-2
Eliot Miranda uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-eem.805.mcz

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

Name: System-eem.805
Author: eem
Time: 3 March 2016, 11:09:29.833994 am
UUID: 97d0ca96-9146-4ba4-919d-75e74cd848ce
Ancestors: System-topa.804

Rename supportsImmutability to supportsreadOnlyObjects to avoid conflicts with the deep immutability concept.

Update commentary for vmParameterAt:[put:] to describe the current VM.

=============== Diff against System-topa.804 ===============

Item was removed:
- ----- Method: SmalltalkImage>>supportsImmutability (in category 'system attributes') -----
- supportsImmutability
- "Answer whether the VM observes the per-object immutability flag and consequently
- aborts writes to inst vars of, and fails primitives that attempt to write, to immutable objects."
- "SmalltalkImage current supportsImmutability"
-
- ^(self vmParameterAt: 65)
- ifNil: [false]
- ifNotNil:
- [:param| "In older VMs this is a boolean reflecting MULTIPLE_BYTECODE_SETS"
- param isInteger "In newer VMs it is a set of integer flags, bit 1 of which is IMMUTABILITY"
- ifTrue: [param anyMask: 2]
- ifFalse: [false]]!

Item was changed:
  ----- Method: SmalltalkImage>>supportsMultipleBytecodeSets (in category 'system attributes') -----
  supportsMultipleBytecodeSets
  "Answer whether the VM supports multiple bytecodeSets."
  "SmalltalkImage current supportsMultipleBytecodeSets"
 
  ^(self vmParameterAt: 65)
  ifNil: [false]
  ifNotNil:
+ [:param| "In older VMs this is a boolean answering the vm-internal MULTIPLE_BYTECODE_SETS define"
+ param isInteger "In newer VMs it is a set of integer flags, bit 0 of which is the vm-internal MULTIPLE_BYTECODE_SETS define"
- [:param| "In older VMs this is a boolean reflecting MULTIPLE_BYTECODE_SETS"
- param isInteger "In newer VMs it is a set of integer flags, bit 0 of which is MULTIPLE_BYTECODE_SETS"
  ifTrue: [param anyMask: 1]
  ifFalse: [param]]!

Item was added:
+ ----- Method: SmalltalkImage>>supportsReadOnlyObjects (in category 'system attributes') -----
+ supportsReadOnlyObjects
+ "Answer whether the VM observes the per-object read-only flag and consequently aborts
+ writes to inst vars of, and fails primitives that attempt to modify, read-only objects."
+ "SmalltalkImage current supportsReadOnlyObjects"
+
+ ^(self vmParameterAt: 65)
+ ifNil: [false]
+ ifNotNil:
+ [:param| "In older VMs this is a boolean answering the vm-internal MULTIPLE_BYTECODE_SETS define"
+ param isInteger "In newer VMs it is a set of integer flags, bit 1 of which is the vm-internal IMMUTABILITY define"
+ ifTrue: [param anyMask: 2]
+ ifFalse: [false]]!

Item was changed:
  ----- Method: SmalltalkImage>>vmParameterAt: (in category 'system attributes') -----
  vmParameterAt: parameterIndex
  "parameterIndex is a positive integer corresponding to one of the VM's internal parameter/metric registers.
  Answer with the current value of that register.  Fail if parameterIndex has no corresponding register.
  VM parameters are numbered as follows:
  1 byte size of old-space (read-only)
  2 byte size of young-space (read-only)
  3 byte size of object memory (read-only)
  4 allocationCount (read-only; nil in Cog VMs)
  5 allocations between GCs (read-write; nil in Cog VMs)
  6 survivor count tenuring threshold (read-write)
  7 full GCs since startup (read-only)
  8 total milliseconds in full GCs since startup (read-only)
  9 incremental GCs since startup (read-only; scavenging GCs on Spur)
  10 total milliseconds in incremental/scavenging GCs since startup (read-only)
  11 tenures of surving objects since startup (read-only)
+ 12-19 specific to the translating VM (nil in Cog VMs)
+ 20 utc microseconds at VM start-up (actually at time initialization, which precedes image load) (newer Cog VMs only).
+ 21 root (remembered) table size (read-only)
+ 22 root (remembered) table overflows since startup (read-only)
- 12-20 specific to the translating VM (nil in Cog VMs)
- 21 root table size (read-only)
- 22 root table overflows since startup (read-only)
  23 bytes of extra memory to reserve for VM buffers, plugins, etc.
  24 memory threshold above which to shrink object memory (read-write)
  25 ammount to grow by when growing object memory (read-write)
  26 interruptChecksEveryNms - force an ioProcessEvents every N milliseconds (read-write)
  27 number of times mark loop iterated for current IGC/FGC (read-only) includes ALL marking
  28 number of times sweep loop iterated for current IGC/FGC (read-only)
  29 number of times make forward loop iterated for current IGC/FGC (read-only)
  30 number of times compact move loop iterated for current IGC/FGC (read-only)
  31 number of grow memory requests (read-only)
  32 number of shrink memory requests (read-only)
  33 number of root table entries used for current IGC/FGC (read-only)
  34 number of allocations done before current IGC/FGC (read-only)
  35 number of survivor objects after current IGC/FGC (read-only)
  36 millisecond clock when current IGC/FGC completed (read-only)
  37 number of marked objects for Roots of the world, not including Root Table entries for current IGC/FGC (read-only)
  38 milliseconds taken by current IGC (read-only)
  39 Number of finalization signals for Weak Objects pending when current IGC/FGC completed (read-only)
  40 BytesPerWord for this image
  41 imageFormatVersion for the VM
  42 number of stack pages in use (Cog Stack VM only, otherwise nil)
  43 desired number of stack pages (stored in image file header, max 65535; Cog VMs only, otherwise nil)
  44 size of eden, in bytes (Cog VMs only, otherwise nil)
  45 desired size of eden, in bytes (stored in image file header; Cog VMs only, otherwise nil)
  46 size of machine code zone, in bytes (stored in image file header; Cog JIT VM only, otherwise nil)
  47 desired size of machine code zone, in bytes (applies at startup only, stored in image file header; Cog JIT VM only)
  48 various properties of the Cog VM as an integer encoding an array of bit flags.
+ Bit 0: tells the VM that the image's Process class has threadId as its 5th inst var (after nextLink, suspendedContext, priority & myList)
+ Bit 1: on Cog JIT VMs asks the VM to set the flag bit in interpreted methods
- Bit 0: implies the image's Process class has threadId as its 3rd inst var (zero relative)
- Bit 1: on Cog VMs asks the VM to set the flag bit in interpreted methods
  Bit 2: if set, preempting a process puts it to the head of its run queue, not the back,
+ i.e. preempting a process by a higher priority one will not cause the preempted process to yield
- i.e. preempting a process by a higher one will not cause the process to yield
  to others at the same priority.
+ Bit 3: in a muilt-threaded VM, if set, the Window system will only be accessed from the first VM thread
+ Bit 4: in a Spur vm, if set, causes weaklings and ephemerons to be queued individually for finalization
  49 the size of the external semaphore table (read-write; Cog VMs only)
+ 50-51 reserved for VM parameters that persist in the image (such as eden above)
+ 52 root (remembered) table maximum size (read-only)
+ 53 the number of oldSpace segments (Spur only, otherwise nil)
- 50-53 reserved for VM parameters that persist in the image (such as eden above)
  54 total size of free old space (Spur only, otherwise nil)
  55 ratio of growth and image size at or above which a GC will be performed post scavenge (Spur only, otherwise nil)
  56 number of process switches since startup (read-only)
  57 number of ioProcessEvents calls since startup (read-only)
  58 number of forceInterruptCheck (Cog VMs) or quickCheckInterruptCalls (non-Cog VMs) calls since startup (read-only)
  59 number of check event calls since startup (read-only)
  60 number of stack page overflows since startup (read-only; Cog VMs only)
  61 number of stack page divorces since startup (read-only; Cog VMs only)
  62 number of machine code zone compactions since startup (read-only; Cog VMs only)
  63 milliseconds taken by machine code zone compactions since startup (read-only; Cog VMs only)
  64 current number of machine code methods (read-only; Cog VMs only)
+ 65 In newer Cog VMs a set of flags describing VM features,
+ if non-zero bit 0 implies multiple bytecode set support;
+ if non-zero bit 0 implies read-only object support
+ (read-only; Cog VMs only; nil in older Cog VMs, a boolean answering multiple bytecode support in not so old Cog VMs)
- 65 true if the VM supports multiple bytecode sets;  (read-only; Cog VMs only; nil in older Cog VMs)
  66 the byte size of a stack page in the stack zone  (read-only; Cog VMs only)
+ 67 the maximum allowed size of old space in bytes, 0 implies no internal limit (Spur VMs only).
+ 68 - 69 reserved for more Cog-related info
- 67 - 69 reserved for more Cog-related info
  70 the value of VM_PROXY_MAJOR (the interpreterProxy major version number)
  71 the value of VM_PROXY_MINOR (the interpreterProxy minor version number)"
 
  <primitive: 254>
  self primitiveFailed!

Item was changed:
  ----- Method: SmalltalkImage>>vmParameterAt:put: (in category 'vm parameters') -----
  vmParameterAt: parameterIndex put: newValue
  "parameterIndex is a positive integer corresponding to one of the VM's internal
  parameter/metric registers.  Store newValue (a positive integer) into that
  register and answer with the previous value that was stored there.
  Fail if newValue is out of range, if parameterIndex has no corresponding
  register, or if the corresponding register is read-only.
 
+ As of early 2016 the parameters which can be set are
- As of 2011-ish the parameters which can be set are
  5 allocations between GCs (read-write; nil in Cog VMs)
  6 survivor count tenuring threshold (read-write)
  23 bytes of extra memory to reserve for VM buffers, plugins, etc.
  24 memory threshold above whichto shrink object memory (read-write)
  25 memory headroom when growing object memory (read-write)
  26 interruptChecksEveryNms - force an ioProcessEvents every N milliseconds (read-write)
  43 desired number of stack pages (stored in image file header, max 65535; Cog VMs only, otherwise nil)
  45 desired size of eden, in bytes (stored in image file header; Cog VMs only, otherwise nil)
  47 desired size of machine code zone, in bytes (applies at startup only, stored in image file header; Cog JIT VM only)
  48 various properties of the Cog VM as an integer encoding an array of bit flags.
+ Bit 0: tells the VM that the image's Process class has threadId as its 5th inst var (after nextLink, suspendedContext, priority & myList)
+ Bit 1: on Cog JIT VMs asks the VM to set the flag bit in interpreted methods
+ Bit 2: if set, preempting a process puts it to the head of its run queue, not the back,
+ i.e. preempting a process by a higher priority one will not cause the preempted process to yield
+ to others at the same priority.
+ Bit 3: in a muilt-threaded VM, if set, the Window system will only be accessed from the first VM thread
+ Bit 4: in a Spur vm, if set, causes weaklings and ephemerons to be queued individually for finalization
+ 49 the size of the external semaphore table (read-write; Cog VMs only)
+ 55 ratio of growth and image size at or above which a GC will be performed post scavenge (Spur only, otherwise nil)
+ 67 the maximum allowed size of old space in bytes, 0 implies no internal limit (Spur only)."
- Bit 0: implies the image's Process class has threadId as its 3rd inst var (zero relative)
- 49 the size of the external semaphore table (read-write; Cog VMs only)"
 
  <primitive: 254>
  self primitiveFailed!