diff options
| author | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-03-19 11:13:32 +0000 |
|---|---|---|
| committer | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-03-19 11:13:32 +0000 |
| commit | aad89ecff0130860eaba36a041dad8f60601c479 (patch) | |
| tree | dcc5c9502972eb9dff14e321035a33826c97e179 /libgfortran/runtime | |
| parent | bf441740227a2652b150760dd5dec2fc3b51501a (diff) | |
| download | gcc-aad89ecff0130860eaba36a041dad8f60601c479.tar.gz | |
Use C99 bool instead of enum try.
2013-03-19 Janne Blomqvist <jb@gcc.gnu.org>
* libgfortran.h: Include stdbool.h.
(enum try): Remove.
(notify_std): Change return type to bool.
* intrinsics/chmod.c: Don't include stdbool.h.
* intrinsics/execute_command_line.c: Likewise.
* io/format.c: Likewise.
* io/list_read.c (nml_parse_qualifier): Change return type to bool.
(nml_read_obj): Likewise.
(nml_get_obj_data): Likewise.
* io/transfer.c (read_block_form): Fix comment.
(write_buf): Change return type to bool.
* io/write.c: Don't include stdbool.h.
* io/write_float.def (output_float): Change return type to bool.
(output_float_FMT_G_ ## x): Change type of result variable.
* runtime/error.c (notify_std): Change return type to bool.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@196791 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/runtime')
| -rw-r--r-- | libgfortran/runtime/error.c | 8 |
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; } |