projects
/
gcc.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
[Ada] Fix bogus style check failure with pragma Style_Checks (Off)
[gcc.git]
/
gcc
/
ada
/
sem.adb
diff --git
a/gcc/ada/sem.adb
b/gcc/ada/sem.adb
index 2f8f6a4eee490618cb3bd0799ec57a68ca27576d..9b6b33535f97ab78377843ef612907952854cf8f 100644
(file)
--- a/
gcc/ada/sem.adb
+++ b/
gcc/ada/sem.adb
@@
-1395,6
+1395,7
@@
package body Sem is
Restore_Scope_Stack (List);
Restore_Ghost_Region (Saved_GM, Saved_IGR);
Style_Max_Line_Length := Saved_ML;
+ Style_Check_Max_Line_Length := Style_Max_Line_Length /= 0;
end Do_Analyze;
-- Local variables