diff options
author | Joseph Myers <joseph@codesourcery.com> | 2010-05-28 14:03:31 +0100 |
---|---|---|
committer | Joseph Myers <jsm28@gcc.gnu.org> | 2010-05-28 14:03:31 +0100 |
commit | 7ca92787862d1b6cae3fbda685c1ddf2009e73b3 (patch) | |
tree | 065aff3d1d01e48c7777eadaa47358832eb00cb5 /gcc/fortran/module.c | |
parent | 8bf85f21b3a0180e286e2e32de3dd7f266729baf (diff) | |
download | gcc-7ca92787862d1b6cae3fbda685c1ddf2009e73b3.zip gcc-7ca92787862d1b6cae3fbda685c1ddf2009e73b3.tar.gz gcc-7ca92787862d1b6cae3fbda685c1ddf2009e73b3.tar.bz2 |
final.c (rest_of_clean_state): Use %m in errors instead of strerror (errno).
* final.c (rest_of_clean_state): Use %m in errors instead of
strerror (errno).
* gengtype.c (read_input_list, close_output_files): Use xstrerror
instead of strerror.
* toplev.c (process_options): Use %m in errors instead of strerror
(errno).
* tree-dump.c (dump_begin): Use %m in errors instead of strerror
(errno).
fortran:
* cpp.c (gfc_cpp_init_0): Use xstrerror instead of strerror.
* module.c (write_char, gfc_dump_module, gfc_use_module): Use
xstrerror instead of strerror.
lto:
* lto-coff.c (coff_errmsg): Remove.
(lto_coff_begin_section_with_type, lto_obj_append_data): Use %m in
errors instead of coff_errmsg (-1).
* lto-macho.c (mach_o_errmsg): Remove.
(lto_obj_begin_section, lto_obj_append_data): Use %m in errors
instead of mach_o_errmsg (-1).
* lto.c (read_cgraph_and_symbols): Use %m in errors instead of
xstrerror (errno).
From-SVN: r159969
Diffstat (limited to 'gcc/fortran/module.c')
-rw-r--r-- | gcc/fortran/module.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index a419d6b..9bdee2a 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -1299,7 +1299,7 @@ static void write_char (char out) { if (putc (out, module_fp) == EOF) - gfc_fatal_error ("Error writing modules file: %s", strerror (errno)); + gfc_fatal_error ("Error writing modules file: %s", xstrerror (errno)); /* Add this to our MD5. */ md5_process_bytes (&out, sizeof (out), &ctx); @@ -5124,7 +5124,7 @@ gfc_dump_module (const char *name, int dump_flag) module_fp = fopen (filename_tmp, "w"); if (module_fp == NULL) gfc_fatal_error ("Can't open module file '%s' for writing at %C: %s", - filename_tmp, strerror (errno)); + filename_tmp, xstrerror (errno)); /* Write the header, including space reserved for the MD5 sum. */ now = time (NULL); @@ -5162,7 +5162,7 @@ gfc_dump_module (const char *name, int dump_flag) if (fclose (module_fp)) gfc_fatal_error ("Error writing module file '%s' for writing: %s", - filename_tmp, strerror (errno)); + filename_tmp, xstrerror (errno)); /* Read the MD5 from the header of the old module file and compare. */ if (read_md5_from_module_file (filename, md5_old) != 0 @@ -5171,16 +5171,16 @@ gfc_dump_module (const char *name, int dump_flag) /* Module file have changed, replace the old one. */ if (unlink (filename) && errno != ENOENT) gfc_fatal_error ("Can't delete module file '%s': %s", filename, - strerror (errno)); + xstrerror (errno)); if (rename (filename_tmp, filename)) gfc_fatal_error ("Can't rename module file '%s' to '%s': %s", - filename_tmp, filename, strerror (errno)); + filename_tmp, filename, xstrerror (errno)); } else { if (unlink (filename_tmp)) gfc_fatal_error ("Can't delete temporary module file '%s': %s", - filename_tmp, strerror (errno)); + filename_tmp, xstrerror (errno)); } } @@ -5530,7 +5530,7 @@ gfc_use_module (void) if (module_fp == NULL) gfc_fatal_error ("Can't open module file '%s' for reading at %C: %s", - filename, strerror (errno)); + filename, xstrerror (errno)); /* Check that we haven't already USEd an intrinsic module with the same name. */ |