summaryrefslogtreecommitdiff
path: root/libgfortran/runtime
diff options
context:
space:
mode:
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>2011-05-14 16:02:07 +0000
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>2011-05-14 16:02:07 +0000
commit99d7b5ba9d5c2595a49124a332b373f3dfcb8052 (patch)
tree51bc0cc0a9f5d12f4fca028b7b7323b517303bec /libgfortran/runtime
parenteadb320e3871b431db87ac27fb6b153dc5fc342d (diff)
downloadgcc-99d7b5ba9d5c2595a49124a332b373f3dfcb8052.tar.gz
2011-05-14 Tobias Burnus <burnus@net-b.de>
* lang.opt (fdump-core): Re-add as ignored option for backward compatibility. 2011-05-14 Tobias Burnus <burnus@net-b.de> * runtime/stop.c (error_stop_string, error_stop_numeric): Do not backtrace for ERROR STOP. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@173760 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/runtime')
-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);
}