This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran 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]

Re: [fortran] Disable use of -malign-double


On Tue, Jan 30, 2007 at 11:17:23PM -0800, Andrew Pinski wrote:
> On Tue, 2007-01-30 at 23:11 -0800, Steve Kargl wrote:
> > The patch is self explanatory.
> > 
> > 2007-01-31  Steven G. Kargl  <kargl@gcc.gnu.org>
> > 
> > 	* options.c (gfc_post_options): Abort if -malign-double
> > 
> > 
> > 
> > Index: options.c
> > ===================================================================
> > --- options.c	(revision 121271)
> > +++ options.c	(working copy)
> > @@ -294,6 +294,9 @@ gfc_post_options (const char **pfilename
> >    if (gfc_option.flag_all_intrinsics)
> >      gfc_option.warn_nonstd_intrinsics = 0;
> >  
> > +  if (TARGET_ALIGN_DOUBLE)
> > +    fatal_error ("-malign-double is incompatible with libgfortran");
> 
> This will not work.  As TARGET_ALIGN_DOUBLE is only defined for the x86
> backend.  Also it could default for some x86 targets.
> 

How about this patch?

Index: lang.opt
===================================================================
--- lang.opt	(revision 121352)
+++ lang.opt	(working copy)
@@ -249,6 +249,10 @@ funderscoring
 Fortran
 Append underscores to externally visible names
 
+malign-double
+Fortran
+Trap uses of this option due to conflicts with libgfortran
+
 std=f2003
 Fortran
 Conform to the ISO Fortran 2003 standard
Index: options.c
===================================================================
--- options.c	(revision 121352)
+++ options.c	(working copy)
@@ -673,6 +677,9 @@ gfc_handle_option (size_t scode, const c
 			 MAX_SUBRECORD_LENGTH);
 
       gfc_option.max_subrecord_length = value;
+
+    case OPT_malign_double:
+      fatal_error ("-malign-double is incompatible with libgfortran");
     }
 
   return result;
-- 
Steve


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