--- a/MessageNd.st	Sun Jan 09 22:30:29 1994 +0100
+++ b/MessageNd.st	Wed Jan 12 21:20:41 1994 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
 
-$Header: /cvs/stx/stx/libcomp/Attic/MessageNd.st,v 1.4 1993-12-11 01:07:40 claus Exp $
+$Header: /cvs/stx/stx/libcomp/Attic/MessageNd.st,v 1.5 1994-01-12 20:20:41 claus Exp $
 '!
 
 !MessageNode class methodsFor:'instance creation'!
@@ -249,7 +249,7 @@
 !
 
 printWhileOn:aStream indent:i
-    |needParen selectorParts arg|
+    |needParen arg|
 
     "special handling of whileTrue/whileFalse"
 
@@ -521,7 +521,7 @@
 codeTimesRepeatOn:aStream inBlock:b valueNeeded:valueNeeded
     "generate code for n timesRepeat:[ ... ]"
 
-    |pos pos2 theReceiver theByteCode optByteCode|
+    |pos pos2 theReceiver|
 
     theReceiver := receiver.
     theReceiver codeOn:aStream inBlock:b.