aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/runtime/error.c
diff options
context:
space:
mode:
authorDiego Novillo <dnovillo@google.com>2013-03-26 10:33:36 +0000
committerDiego Novillo <dnovillo@google.com>2013-03-26 10:33:36 +0000
commit2a98a4059372b93af919c05fd68f3364e56c7008 (patch)
tree61b7552b10852929b89f1cb93878fadffc1885c2 /libgfortran/runtime/error.c
parentf13a2ceb6b815892f592d14cf87edf1c17383457 (diff)
parentdf552eec2bd8a867e1ce28b33d62a1aac099c4d1 (diff)
Merged revisions 196607-196608,196611-196614,196625,196629-196634,196636,196639,196645-196647,196649-196650,196654-196659,196666,196669,196671-196675,196682-196683,196694-196695,196697-196698,196700-196701,196704-196706,196709,196721-196748,196750-196751,196753,196755-196758,196762,196764-196765,196767-196771,196773-196779,196781-196784,196788-196792,196795-196797,196799-196800,196804-196807,196810-196814,196821,196823-196825,196828-196829,196831-196832,196834,196841-196842,196847-196853,196855-196856,196858,196860-196861,196864-196866,196868,196870-196872,196874,196876,196878-196879,196882,196884-196890,196896-196897,196899-196902,196954,196956-196961,196964-196965,196970,196977-196978,196981-196983,196989,197002-197005,197007,197011-197012,197016-197019,197021,197023-197025,197029-197034,197036-197042 via svnmerge from cxx-conversion
svn+ssh://gcc.gnu.org/svn/gcc/trunk git-svn-id: https://gcc.gnu.org/svn/gcc/branches/cxx-conversion@197098 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/runtime/error.c')
-rw-r--r--libgfortran/runtime/error.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/libgfortran/runtime/error.c b/libgfortran/runtime/error.c
index f09fa201e89..5f048192c23 100644
--- a/libgfortran/runtime/error.c
+++ b/libgfortran/runtime/error.c
@@ -586,17 +586,17 @@ notification_std (int std)
feature. An error/warning will be issued if the currently selected
standard does not contain the requested bits. */
-try
+bool
notify_std (st_parameter_common *cmp, int std, const char * message)
{
int warning;
if (!compile_options.pedantic)
- return SUCCESS;
+ return true;
warning = compile_options.warn_std & std;
if ((compile_options.allow_std & std) != 0 && !warning)
- return SUCCESS;
+ return true;
if (!warning)
{
@@ -614,5 +614,5 @@ notify_std (st_parameter_common *cmp, int std, const char * message)
estr_write (message);
estr_write ("\n");
}
- return FAILURE;
+ return false;
}