--- a/MessageNode.st	Fri Mar 01 15:39:50 2019 +0100
+++ b/MessageNode.st	Fri Mar 01 15:59:56 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -542,7 +544,7 @@
     |rec arg1 arg1Value operand|
 
     ((selector == #==) or:[selector == #~~]) ifTrue:[
-        (argArray size > 0) ifTrue:[
+        (argArray size ~~ 0) ifTrue:[
             arg1 := argArray at:1
         ].
 
@@ -583,6 +585,7 @@
     ^ nil
 
     "Modified: / 08-03-2012 / 01:07:33 / cg"
+    "Modified: / 01-03-2019 / 15:59:19 / Claus Gittinger"
 !
 
 checkInlinability
@@ -690,7 +693,7 @@
 
     |arg1 msg|
 
-    (argArray size > 0) ifTrue:[
+    (argArray size ~~ 0) ifTrue:[
         arg1 := argArray at:1
     ].
 
@@ -775,6 +778,7 @@
 
     "Modified: / 28-03-2007 / 14:14:28 / cg"
     "Modified (format): / 08-03-2017 / 11:36:03 / cg"
+    "Modified: / 01-03-2019 / 15:59:30 / Claus Gittinger"
 ! !
 
 !MessageNode methodsFor:'code generation'!
@@ -3313,14 +3317,14 @@
 
 collectBlocksInto:aCollection
     receiver collectBlocksInto:aCollection.
-    argArray size > 0 ifTrue:[
+    argArray size ~~ 0 ifTrue:[
         argArray do:[:arg |
             arg collectBlocksInto:aCollection.
         ]
     ].
 
-    "Created: 23.10.1996 / 15:44:49 / cg"
-    "Modified: 23.10.1996 / 16:03:46 / cg"
+    "Created: / 23-10-1996 / 15:44:49 / cg"
+    "Modified: / 01-03-2019 / 15:59:25 / Claus Gittinger"
 !
 
 containsReturn