--- a/ParserFlags.st Tue Jan 03 20:04:08 2017 +0100
+++ b/ParserFlags.st Mon Jan 09 12:30:48 2017 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1989 by Claus Gittinger
COPYRIGHT (c) 2005 by eXept Software AG
@@ -56,7 +58,8 @@
allowAssignmentToMethodArgument allowAssignmentToPoolVariable
lineNumberInfo allowSTXDelimiterComments
allowSTXExtendedArrayLiterals warnAssignmentToBlockArgument
- warnAssignmentToMethodArgument warnAssignmentToPoolVariable'
+ warnAssignmentToMethodArgument warnAssignmentToPoolVariable
+ allowSignedByteArrayElements'
classVariableNames:'AllowArrayIndexSyntaxExtension AllowAssignmentToBlockArgument
AllowAssignmentToMethodArgument AllowAssignmentToPoolVariable
AllowCaretAsBinop AllowCharacterEscapes AllowDollarInIdentifier
@@ -100,7 +103,7 @@
WarnParagraphInIdentifier WarnPlausibilityChecks
WarnPossibleIncompatibilities WarnST80Directives WarnSTXSpecials
WarnUndeclared WarnUnderscoreInIdentifier WarnUnusedVars Warnings
- AutoDefineVariables'
+ AutoDefineVariables AllowSignedByteArrayElements'
poolDictionaries:''
category:'System-Compiler'
!
@@ -914,7 +917,7 @@
!
allowParagraphInIdentifier
- "return true, if §-characters are allowed in identifiers (treated as letter)"
+ "return true, if §-characters are allowed in identifiers (treated as letter)"
^ AllowParagraphInIdentifier
@@ -922,7 +925,7 @@
!
allowParagraphInIdentifier:aBoolean
- "this allows turning on/off §-characters in identifiers."
+ "this allows turning on/off §-characters in identifiers."
AllowParagraphInIdentifier := aBoolean.
@@ -1098,6 +1101,18 @@
"
!
+allowSignedByteArrayElements
+ "return true, if byteArray elements are allowed to be negative."
+
+ ^ AllowSignedByteArrayElements
+!
+
+allowSignedByteArrayElements:aBoolean
+ "controls, if byteArray elements are allowed to be negative."
+
+ AllowSignedByteArrayElements := aBoolean
+!
+
allowSqueakExtensions
"return true, if support for squeak extensions
computed arrays { .., }
@@ -1453,7 +1468,7 @@
!
warnParagraphInIdentifier
- "return true, if §-characters in identifiers are to be warned about"
+ "return true, if §-characters in identifiers are to be warned about"
^ Warnings and:[WarnParagraphInIdentifier]
@@ -1461,7 +1476,7 @@
!
warnParagraphInIdentifier:aBoolean
- "this allows turning on/off warnings about §-characters in identifiers.
+ "this allows turning on/off warnings about §-characters in identifiers.
You may find those warnings useful, to make certain that your code
is portable to other Smalltalk versions, which do not allow this"
@@ -1660,6 +1675,7 @@
AllowAssignmentToMethodArgument := false.
AllowAssignmentToPoolVariable := false.
"/ AllowAssignmentToPoolVariable := true.
+ AllowSignedByteArrayElements := false.
ArraysAreImmutable := false. "/ still care for ST-80 compatibility
StringsAreImmutable := false. "/ still care for ST-80 compatibility
@@ -2471,10 +2487,11 @@
!
allowSignedByteArrayElements
- "experimental"
- "/ ^ true.
- "/ ^ allowSignedByteArrayElements
- ^ false.
+ ^ allowSignedByteArrayElements
+!
+
+allowSignedByteArrayElements:aBoolean
+ allowSignedByteArrayElements := aBoolean
!
allowSqueakExtensions
@@ -2935,6 +2952,7 @@
allowAssignmentToBlockArgument := AllowAssignmentToBlockArgument.
allowAssignmentToMethodArgument := AllowAssignmentToMethodArgument.
allowAssignmentToPoolVariable := AllowAssignmentToPoolVariable.
+ allowSignedByteArrayElements := AllowSignedByteArrayElements.
arraysAreImmutable := ArraysAreImmutable ? true.
stringsAreImmutable := StringsAreImmutable ? true.