This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[gfortran] don't worry about errno


Something that got lost between g77 and gfortran.


r~


        * options.c (gfc_init_options): Zero flag_errno_math.

Index: options.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/options.c,v
retrieving revision 1.16
diff -u -p -d -r1.16 options.c
--- options.c	18 Jan 2005 12:11:53 -0000	1.16
+++ options.c	30 Jan 2005 18:33:18 -0000
@@ -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 ATTR
   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;


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]