Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.1342.mcz==================== Summary ====================
Name: Kernel-eem.1342
Author: eem
Time: 1 October 2020, 4:23:04.242629 pm
UUID: 3f8b16e1-4140-4127-8885-b8b3f8644411
Ancestors: Kernel-eem.1341
Oops! Forgot to commit isLinkedNamedPrimitive used by soundPluginActive.
Have Class>>binding use a ClassBinding for metaclass mclass associations too.
=============== Diff against Kernel-eem.1341 ===============
Item was changed:
----- Method: Class>>binding (in category 'compiling') -----
binding
"Answer a binding for the receiver, sharing if possible"
+ (self environment bindingOf: name ifAbsent: nil) ifNotNil:
+ [:bindingOrNil|
+ bindingOrNil value == self ifTrue:
+ [^bindingOrNil]].
+ ^ClassBinding key: nil value: self!
- | binding |
- binding := self environment associationAt: name ifAbsent: [nil -> self].
- ^binding value == self ifTrue:[binding] ifFalse:[nil -> self].!
Item was changed:
----- Method: CompiledMethod>>isLinkedNamedPrimitive (in category 'testing') -----
isLinkedNamedPrimitive
"Answer if the receiver invokes a named primitive, and the method is linked to an actual primitive.
+ For example if the method hasn't yet been used in the current session, it won't be linked"
- For example if the method hasn;t yet been used in the current session, it won't be linked"
^self isNamedPrimitive and: [(self literalAt: 1) fourth ~= 0]
"self systemNavigation browseAllSelect: [:m| m isLinkedNamedPrimitive]"!