git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

stop.c (stop_string,error_stop_string): Minor cleanup. 

2011-05-22  Tobias Burnus  <burnus@net-b.de>

        * runtime/stop.c (stop_string,error_stop_string): Minor cleanup.

From-SVN: r174039
This commit is contained in:
Tobias Burnus 2011-05-22 21:34:16 +02:00
parent 5e70c0b572
commit 1523ffa92a
2 changed files with 27 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

46
libgfortran/ChangeLog
View File

@ -1,36 +1,40 @@
2011-05-22 Tobias Burnus <burnus@net-b.de>
* runtime/stop.c (stop_string,error_stop_string): Minor cleanup.
2011-05-22 Janne Blomqvist <jb@gcc.gnu.org> 2011-05-22 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/48931 PR libfortran/48931
* configure.ac: Check for backtrace_symbols_fd instead of * configure.ac: Check for backtrace_symbols_fd instead of
backtrace_symbols, check for readlink. backtrace_symbols, check for readlink.
* config.h.in: Regenerated. * config.h.in: Regenerated.
* configure: Regenerated. * configure: Regenerated.
* runtime/backtrace.c (local_strcasestr): Remove. * runtime/backtrace.c (local_strcasestr): Remove.
(bt_header): New function. (bt_header): New function.
(dump_glibc_backtrace): Remove. (dump_glibc_backtrace): Remove.
(fd_gets): New function. (fd_gets): New function.
(show_backtrace): Rework to use backtrace_symbols_fd and pipes (show_backtrace): Rework to use backtrace_symbols_fd and pipes
avoiding functions that are not async-signal-safe, reformat avoiding functions that are not async-signal-safe, reformat
output. output.
* runtime/main.c (store_exe_path): Try to check /proc/self/exe * runtime/main.c (store_exe_path): Try to check /proc/self/exe
first. first.
2011-05-20 Janne Blomqvist <jb@gcc.gnu.org> 2011-05-20 Janne Blomqvist <jb@gcc.gnu.org>
Uros Bizjak <ubizjak@gmail.com> Uros Bizjak <ubizjak@gmail.com>
PR libfortran/48977 PR libfortran/48977
* configure.host: Swap order of glibc and x86 tests. * configure.host: Swap order of glibc and x86 tests.
2011-05-20 Janne Blomqvist <jb@gcc.gnu.org> 2011-05-20 Janne Blomqvist <jb@gcc.gnu.org>
* config/fpu-387.h (set_fpu): Use renamed inexact macro. * config/fpu-387.h (set_fpu): Use renamed inexact macro.
* config/fpu-aix.h (set_fpu): Clarify error messages, use renamed * config/fpu-aix.h (set_fpu): Clarify error messages, use renamed
inexact macro, set TRP_INEXACT for inexact exception instead of inexact macro, set TRP_INEXACT for inexact exception instead of
TRP_UNDERFLOW. TRP_UNDERFLOW.
* config/fpu-generic.h (set_fpu): Clarify error messages, use * config/fpu-generic.h (set_fpu): Clarify error messages, use
renamed inexact macro. renamed inexact macro.
* config/fpu-glibc.h (set_fpu): Likewise. * config/fpu-glibc.h (set_fpu): Likewise.
* config/fpu-sysv.h (set_fpu): Likewise. * config/fpu-sysv.h (set_fpu): Likewise.
2011-05-14 Tobias Burnus <burnus@net-b.de> 2011-05-14 Tobias Burnus <burnus@net-b.de>

6
libgfortran/runtime/stop.c
View File

@ -67,8 +67,7 @@ stop_string (const char *string, GFC_INTEGER_4 len)
if (string) if (string)
{ {
estr_write ("STOP "); estr_write ("STOP ");
ssize_t w = write (STDERR_FILENO, string, len); (void) write (STDERR_FILENO, string, len);
(void) sizeof (w); /* Avoid compiler warning about not using w. */
estr_write ("\n"); estr_write ("\n");
} }
exit (0); exit (0);
@ -88,8 +87,7 @@ void
error_stop_string (const char *string, GFC_INTEGER_4 len) error_stop_string (const char *string, GFC_INTEGER_4 len)
{ {
estr_write ("ERROR STOP "); estr_write ("ERROR STOP ");
ssize_t w = write (STDERR_FILENO, string, len); (void) write (STDERR_FILENO, string, len);
(void) sizeof (w); /* Avoid compiler warning about not using w. */
estr_write ("\n"); estr_write ("\n");
exit (1); exit (1);