--- a/JavaClass.st Wed Feb 04 07:56:36 2015 +0000
+++ b/JavaClass.st Wed Feb 04 17:12:02 2015 +0000
@@ -2196,15 +2196,17 @@
method := cls compiledMethodAt:sel.
method notNil ifTrue:[ ^ method ].
cls isInterface ifFalse:[
- cls superclass ~~ JavaObject ifTrue:[queue add: cls superclass]
+ cls superclass notNil ifTrue:[queue add: cls superclass]
].
- queue addAll: cls interfaces.
+ cls isJavaClass ifTrue:[
+ queue addAll: cls interfaces.
+ ].
].
].
"/cls ifNotNil:[^super lookupMethodFor: selector].
^ nil
- "Modified: / 19-10-2011 / 17:19:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-02-2015 / 15:14:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
performStatic:selector