src/JavaMethod.st
branchjk_new_structure
changeset 1499 2d4849f5ade0
parent 1478 329a15eedd36
child 1508 ede3a3720ec6
--- a/src/JavaMethod.st	Sun May 13 17:30:17 2012 +0000
+++ b/src/JavaMethod.st	Wed May 30 20:52:34 2012 +0000
@@ -1348,16 +1348,20 @@
 !
 
 clearBreakPoint
+    | clsInEvent |
 
     accessFlags := (accessFlags bitClear:A_BREAKPOINT).
     self hasCode ifTrue:[
         MessageTracer unwrapMethod:self
     ] ifFalse:[
-        Smalltalk changed:#methodTrap with:{ javaClass . selector }
+        clsInEvent := self isStatic 
+                        ifTrue:[ javaClass theMetaclass ]
+                        ifFalse:[ javaClass ].
+        Smalltalk changed:#methodTrap with:{ clsInEvent . selector }
     ]
 
     "Modified: / 13-11-1998 / 23:31:00 / cg"
-    "Modified: / 15-11-2011 / 22:44:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 30-05-2012 / 19:31:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 isCounting
@@ -1373,16 +1377,20 @@
 !
 
 setBreakPoint
+    | clsInEvent |
 
     accessFlags := (accessFlags bitOr:A_BREAKPOINT).
     self hasCode ifTrue:[
         MessageTracer trapMethod:self
     ] ifFalse:[
-        Smalltalk changed:#methodTrap with:{ javaClass . selector }
+        clsInEvent := self isStatic 
+                        ifTrue:[ javaClass theMetaclass ]
+                        ifFalse:[ javaClass ].
+        Smalltalk changed:#methodTrap with:{ clsInEvent . selector }
     ].
 
     "Modified: / 13-11-1998 / 23:30:45 / cg"
-    "Modified: / 15-11-2011 / 22:43:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 30-05-2012 / 19:30:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 setTraceFullPoint