#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Fri, 04 May 2018 12:07:02 +0200
changeset 22721 0649d8f051b0
parent 22720 af161a8324b8
child 22722 d4a251fad93a
#FEATURE by cg class: MessageSend added: #isBlockOrMessageSend
MessageSend.st
--- a/MessageSend.st	Thu May 03 15:12:51 2018 +0200
+++ b/MessageSend.st	Fri May 04 12:07:02 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -352,6 +354,12 @@
     "Modified: 23.4.1996 / 16:53:35 / cg"
 ! !
 
+!MessageSend methodsFor:'testing'!
+
+isBlockOrMessageSend
+    ^ true
+! !
+
 !MessageSend class methodsFor:'documentation'!
 
 version