--- a/MessageNode.st	Fri Feb 20 14:24:15 2015 +0100
+++ b/MessageNode.st	Fri Feb 20 14:24:40 2015 +0100
@@ -3292,7 +3292,7 @@
         (selector == #respondsTo:) ifTrue:[
             argArray size == 1 ifTrue:[
                 argArray first isConstant ifTrue:[
-                    (#(isSmalltalkX isVisualSmalltalkEnterprise isVisualWorks isSqueak)
+                    (#(isSmalltalkX isVisualSmalltalkEnterprise isVisualWorks isSqueak isDolphinSmalltalk)
                         includesIdentical: argArray first value)
                     ifTrue:[
                         "/ true here !!
@@ -3415,11 +3415,11 @@
 !MessageNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.215 2015-02-20 13:24:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.216 2015-02-20 13:24:40 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.215 2015-02-20 13:24:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.216 2015-02-20 13:24:40 cg Exp $'
 !
 
 version_SVN