diff options
author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2014-07-07 09:13:48 +0000 |
---|---|---|
committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2014-07-07 09:13:48 +0000 |
commit | 77777b33a88e950ff1f7fc263e600a694816f468 (patch) | |
tree | cbd088b7bacddb90ca0051f9018f8994fbe6ebde /libgfortran/runtime | |
parent | 8adb5dc735298d2113de33ce442831f4dab9d215 (diff) | |
download | gcc-77777b33a88e950ff1f7fc263e600a694816f468.zip gcc-77777b33a88e950ff1f7fc263e600a694816f468.tar.gz gcc-77777b33a88e950ff1f7fc263e600a694816f468.tar.bz2 |
stop.c: Use C11 _Noreturn.
* runtime/stop.c: Use C11 _Noreturn.
* libgfortran.h: Use C11 _Noreturn in prototypes.
Move REALPART, IMAGPART and COMPLEX_ASSIGN macros...
* intrinsics/c99_functions.c: ... here.
From-SVN: r212327
Diffstat (limited to 'libgfortran/runtime')
-rw-r--r-- | libgfortran/runtime/stop.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/libgfortran/runtime/stop.c b/libgfortran/runtime/stop.c index 7832ef8..8330b66 100644 --- a/libgfortran/runtime/stop.c +++ b/libgfortran/runtime/stop.c @@ -83,8 +83,7 @@ report_exception (void) /* A numeric STOP statement. */ -extern void stop_numeric (GFC_INTEGER_4) - __attribute__ ((noreturn)); +extern _Noreturn void stop_numeric (GFC_INTEGER_4); export_proto(stop_numeric); void @@ -102,8 +101,7 @@ stop_numeric (GFC_INTEGER_4 code) /* A Fortran 2008 numeric STOP statement. */ -extern void stop_numeric_f08 (GFC_INTEGER_4) - __attribute__ ((noreturn)); +extern _Noreturn void stop_numeric_f08 (GFC_INTEGER_4); export_proto(stop_numeric_f08); void @@ -136,8 +134,7 @@ stop_string (const char *string, GFC_INTEGER_4 len) initiates error termination of execution." Thus, error_stop_string returns a nonzero exit status code. */ -extern void error_stop_string (const char *, GFC_INTEGER_4) - __attribute__ ((noreturn)); +extern _Noreturn void error_stop_string (const char *, GFC_INTEGER_4); export_proto(error_stop_string); void @@ -154,8 +151,7 @@ error_stop_string (const char *string, GFC_INTEGER_4 len) /* A numeric ERROR STOP statement. */ -extern void error_stop_numeric (GFC_INTEGER_4) - __attribute__ ((noreturn)); +extern _Noreturn void error_stop_numeric (GFC_INTEGER_4); export_proto(error_stop_numeric); void |