diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-10-31 18:05:19 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-10-31 18:05:19 +0000 |
commit | 63776baf924523c5599ec559c905e3d22e897fbe (patch) | |
tree | 7e8babcc62128fb11dce00aba20ff8ee49859956 /gcc/ada/raise.h | |
parent | b855d8cef1e3ac7eaf18c0445e0c80dcbf5f1520 (diff) | |
download | gcc-63776baf924523c5599ec559c905e3d22e897fbe.tar.gz |
2006-10-31 Arnaud Charlet <charlet@adacore.com>
Robert Dewar <dewar@adacore.com>
* restrict.ads, restrict.adb (Restriction_Active): Now returns False if
only a restriction warning is active for the given restriction. This is
desirable because we do not want to modify code in the case where only
a warning is set.
(Set_Profile_Restrictions): Make sure that a Profile_Warnings never
causes overriding of real restrictions.
Take advantage of new No_Restrictions constant.
* raise.h: (__gnat_set_globals): Change profile.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@118295 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/raise.h')
-rw-r--r-- | gcc/ada/raise.h | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/gcc/ada/raise.h b/gcc/ada/raise.h index 5e4d0cb6fd4..b62f2309466 100644 --- a/gcc/ada/raise.h +++ b/gcc/ada/raise.h @@ -6,7 +6,7 @@ * * * C Header File * * * - * Copyright (C) 1992-2005, Free Software Foundation, Inc. * + * Copyright (C) 1992-2006, 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- * @@ -64,10 +64,7 @@ extern void __gnat_free (void *); extern void *__gnat_realloc (void *, __SIZE_TYPE__); extern void __gnat_finalize (void); extern void set_gnat_exit_status (int); -extern void __gnat_set_globals (int, int, - char, char, char, char, - char *, char *, - int, int, int, int, int, int); +extern void __gnat_set_globals (void); extern void __gnat_initialize (void *); extern void __gnat_init_float (void); extern void __gnat_install_handler (void); |