summaryrefslogtreecommitdiff
path: root/libgfortran/runtime/stop.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/runtime/stop.c')
-rw-r--r--libgfortran/runtime/stop.c5
1 files changed, 1 insertions, 4 deletions
diff --git a/libgfortran/runtime/stop.c b/libgfortran/runtime/stop.c
index 2efe23924e7..4c3a0f99c89 100644
--- a/libgfortran/runtime/stop.c
+++ b/libgfortran/runtime/stop.c
@@ -92,7 +92,7 @@ error_stop_string (const char *string, GFC_INTEGER_4 len)
(void) sizeof (w); /* Avoid compiler warning about not using w. */
estr_write ("\n");
- sys_abort ();
+ exit (1);
}
@@ -106,8 +106,5 @@ void
error_stop_numeric (GFC_INTEGER_4 code)
{
st_printf ("ERROR STOP %d\n", (int) code);
- if (options.backtrace == 1
- || (options.backtrace == -1 && compile_options.backtrace == 1))
- show_backtrace ();
exit (code);
}