--- a/ParserFlags.st	Wed Apr 10 09:36:21 2019 +0200
+++ b/ParserFlags.st	Tue Apr 23 23:10:17 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
  COPYRIGHT (c) 2005 by eXept Software AG
@@ -59,7 +61,7 @@
 		warnAssignmentToMethodArgument warnAssignmentToPoolVariable
 		allowSignedByteArrayElements allowSymbolsStartingWithDigit
 		allowJavaScriptConst allowPeriodAsNameSpaceSeparator
-		allowCStrings'
+		allowCStrings warnAboutPossiblyUninitializedLocals'
 	classVariableNames:'AllowArrayIndexSyntaxExtension AllowAssignmentToBlockArgument
 		AllowAssignmentToMethodArgument AllowAssignmentToPoolVariable
 		AllowCaretAsBinop AllowCharacterEscapes AllowDollarInIdentifier
@@ -105,7 +107,8 @@
 		WarnUndeclared WarnUnderscoreInIdentifier WarnUnusedVars Warnings
 		AutoDefineVariables AllowSignedByteArrayElements
 		AllowSymbolsStartingWithDigit AllowJavaScriptConst
-		AllowJavaScriptLet AllowPeriodAsNameSpaceSeparator AllowCStrings'
+		AllowJavaScriptLet AllowPeriodAsNameSpaceSeparator AllowCStrings
+		WarnAboutPossiblyUninitializedLocals'
 	poolDictionaries:''
 	category:'System-Compiler'
 !
@@ -1057,7 +1060,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
 
@@ -1065,7 +1068,7 @@
 !
 
 allowParagraphInIdentifier:aBoolean
-    "this allows turning on/off §-characters in identifiers."
+    "this allows turning on/off §-characters in identifiers."
 
     AllowParagraphInIdentifier := aBoolean.
 
@@ -1476,6 +1479,18 @@
     WarnAboutPossiblyUnimplementedSelectors := aBoolean
 !
 
+warnAboutPossiblyUninitializedLocals
+    ^ WarnAboutPossiblyUninitializedLocals
+
+    "Created: / 23-04-2019 / 23:09:08 / Claus Gittinger"
+!
+
+warnAboutPossiblyUninitializedLocals:aBoolean
+    WarnAboutPossiblyUninitializedLocals := aBoolean
+
+    "Created: / 23-04-2019 / 23:09:20 / Claus Gittinger"
+!
+
 warnAboutReferenceToPrivateClass
     "controls generation of warning messages when a private class is referenced"
 
@@ -1632,7 +1647,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]
 
@@ -1640,7 +1655,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"
 
@@ -1775,6 +1790,7 @@
     WarnAboutWrongVariableNames := true.
     WarnAboutVariableNameConventions := true.
     WarnAboutBadComments := true.
+    WarnAboutPossiblyUninitializedLocals := true.
     WarnUnderscoreInIdentifier := false.
     WarnDollarInIdentifier := true.
     WarnParagraphInIdentifier := true.
@@ -1923,7 +1939,7 @@
     "Modified: / 09-08-2006 / 18:47:18 / fm"
     "Modified: / 08-08-2017 / 23:49:41 / cg"
     "Modified (comment): / 11-05-2018 / 10:12:29 / stefan"
-    "Modified: / 11-02-2019 / 17:48:20 / Claus Gittinger"
+    "Modified: / 23-04-2019 / 23:08:43 / Claus Gittinger"
 !
 
 initializeSTCFlagsForTopDirectory:topDirArg
@@ -3091,6 +3107,18 @@
     warnAboutPossiblyUnimplementedSelectors := aBoolean.
 !
 
+warnAboutPossiblyUninitializedLocals
+    ^ warnAboutPossiblyUninitializedLocals
+
+    "Created: / 23-04-2019 / 23:09:55 / Claus Gittinger"
+!
+
+warnAboutPossiblyUninitializedLocals:aBoolean
+    warnAboutPossiblyUninitializedLocals := aBoolean.
+
+    "Created: / 23-04-2019 / 23:10:01 / Claus Gittinger"
+!
+
 warnAboutReferenceToPrivateClass
     "controls generation of warning messages when a private class is referenced"
 
@@ -3318,6 +3346,7 @@
     warnAboutWrongVariableNames := WarnAboutWrongVariableNames.
     warnAboutBadComments := WarnAboutBadComments.
     warnAboutReferenceToPrivateClass := WarnAboutReferenceToPrivateClass.
+    warnAboutPossiblyUninitializedLocals := WarnAboutPossiblyUninitializedLocals.
     warnHiddenVariables := WarnHiddenVariables.
     warnInconsistentReturnValues := WarnInconsistentReturnValues.
     warnAboutNonLowercaseLocalVariableNames := WarnAboutNonLowercaseLocalVariableNames.
@@ -3408,7 +3437,7 @@
     "
 
     "Modified: / 08-08-2017 / 23:50:01 / cg"
-    "Modified: / 08-02-2019 / 18:29:16 / Claus Gittinger"
+    "Modified: / 23-04-2019 / 23:09:45 / Claus Gittinger"
 ! !
 
 !ParserFlags class methodsFor:'documentation'!