--- a/MessageNode.st	Thu Mar 21 16:18:14 1996 +0100
+++ b/MessageNode.st	Thu Mar 21 16:19:27 1996 +0100
@@ -191,24 +191,25 @@
 receiver:recNode selector:selectorString args:argArray fold:folding
     |numArgs|
 
-    numArgs := argArray size.
     folding notNil ifTrue:[
-	(numArgs == 1) ifTrue:[
-	    ^ self receiver:recNode selector:selectorString arg:(argArray at:1) fold:folding 
-	].
+        numArgs := argArray size.
+        (numArgs == 1) ifTrue:[
+            ^ self receiver:recNode selector:selectorString arg:(argArray at:1) fold:folding 
+        ].
 
-	"uncomment the follwoing for a nice array initializer optimization ..."
+        "uncomment the follwoing for a nice array initializer optimization ..."
         (numArgs == 2) ifTrue:[
             ^ self receiver:recNode selector:selectorString arg1:(argArray at:1) arg2:(argArray at:2) fold:folding 
         ].
-	numArgs > Method maxNumberOfArguments ifTrue:[
-	    ^ 'too many arguments for current VM implementation'.
-	].
+        numArgs > Method maxNumberOfArguments ifTrue:[
+            ^ 'too many arguments for current VM implementation'.
+        ].
     ].
 
     ^ (self basicNew) receiver:recNode selector:selectorString args:argArray lineno:0
 
     "Modified: 3.9.1995 / 16:41:39 / claus"
+    "Modified: 21.3.1996 / 16:07:34 / cg"
 ! !
 
 !MessageNode methodsFor:'accessing'!
@@ -1560,5 +1561,5 @@
 !MessageNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.42 1996-02-10 18:33:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.43 1996-03-21 15:19:27 cg Exp $'
 ! !