aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libgfortran/ChangeLog4
-rw-r--r--libgfortran/runtime/minimal.c2
2 files changed, 5 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 00a07b1..1120d30 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2018-09-12 Kwok Cheung Yeung <kcy@codesourcery.com>
+
+ * runtime/minimal.c (estr_write): Define in terms of write.
+
2018-09-12 Andrew Stubbs <ams@codesourcery.com>
* runtime/minimal.c (exit): Only work around nvptx bugs on nvptx.
diff --git a/libgfortran/runtime/minimal.c b/libgfortran/runtime/minimal.c
index 8940f97..b6d26fd 100644
--- a/libgfortran/runtime/minimal.c
+++ b/libgfortran/runtime/minimal.c
@@ -196,7 +196,7 @@ sys_abort (void)
#undef st_printf
#define st_printf printf
#undef estr_write
-#define estr_write printf
+#define estr_write(X) write(STDERR_FILENO, (X), strlen (X))
#if __nvptx__
/* Map "exit" to "abort"; see PR85463 '[nvptx] "exit" in offloaded region
doesn't terminate process'. */