--- a/PrimaryNode.st	Thu Aug 31 12:01:00 2000 +0200
+++ b/PrimaryNode.st	Thu Aug 31 12:03:58 2000 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libcomp' }"
+
 ParseNode subclass:#PrimaryNode
 	instanceVariableNames:'value'
 	classVariableNames:''
@@ -74,7 +76,7 @@
     ^ self subclassResponsibility
 ! !
 
-!PrimaryNode methodsFor:'printing'!
+!PrimaryNode methodsFor:'printing & storing'!
 
 displayString
     "return a string for display in inspectors etc."
@@ -99,5 +101,5 @@
 !PrimaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.19 2000-02-12 15:32:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.20 2000-08-31 10:03:12 cg Exp $'
 ! !