--- a/ParserFlags.st	Thu Jan 19 10:19:19 2012 +0100
+++ b/ParserFlags.st	Thu Jan 19 10:39:34 2012 +0100
@@ -26,11 +26,11 @@
 		warnAboutReferenceToPrivateClass warnAboutShortLocalVariableNames
 		warnAboutPossiblyUnimplementedSelectors
 		warnAboutUnknownCharacterEscapesInJavaScriptStringConstant
-		allowLiteralNameSpaceSymbols allowUnderscoreInIdentifier
-		allowDollarInIdentifier allowOldStyleAssignment
-		allowSqueakExtensions allowDolphinExtensions
-		allowExtendedBinarySelectors allowQualifiedNames
-		allowFunctionCallSyntaxForBlockEvaluation
+		warnPlausibilityChecks allowLiteralNameSpaceSymbols
+		allowUnderscoreInIdentifier allowDollarInIdentifier
+		allowOldStyleAssignment allowSqueakExtensions
+		allowDolphinExtensions allowExtendedBinarySelectors
+		allowQualifiedNames allowFunctionCallSyntaxForBlockEvaluation
 		allowLocalVariableDeclarationWithInitializerExpression
 		allowDomainVariables allowArrayIndexSyntaxExtension
 		allowReservedWordsAsSelectors allowVariableReferences
@@ -63,7 +63,7 @@
 		WarnAboutReferenceToPrivateClass WarnAboutShortLocalVariableNames
 		WarnAboutPossiblyUnimplementedSelectors WarnAboutPeriodInSymbol
 		WarnAboutUnknownCharacterEscapesInJavaScriptStringConstant
-		AllowUnderscoreInIdentifier
+		WarnPlausibilityChecks AllowUnderscoreInIdentifier
 		AllowFunctionCallSyntaxForBlockEvaluation AllowLazyValueExtension
 		AllowVariableReferences AllowReservedWordsAsSelectors
 		AllowLocalVariableDeclarationWithInitializerExpression
@@ -1148,6 +1148,22 @@
     "Modified: / 05-09-2006 / 11:46:17 / cg"
 !
 
+warnPlausibilityChecks
+    "controls generation of warning messages about plausibility checks (possible precedence, etc.)"
+
+    ^ WarnPlausibilityChecks
+
+    "Created: / 19-01-2012 / 10:38:20 / cg"
+!
+
+warnPlausibilityChecks:aBoolean
+    "controls generation of warning messages about plausibility checks (possible precedence, etc.)"
+
+    WarnPlausibilityChecks := aBoolean
+
+    "Created: / 19-01-2012 / 10:38:39 / cg"
+!
+
 warnPossibleIncompatibilities
     "return true, if possible incompatibilities (with other ST systems)
      are to be warned about"
@@ -1270,6 +1286,7 @@
     WarnAboutPossiblyUnimplementedSelectors := true.
     WarnAboutPeriodInSymbol := true.
     WarnAboutUnknownCharacterEscapesInJavaScriptStringConstant := false.
+    WarnPlausibilityChecks := true.
 
     AllowReservedWordsAsSelectors := false.
     AllowUnderscoreInIdentifier := true.        "/ underscores in identifiers
@@ -1336,7 +1353,7 @@
     "
 
     "Modified: / 09-08-2006 / 18:47:18 / fm"
-    "Modified: / 04-10-2011 / 19:52:01 / cg"
+    "Modified: / 19-01-2012 / 10:37:43 / cg"
 !
 
 initializeSTCFlagsForTopDirectory:topDirArg
@@ -2108,6 +2125,22 @@
     warnOldStyleAssignment := aBoolean.
 !
 
+warnPlausibilityChecks
+    "controls generation of warning messages about plausibility checks (possible precedence, etc.)"
+
+    ^ warnPlausibilityChecks
+
+    "Created: / 19-01-2012 / 10:38:54 / cg"
+!
+
+warnPlausibilityChecks:aBoolean
+    "controls generation of warning messages about plausibility checks (possible precedence, etc.)"
+
+    warnPlausibilityChecks := aBoolean
+
+    "Created: / 19-01-2012 / 10:39:02 / cg"
+!
+
 warnPossibleIncompatibilities
     "holds true, if possible incompatibilities (with other ST systems)
      are to be warned about"
@@ -2219,6 +2252,7 @@
     warnAboutPossiblyUnimplementedSelectors := WarnAboutPossiblyUnimplementedSelectors.
     warnAboutPeriodInSymbol := WarnAboutPeriodInSymbol.
     warnAboutUnknownCharacterEscapesInJavaScriptStringConstant := WarnAboutUnknownCharacterEscapesInJavaScriptStringConstant.
+    warnPlausibilityChecks := WarnPlausibilityChecks.
 
     allowUnderscoreInIdentifier := AllowUnderscoreInIdentifier.
     allowDollarInIdentifier := AllowDollarInIdentifier.
@@ -2285,17 +2319,17 @@
      self new inspect.
     "
 
-    "Modified: / 04-10-2011 / 19:52:13 / cg"
+    "Modified: / 19-01-2012 / 10:39:22 / cg"
 ! !
 
 !ParserFlags class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.78 2011-10-18 14:49:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.79 2012-01-19 09:39:34 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.78 2011-10-18 14:49:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.79 2012-01-19 09:39:34 cg Exp $'
 ! !
 
 ParserFlags initialize!