aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/runtime
diff options
context:
space:
mode:
authorTobias Burnus <burnus@gcc.gnu.org>2011-05-22 21:34:16 +0200
committerTobias Burnus <burnus@gcc.gnu.org>2011-05-22 21:34:16 +0200
commit1523ffa92a6b83492f576ee12813d3ae7337eda6 (patch)
treec68839c152ef7c9a4e1010ed5506ef7b15fb1b69 /libgfortran/runtime
parent5e70c0b57264ac971d52e499fa75f91c0d8903c2 (diff)
downloadgcc-1523ffa92a6b83492f576ee12813d3ae7337eda6.zip
gcc-1523ffa92a6b83492f576ee12813d3ae7337eda6.tar.gz
gcc-1523ffa92a6b83492f576ee12813d3ae7337eda6.tar.bz2
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
Diffstat (limited to 'libgfortran/runtime')
-rw-r--r--libgfortran/runtime/stop.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/libgfortran/runtime/stop.c b/libgfortran/runtime/stop.c
index 4c3a0f9..912dd54 100644
--- a/libgfortran/runtime/stop.c
+++ b/libgfortran/runtime/stop.c
@@ -67,8 +67,7 @@ stop_string (const char *string, GFC_INTEGER_4 len)
if (string)
{
estr_write ("STOP ");
- ssize_t w = write (STDERR_FILENO, string, len);
- (void) sizeof (w); /* Avoid compiler warning about not using w. */
+ (void) write (STDERR_FILENO, string, len);
estr_write ("\n");
}
exit (0);
@@ -88,8 +87,7 @@ void
error_stop_string (const char *string, GFC_INTEGER_4 len)
{
estr_write ("ERROR STOP ");
- ssize_t w = write (STDERR_FILENO, string, len);
- (void) sizeof (w); /* Avoid compiler warning about not using w. */
+ (void) write (STDERR_FILENO, string, len);
estr_write ("\n");
exit (1);