ParserFlags.st
changeset 3219 6c7afe87902c
parent 3218 4780a6bed5c8
child 3220 1fcc025fc0dd
--- a/ParserFlags.st	Tue Jul 09 21:09:59 2013 +0200
+++ b/ParserFlags.st	Tue Jul 09 21:14:20 2013 +0200
@@ -51,7 +51,7 @@
 		allowUnicodeStrings allowUnicodeCharacters allowCharacterEscapes
 		allowStringEscapes allowAssignmentToBlockArgument
 		allowAssignmentToMethodArgument allowAssignmentToPoolVariable
-		lineNumberInfo allowSTXDelimiterComments byteArraysAreImmutable'
+		lineNumberInfo allowSTXDelimiterComments'
 	classVariableNames:'WarnST80Directives WarnUnusedVars WarnUndeclared
 		WarnAboutWrongVariableNames WarnAboutBadComments
 		WarnAboutVariableNameConventions WarnSTXSpecials
@@ -159,13 +159,13 @@
 !
 
 arraysAreImmutable
-    "return true if arrays are immutable literals"
+    "return true if arrays and byteArrays are compiled as immutable literals"
 
     ^ ArraysAreImmutable
 !
 
 arraysAreImmutable:aBoolean
-    "turn on/off immutable array literals - default is false for ST-80 compatibilty."
+    "turn on/off immutable array and byteArrays literals - default is false for ST-80 compatibilty."
 
     ArraysAreImmutable := aBoolean.
 
@@ -177,27 +177,6 @@
     "
 !
 
-byteArraysAreImmutable
-    "return true if bytearrays are immutable literals"
-
-    ^ ByteArraysAreImmutable
-
-    "Created: / 3.8.1998 / 14:53:25 / cg"
-!
-
-byteArraysAreImmutable:aBoolean
-    "turn on/off immutable byte array literals - default is false for ST-80 compatibilty."
-
-    ByteArraysAreImmutable := aBoolean.
-
-    "
-     can be added to your private.rc file:
-
-     ParserFlags byteArraysAreImmutable:true     
-     ParserFlags byteArraysAreImmutable:false      
-    "
-!
-
 fullLineNumberInfo
     ^ (self lineNumberInfo == #full)
 
@@ -1518,7 +1497,6 @@
     AllowAssignmentToPoolVariable := false.
     "/ AllowAssignmentToPoolVariable := true.
 
-    ByteArraysAreImmutable := false.            "/ still care for ST-80 compatibility
     ArraysAreImmutable := false.                "/ still care for ST-80 compatibility
     StringsAreImmutable := false.               "/ still care for ST-80 compatibility
     ImplicitSelfSends := false.
@@ -1751,14 +1729,6 @@
     arraysAreImmutable := aBoolean.
 !
 
-byteArraysAreImmutable
-    ^ byteArraysAreImmutable
-!
-
-byteArraysAreImmutable:aBoolean
-    byteArraysAreImmutable := aBoolean.
-!
-
 flattenVisualWorksNamespaces
     ^ true
 !
@@ -2541,7 +2511,6 @@
     allowAssignmentToPoolVariable := AllowAssignmentToPoolVariable.
 
     arraysAreImmutable := ArraysAreImmutable ? true.
-    byteArraysAreImmutable := ByteArraysAreImmutable ? true.
     stringsAreImmutable := StringsAreImmutable ? true.
     implicitSelfSends := ImplicitSelfSends ? false.
     lineNumberInfo := LineNumberInfo ? false.
@@ -2573,11 +2542,11 @@
 !ParserFlags class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.108 2013-07-09 19:09:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.109 2013-07-09 19:14:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.108 2013-07-09 19:09:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.109 2013-07-09 19:14:20 cg Exp $'
 ! !