Bug with DebugPoint

[Nyan11]

Hello,

I was working with DebugPoint and MethodProxies to evaluate some code and the two do not work together.

Bug: The multiplication of methods

To reproduce in a playground:

dp := DebugPointManager installNew: BreakDebugPoint on: (DummyTestClass >> #id:) ast.

mp := MpMethodProxy
		      onMethod: DummyTestClass >> #id:
		      handler: (handler := MpCalledHandler new).
mp install; enableInstrumentation.


DummyTestClass new id: 'abc'.
handler called ifFalse: [ Error signal ].


dp remove.
mp uninstall

Expected behavior

The code should put a breakpoint on the #id: method and a MethodProxy.
We evaluate the code with DummyTestClass new id: 'abc'. and a Debugger should open on break.
We click on Proceed.
The line handler called ifFalse: [ Error signal ]. should not signal an Error because the method proxy has trigger.
Then we remove the the debug point and the method proxy.

Current behavior

Everything go as plan but the method #id: is duplicated in DummyTestClass.

Other informations:

Pharo 12.0.0
Build information: Pharo-12.0.0+SNAPSHOT.build.1570.sha.3dafb8a476dfe88afa5aa6bf7b148beb9c11003f (64 Bit)

MethodProxies Commit ID: [7c2cdb1] 7c2cdb1