--- a/ParserFlags.st Tue Apr 24 18:33:38 2018 +0200
+++ b/ParserFlags.st Tue Apr 24 21:30:43 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1989 by Claus Gittinger
COPYRIGHT (c) 2005 by eXept Software AG
@@ -103,7 +105,8 @@
WarnPossibleIncompatibilities WarnST80Directives WarnSTXSpecials
WarnUndeclared WarnUnderscoreInIdentifier WarnUnusedVars Warnings
AutoDefineVariables AllowSignedByteArrayElements
- AllowSymbolsStartingWithDigit AllowJavaScriptConst'
+ AllowSymbolsStartingWithDigit AllowJavaScriptConst
+ AllowJavaScriptLet'
poolDictionaries:''
category:'System-Compiler'
!
@@ -883,6 +886,14 @@
"Created: / 08-08-2017 / 23:49:07 / cg"
!
+allowJavaScriptLet
+ "return true, if let is allowed and treated as a keyword (in JavaScript)"
+
+ ^ AllowJavaScriptLet
+
+ "Created: / 08-08-2017 / 23:48:48 / cg"
+!
+
allowLiteralNameSpaceSymbols
"return true, if literal nameSpace symbols are allowed (#foo::bar) are allowed"
@@ -938,7 +949,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
@@ -946,7 +957,7 @@
!
allowParagraphInIdentifier:aBoolean
- "this allows turning on/off §-characters in identifiers."
+ "this allows turning on/off §-characters in identifiers."
AllowParagraphInIdentifier := aBoolean.
@@ -1511,7 +1522,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]
@@ -1519,7 +1530,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"
@@ -1722,6 +1733,7 @@
AllowSymbolsStartingWithDigit := false.
AllowJavaScriptConst := true.
+ AllowJavaScriptLet := false.
ArraysAreImmutable := false. "/ still care for ST-80 compatibility
StringsAreImmutable := false. "/ still care for ST-80 compatibility
@@ -2402,6 +2414,12 @@
"Created: / 08-08-2017 / 23:50:23 / cg"
!
+allowJavaScriptLet
+ ^ self class allowJavaScriptLet
+
+ "Created: / 08-08-2017 / 23:50:12 / cg"
+!
+
allowLazyValueExtension
^ allowLazyValueExtension
!