diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-11-15 14:04:22 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-11-15 14:04:22 +0000 |
| commit | 84731ab27520db983de312b8c3f4e2b98f3bb8c9 (patch) | |
| tree | e8e70b5e8261c96dee5b03868e6dd377cf4c8a98 /gcc/ada/sem_warn.ads | |
| parent | db7cfe95d3e2c4de6407c93f4bf8ec2b38bd194a (diff) | |
| download | gcc-84731ab27520db983de312b8c3f4e2b98f3bb8c9.tar.gz | |
2005-11-14 Ed Schonberg <schonberg@adacore.com>
Robert Dewar <dewar@adacore.com>
* sem_warn.ads, sem_warn.adb (Publicly_Referenceable): Generic formals
of a generic subprogram are not visible outside the body.
(Set_Warning_Switch): New procedure (code to set warning mode moved
here from Switch.C so that it can be shared by pragma processing.
(Check_References): Special case warning for non-modified non-imported
volatile objects.
* par-prag.adb: Modify processing of pragma Warnings to accomodate new
form with a string literal argument
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@107008 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_warn.ads')
| -rw-r--r-- | gcc/ada/sem_warn.ads | 11 |
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 -- ------------------------------------------ |