Commit 5fb41e29 by Tobias Burnus Committed by Tobias Burnus

options.c (set_default_std_flags,gfc_init_options): Add comment: keep in sync with libgfortran.

2008-09-24  Tobias Burnus  <burnus@net-b.de>

        * options.c (set_default_std_flags,gfc_init_options):
        Add comment: keep in sync with libgfortran.

2008-09-24  Tobias Burnus  <burnus@net-b.de>

        * runtime/compile_options.c (init_compile_options):
        Sync flags with front end.

From-SVN: r140625
parent a9b98c2c
2008-09-24 Tobias Burnus <burnus@net-b.de> 2008-09-24 Tobias Burnus <burnus@net-b.de>
* options.c (set_default_std_flags,gfc_init_options):
Add comment: keep in sync with libgfortran.
2008-09-24 Tobias Burnus <burnus@net-b.de>
PR fortran/37626 PR fortran/37626
* trans-array.c (gfc_trans_deferred_array): Don't auto-deallocate * trans-array.c (gfc_trans_deferred_array): Don't auto-deallocate
result variables. result variables.
......
...@@ -37,7 +37,8 @@ gfc_option_t gfc_option; ...@@ -37,7 +37,8 @@ gfc_option_t gfc_option;
/* Set flags that control warnings and errors for different /* Set flags that control warnings and errors for different
Fortran standards to their default values. */ Fortran standards to their default values. Keep in sync with
libgfortran/runtime/compile_options.c (init_compile_options). */
static void static void
set_default_std_flags (void) set_default_std_flags (void)
...@@ -48,7 +49,9 @@ set_default_std_flags (void) ...@@ -48,7 +49,9 @@ set_default_std_flags (void)
gfc_option.warn_std = GFC_STD_F95_DEL | GFC_STD_LEGACY; gfc_option.warn_std = GFC_STD_F95_DEL | GFC_STD_LEGACY;
} }
/* Get ready for options handling. */
/* Get ready for options handling. Keep in sync with
libgfortran/runtime/compile_options.c (init_compile_options). */
unsigned int unsigned int
gfc_init_options (unsigned int argc, const char **argv) gfc_init_options (unsigned int argc, const char **argv)
......
2008-09-24 Tobias Burnus <burnus@net-b.de>
* runtime/compile_options.c (init_compile_options):
Sync flags with front end.
2008-09-22 Jerry DeLisle <jvdelisle@gcc.gnu.org 2008-09-22 Jerry DeLisle <jvdelisle@gcc.gnu.org
PR libfortran/37498 PR libfortran/37498
......
...@@ -140,10 +140,10 @@ set_options (int num, int options[]) ...@@ -140,10 +140,10 @@ set_options (int num, int options[])
void void
init_compile_options (void) init_compile_options (void)
{ {
compile_options.warn_std = GFC_STD_F95_OBS | GFC_STD_F95_DEL compile_options.warn_std = GFC_STD_F95_DEL | GFC_STD_LEGACY;
| GFC_STD_F2003 | GFC_STD_LEGACY;
compile_options.allow_std = GFC_STD_F95_OBS | GFC_STD_F95_DEL compile_options.allow_std = GFC_STD_F95_OBS | GFC_STD_F95_DEL
| GFC_STD_F2003 | GFC_STD_F95 | GFC_STD_F77 | GFC_STD_GNU | GFC_STD_LEGACY; | GFC_STD_F2003 | GFC_STD_F2008 | GFC_STD_F95 | GFC_STD_F77
| GFC_STD_GNU | GFC_STD_LEGACY;
compile_options.pedantic = 0; compile_options.pedantic = 0;
compile_options.dump_core = 0; compile_options.dump_core = 0;
compile_options.backtrace = 0; compile_options.backtrace = 0;
......
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