ada: Spurious maximum nesting level warnings

This patch fixes an issue in the compiler whereby disabling style checks via
pragma Style_Checks ("-L") resulted in the minimum nesting level being zero
but the style still being enabled - leading to spurious maximum nesting level
exceeded warnings.

gcc/ada/

	* stylesw.adb (Set_Style_Check_Options): Disable max nesting level
	when unspecified

diff --git a/gcc/ada/stylesw.adb b/gcc/ada/stylesw.adb
index 76004455b104c735e8d5d8f0e434835295a38ddd..6ef8e205e968f2d884645c38d1101ead4bc2eb1c 100644 (file)
--- a/gcc/ada/stylesw.adb
+++ b/gcc/ada/stylesw.adb
@@ -537,7 +537,8 @@ package body Stylesw is
                Style_Check_Layout                 := False;
 
             when 'L' =>
-               Style_Max_Nesting_Level := 0;
+               Style_Max_Nesting_Level            := 0;
+               Style_Check_Max_Nesting_Level      := False;
 
             when 'm' =>
                Style_Check_Max_Line_Length        := False;