[Help-smalltalk] Read Only issue

[Gwenael Casaccio]

Hi Paolo,

There is an issue in ProcessBeingTerminated class>>#initialize.
It tries to change a RO compiled method:

diff --git a/kernel/SysExcept.st b/kernel/SysExcept.st
index afd923d..9660f7c 100644
--- a/kernel/SysExcept.st
+++ b/kernel/SysExcept.st
@@ -251,6 +251,7 @@ Notification subclass: ProcessBeingTerminated [

     ProcessBeingTerminated class >> initialize [
        (UndefinedObject>>#'__terminate')
+           makeReadOnly: false;
            descriptor: ((MethodInfo new: 1)
                methodClass: UndefinedObject;
                selector: #'__terminate';
@@ -268,7 +269,8 @@ Notification subclass: ProcessBeingTerminated [
                                    #found ]
                                ifFalse: [nil] ].
                        [ :context | ] });
-               yourself)
+               yourself);
+           makeReadOnly: true
     ]

     description [

Gwen