This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/31099] [4.3/4.2 regression] Runtime error on legal code using RECL
- From: "Thomas dot Koenig at online dot de" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 9 Mar 2007 20:13:26 -0000
- Subject: [Bug libfortran/31099] [4.3/4.2 regression] Runtime error on legal code using RECL
- References: <bug-31099-10259@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #5 from Thomas dot Koenig at online dot de 2007-03-09 20:13 -------
Subject: Re: [4.3/4.2 regression] Runtime error on legal code using RECL
> I believe I have a fix. I am testing now. We were not initializing a few
> things when we have a record length given.
>
> Index: io/open.c
> ===================================================================
> --- io/open.c (revision 122529)
> +++ io/open.c (working copy)
> @@ -437,6 +437,8 @@ new_unit (st_parameter_open *opp, gfc_un
> {
> u->flags.has_recl = 1;
> u->recl = opp->recl_in;
> + u->recl_subrecord = u->recl;
> + u->bytes_left = u->recl;
> }
> else
> {
This looks good.
Thanks, Jerry, for picking up on this so fast.
I had been sort of wondering wether I had introduced any regressions
with my subrecord patch.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31099