mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-01-10 20:25:47 +08:00
* options.c (gfc_init_options): Zero flag_errno_math.
From-SVN: r94447
This commit is contained in:
parent
237f420bfe
commit
61e067ccd8
@ -1,3 +1,7 @@
|
||||
2006-01-30 Richard Henderson <rth@redhat.com>
|
||||
|
||||
* options.c (gfc_init_options): Zero flag_errno_math.
|
||||
|
||||
2005-01-29 Paul Brook <paul@codesourcery.com>
|
||||
|
||||
PR fortran/18565
|
||||
|
@ -42,7 +42,6 @@ unsigned int
|
||||
gfc_init_options (unsigned int argc ATTRIBUTE_UNUSED,
|
||||
const char **argv ATTRIBUTE_UNUSED)
|
||||
{
|
||||
|
||||
gfc_option.source = NULL;
|
||||
gfc_option.module_dir = NULL;
|
||||
gfc_option.source_form = FORM_UNKNOWN;
|
||||
@ -74,6 +73,7 @@ gfc_init_options (unsigned int argc ATTRIBUTE_UNUSED,
|
||||
gfc_option.d8 = 0;
|
||||
|
||||
flag_argument_noalias = 2;
|
||||
flag_errno_math = 0;
|
||||
|
||||
gfc_option.allow_std = GFC_STD_F95_OBS | GFC_STD_F95_DEL
|
||||
| GFC_STD_F2003 | GFC_STD_F95 | GFC_STD_F77 | GFC_STD_GNU;
|
||||
|
Loading…
Reference in New Issue
Block a user