*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Tue, 28 Mar 2006 19:45:42 +0200
changeset 1729 cab536ed26c6
parent 1728 f2a7a491889f
child 1730 f8121ec9a7dd
*** empty log message ***
Explainer.st
--- a/Explainer.st	Tue Mar 28 15:52:38 2006 +0200
+++ b/Explainer.st	Tue Mar 28 19:45:42 2006 +0200
@@ -367,7 +367,7 @@
     node isMessage ifTrue:[
         recClassSet := self guessPossibleImplementorClassesFor:(node receiver) in:code forClass:cls.
         recClassSet isNil ifTrue:[ ^ nil ].
-        recClassSet isEmpty ifTrue:[ self error. ^ nil ].
+        recClassSet isEmpty ifTrue:[ ^ nil ].
 
         implSet := recClassSet collect:[:recClass | recClass whichClassImplements:node selector].
         "/ toDo: for each implementor, parse its method for possible return types.
@@ -1158,5 +1158,5 @@
 !Explainer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.65 2006-03-28 13:52:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.66 2006-03-28 17:45:42 cg Exp $'
 ! !