summaryrefslogtreecommitdiff
path: root/libgfortran/caf
diff options
context:
space:
mode:
authorThomas Schwinge <thomas@codesourcery.com>2015-03-11 22:42:56 +0100
committerThomas Schwinge <tschwinge@gcc.gnu.org>2015-03-11 22:42:56 +0100
commit17abb5ac387fe5ea785517522cab95f035b3a7d5 (patch)
tree5b9ba83715b19f39ebd97c0e0334d1d64d489255 /libgfortran/caf
parentd94fae044da071381b73a2ee8afa874b14fa3820 (diff)
libgfortran LIBGFOR_MINIMAL enhancements.
Based on GCC trunk r220892, for nvptx-none: === gfortran Summary === # of expected passes [-31320-]{+32117+} # of unexpected failures [-7222-]{+6821+} # of expected failures 78 # of unresolved testcases [-6441-]{+6158+} # of untested testcases [-432-]{+391+} # of unsupported tests 639 libgfortran/ * caf/single.c (caf_runtime_error): Revert 2014-11-28 changes. * runtime/minimal.c (STRERR_MAXSZ): Don't define. (runtime_error_at, sys_abort): Bring more in line with the non-LIBGFOR_MINIMAL code. (runtime_warning_at, internal_error): New functions. From-SVN: r221363
Diffstat (limited to 'libgfortran/caf')
-rw-r--r--libgfortran/caf/single.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libgfortran/caf/single.c b/libgfortran/caf/single.c
index daef281ef2e..6c582860ebf 100644
--- a/libgfortran/caf/single.c
+++ b/libgfortran/caf/single.c
@@ -48,14 +48,13 @@ caf_static_t *caf_static_list = NULL;
static void
caf_runtime_error (const char *message, ...)
{
-#ifndef LIBGFOR_MINIMAL
va_list ap;
fprintf (stderr, "Fortran runtime error: ");
va_start (ap, message);
vfprintf (stderr, message, ap);
va_end (ap);
fprintf (stderr, "\n");
-#endif
+
/* FIXME: Shutdown the Fortran RTL to flush the buffer. PR 43849. */
exit (EXIT_FAILURE);
}