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: [gfortran] Add -std=


On Monday 05 January 2004 1:53 am, Feng Wang wrote:
> > +	gfc_notify_std (GFC_STD_F95_DEL,
> > +			"Obsolete: GOTO at %L jumps to END of construct at %L",
> > +			&found->loc, &code->loc);
>
>   I think &found->loc and &code->loc are backwards. The order of them
> should be interchanged.

Correct, Fixed.

Paul

2004-01-10  Paul Brook  <paul@codesourcery.com>

	* resolve.c (resolve_branch): Get error message right way round.

Index: resolve.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/Attic/resolve.c,v
retrieving revision 1.1.2.15
diff -u -p -r1.1.2.15 resolve.c
--- resolve.c	4 Jan 2004 12:59:49 -0000	1.1.2.15
+++ resolve.c	10 Jan 2004 15:45:59 -0000
@@ -2941,7 +2941,7 @@ resolve_branch (gfc_st_label * label, gf
       if (stack == NULL)
 	gfc_notify_std (GFC_STD_F95_DEL,
 			"Obsolete: GOTO at %L jumps to END of construct at %L",
-			&found->loc, &code->loc);
+			&code->loc, &found->loc);
     }
 }
 


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