Tim Felgentreff uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-tfel.328.mcz
==================== Summary ====================
Name: Graphics-tfel.328
Author: tfel
Time: 3 March 2016, 5:13:19.231036 pm
UUID: 820a35b1-5ebb-472c-a0af-cab2230b27f4
Ancestors: Graphics-tfel.327
Add a method to query if the Display is deferring updates
=============== Diff against Graphics-tfel.327 ===============
Item was added:
+ ----- Method: DisplayScreen class>>isDeferringUpdates (in category 'testing') -----
+ isDeferringUpdates
+
+ ^ DeferringUpdates == true!
Tim Felgentreff uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-tfel.328.mcz
==================== Summary ====================
Name: Graphics-tfel.328
Author: tfel
Time: 3 March 2016, 5:13:19.231036 pm
UUID: 820a35b1-5ebb-472c-a0af-cab2230b27f4
Ancestors: Graphics-tfel.327
Add a method to query if the Display is deferring updates
=============== Diff against Graphics-tfel.327 ===============
Item was added:
+ ----- Method: DisplayScreen class>>isDeferringUpdates (in category 'testing') -----
+ isDeferringUpdates
+
+ ^ DeferringUpdates == true!
Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1093.mcz
==================== Summary ====================
Name: Morphic-mt.1093
Author: mt
Time: 3 March 2016, 11:22:03.445273 am
UUID: ca974de9-2076-4052-bf53-b723668933be
Ancestors: Morphic-topa.1092
Makes tree widgets honor the mouse-over-for-keyboard-focus preference. Just like PluggableListMorphs do. Implementation comes from there.
=============== Diff against Morphic-topa.1092 ===============
Item was changed:
----- Method: SimpleHierarchicalListMorph>>mouseEnter: (in category 'event handling') -----
mouseEnter: event
+
super mouseEnter: event.
+
+ (SystemWindow allWindowsAcceptInput or: [Preferences mouseOverForKeyboardFocus])
+ ifTrue: [event hand newKeyboardFocus: self].!
- event hand newKeyboardFocus: self!
Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1093.mcz
==================== Summary ====================
Name: Morphic-mt.1093
Author: mt
Time: 3 March 2016, 11:22:03.445273 am
UUID: ca974de9-2076-4052-bf53-b723668933be
Ancestors: Morphic-topa.1092
Makes tree widgets honor the mouse-over-for-keyboard-focus preference. Just like PluggableListMorphs do. Implementation comes from there.
=============== Diff against Morphic-topa.1092 ===============
Item was changed:
----- Method: SimpleHierarchicalListMorph>>mouseEnter: (in category 'event handling') -----
mouseEnter: event
+
super mouseEnter: event.
+
+ (SystemWindow allWindowsAcceptInput or: [Preferences mouseOverForKeyboardFocus])
+ ifTrue: [event hand newKeyboardFocus: self].!
- event hand newKeyboardFocus: self!
Eliot Miranda uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-eem.803.mcz
==================== Summary ====================
Name: System-eem.803
Author: eem
Time: 2 March 2016, 7:18:21.713694 pm
UUID: 934ce776-0717-469b-8818-300954393791
Ancestors: System-bf.802
Add getters that answer whether the VM supports immutability or multiple bytecode sets.
=============== Diff against System-bf.802 ===============
Item was added:
+ ----- 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 added:
+ ----- 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 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]]!
Eliot Miranda uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-eem.803.mcz
==================== Summary ====================
Name: System-eem.803
Author: eem
Time: 2 March 2016, 7:18:21.713694 pm
UUID: 934ce776-0717-469b-8818-300954393791
Ancestors: System-bf.802
Add getters that answer whether the VM supports immutability or multiple bytecode sets.
=============== Diff against System-bf.802 ===============
Item was added:
+ ----- 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 added:
+ ----- 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 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]]!