--- a/ParserFlags.st Tue Nov 22 00:24:30 2016 +0100
+++ b/ParserFlags.st Wed Nov 23 15:29:17 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1989 by Claus Gittinger
COPYRIGHT (c) 2005 by eXept Software AG
@@ -101,7 +99,8 @@
WarnInconsistentReturnValues WarnOldStyleAssignment
WarnParagraphInIdentifier WarnPlausibilityChecks
WarnPossibleIncompatibilities WarnST80Directives WarnSTXSpecials
- WarnUndeclared WarnUnderscoreInIdentifier WarnUnusedVars Warnings'
+ WarnUndeclared WarnUnderscoreInIdentifier WarnUnusedVars Warnings
+ AutoDefineVariables'
poolDictionaries:''
category:'System-Compiler'
!
@@ -195,6 +194,18 @@
"
!
+autoDefineVariables
+ "only to be turned on when scripting"
+
+ ^ AutoDefineVariables ? false
+!
+
+autoDefineVariables:aBoolean
+ "only to be turned on when scripting"
+
+ AutoDefineVariables := aBoolean
+!
+
fullLineNumberInfo
^ (self lineNumberInfo == #full)
@@ -915,7 +926,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
@@ -923,7 +934,7 @@
!
allowParagraphInIdentifier:aBoolean
- "this allows turning on/off §-characters in identifiers."
+ "this allows turning on/off §-characters in identifiers."
AllowParagraphInIdentifier := aBoolean.
@@ -1454,7 +1465,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]
@@ -1462,7 +1473,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"
@@ -1667,7 +1678,8 @@
"/ ArraysAreImmutable := true. "/ do not care for ST-80 compatibility
"/ StringsAreImmutable := true. "/ do not care for ST-80 compatibility
ImplicitSelfSends := false.
-
+ AutoDefineVariables := false. "/ only to be set when scripting
+
STCKeepCIntermediate := false.
STCKeepOIntermediate := false.
STCKeepSTIntermediate := false.