From 923e6ff331d3e4c0109529937c5ee589dfbe93b8 Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Thu, 9 Apr 2009 10:38:54 +0000 Subject: binderr.adb, [...]: New circuitry for handling Maximum_Messages. 2009-04-09 Robert Dewar * binderr.adb, errout.adb, errutil.adb: New circuitry for handling Maximum_Messages. * erroutc.adb, erroutc.ads (Warnings_Suppressed): Now tests global warning status as well. * opt.ads (Maximum_Messages): New name for Maximum_Errors. * switch-b.adb, switch-c.adb: Change name Maximum_Errors to Maximum_Messages. * bindusg.adb, usage.adb: Update line for -gnatm switch * gnat_ugn.texi: Update documentation for -gnatmnn compiler switch and -mnn binder switch. * sem_ch10.adb: Minor reformatting. From-SVN: r145822 --- gcc/ada/erroutc.adb | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'gcc/ada/erroutc.adb') diff --git a/gcc/ada/erroutc.adb b/gcc/ada/erroutc.adb index f255ac0..a5d963f 100644 --- a/gcc/ada/erroutc.adb +++ b/gcc/ada/erroutc.adb @@ -1340,6 +1340,10 @@ package body Erroutc is function Warnings_Suppressed (Loc : Source_Ptr) return Boolean is begin + if Warning_Mode = Suppress then + return True; + end if; + -- Loop through table of ON/OFF warnings for J in Warnings.First .. Warnings.Last loop -- cgit v1.1