--- a/PrimaryNode.st	Sat Dec 11 02:07:55 1993 +0100
+++ b/PrimaryNode.st	Sat Dec 11 02:09:49 1993 +0100
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
              All Rights Reserved
 
-$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.3 1993-10-13 02:41:41 claus Exp $
+$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.4 1993-12-11 01:09:30 claus Exp $
 written 88 by claus
 '!
 
@@ -436,6 +436,10 @@
 
 !PrimaryNode methodsFor:'printing'!
 
+displayString
+    ^ 'InterpreterVariable(' , self printString , ')'
+!
+
 printOn:aStream indent:i
     (type == #Self) ifTrue:[
         aStream nextPutAll:'self'. ^ self