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: [patch, fortran] fixes for functions


> 2007-07-09  Daniel Franke  <franke.daniel@gmail.com>
>
>	* decl.c (gfc_match_suffix): Removed surplus general error that hides
>	a more specific message.
>	* resolve.c (resolve_fl_variable): Reject illegal initializiers only
>	if not already done.
>	(resolve_fl_procedure): Added check for initializers of functions.
>
> Regression tested on i686-pc-linux-gnu. Ok for trunk?

This patch fails for me when used with statement functions:

      Z2(x) = x*(Alft-x)/Vg - x*(x-Alfb)/Vf
       1
Error: Function 'z2' at (1) cannot have an inital value

Actually, I also get tons of errors from the test suite for the same reason.

Additionally, I think this patch solves part of PR31639 (the later
examples, not the initially reported problem); I think one should cite the
PR number in the changelog.
Tobias



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