aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_warn.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/sem_warn.ads')
-rw-r--r--gcc/ada/sem_warn.ads11
1 files changed, 10 insertions, 1 deletions
diff --git a/gcc/ada/sem_warn.ads b/gcc/ada/sem_warn.ads
index cec942733ba..be2fd6f11af 100644
--- a/gcc/ada/sem_warn.ads
+++ b/gcc/ada/sem_warn.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1999-2001 Free Software Foundation, Inc. --
+-- Copyright (C) 1999-2005, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -32,6 +32,15 @@ with Types; use Types;
package Sem_Warn is
+ --------------------
+ -- Initialization --
+ --------------------
+
+ function Set_Warning_Switch (C : Character) return Boolean;
+ -- This function sets the warning switch or switches corresponding to
+ -- the given character. It is used for processing a -gnatw switch on the
+ -- command line, or a string literal in pragma Warnings.
+
------------------------------------------
-- Routines to Handle Unused References --
------------------------------------------