Commit ade2e403 by Tobias Burnus

lang.opt (fdump-core): Re-add as ignored option for backward compatibility.

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.

From-SVN: r173760
parent 858afbce
2011-05-14 Tobias Burnus <burnus@net-b.de>
* lang.opt (fdump-core): Re-add as ignored option
for backward compatibility.
2011-05-14 Janne Blomqvist <jb@gcc.gnu.org> 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/48915 PR libfortran/48915
......
...@@ -366,6 +366,10 @@ fdollar-ok ...@@ -366,6 +366,10 @@ fdollar-ok
Fortran Fortran
Allow dollar signs in entity names Allow dollar signs in entity names
fdump-core
Fortran Ignore
Does nothing. Preserved for backward compatibility.
fdump-fortran-original fdump-fortran-original
Fortran Fortran
Display the code tree after parsing Display the code tree after parsing
......
2011-05-14 Tobias Burnus <burnus@net-b.de>
* runtime/stop.c (error_stop_string, error_stop_numeric):
Do not backtrace for ERROR STOP.
2011-05-14 Janne Blomqvist <jb@gcc.gnu.org> 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/48915 PR libfortran/48915
......
...@@ -92,7 +92,7 @@ error_stop_string (const char *string, GFC_INTEGER_4 len) ...@@ -92,7 +92,7 @@ error_stop_string (const char *string, GFC_INTEGER_4 len)
(void) sizeof (w); /* Avoid compiler warning about not using w. */ (void) sizeof (w); /* Avoid compiler warning about not using w. */
estr_write ("\n"); estr_write ("\n");
sys_abort (); exit (1);
} }
...@@ -106,8 +106,5 @@ void ...@@ -106,8 +106,5 @@ void
error_stop_numeric (GFC_INTEGER_4 code) error_stop_numeric (GFC_INTEGER_4 code)
{ {
st_printf ("ERROR STOP %d\n", (int) code); st_printf ("ERROR STOP %d\n", (int) code);
if (options.backtrace == 1
|| (options.backtrace == -1 && compile_options.backtrace == 1))
show_backtrace ();
exit (code); exit (code);
} }
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment