--- a/PrimaryNode.st	Thu Mar 27 14:59:40 2003 +0100
+++ b/PrimaryNode.st	Thu Mar 27 16:57:13 2003 +0100
@@ -92,6 +92,13 @@
 
 !PrimaryNode methodsFor:'queries'!
 
+isImmutable
+    "not used with ST/X - 
+     for JavaScript nodes return true here."
+
+    ^ true
+!
+
 isPrimary
     "return true, if this is a node for a primary (i.e. non-send)"
 
@@ -101,5 +108,5 @@
 !PrimaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.20 2000-08-31 10:03:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.21 2003-03-27 15:57:13 cg Exp $'
 ! !