summaryrefslogtreecommitdiff
path: root/gcc/ada/errout.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/errout.ads')
-rw-r--r--gcc/ada/errout.ads3
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads
index 5c1c92ce6b5..ea83a8a7b45 100644
--- a/gcc/ada/errout.ads
+++ b/gcc/ada/errout.ads
@@ -771,7 +771,8 @@ package Errout is
procedure Set_Specific_Warning_Off
(Loc : Source_Ptr;
Msg : String;
- Config : Boolean)
+ Config : Boolean;
+ Used : Boolean := False)
renames Erroutc.Set_Specific_Warning_Off;
-- This is called in response to the two argument form of pragma Warnings
-- where the first argument is OFF, and the second argument is the prefix