Eliot Miranda uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-eem.1341.mcz
==================== Summary ====================
Name: Kernel-eem.1341 Author: eem Time: 19 September 2020, 7:16:49.354509 am UUID: facfc991-969e-4997-acb1-42478416023b Ancestors: Kernel-dtl.1340
Add two useful CompiledMethod testing methods... that sounds clumsy :-)
=============== Diff against Kernel-dtl.1340 ===============
Item was added: + ----- 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" + ^self isNamedPrimitive and: [(self literalAt: 1) fourth ~= 0] + + "self systemNavigation browseAllSelect: [:m| m isLinkedNamedPrimitive]"!
Item was added: + ----- Method: CompiledMethod>>isNamedPrimitive (in category 'testing') ----- + isNamedPrimitive + "Answer if the receiver invokes a named primitive." + ^self primitive == 117 + + "self systemNavigation browseAllSelect: [:m| m isNamedPrimitive]"!