This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: gfortran and equivalence produces internal compiler error
Hi Steve,
Your patch fixes the problem. As far as I am concerned, with the
testcase added, it's good for trunk and as far back as you want to go.
Thanks a lot
Paul
On 31 August 2016 at 21:07, Steve Kargl
<sgk@troutmask.apl.washington.edu> wrote:
> On Wed, Aug 31, 2016 at 03:20:25PM +0200, Rolf Sander wrote:
>> Hello Dominique,
>>
>> >> https://bugs.launchpad.net/bugs/1618799
>>
>> >> Is this the right place?
>>
>> > No, this is gfortran regression not an Ubuntu bug.
>> > You need to file the report at
>> > https://gcc.gnu.org/bugzilla/
>>
>> Thanks for the link! I have now posted a bug report here:
>>
>> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77420
>>
>
> Index: module.c
> ===================================================================
> --- module.c (revision 239833)
> +++ module.c (working copy)
> @@ -4647,7 +4647,7 @@ load_equiv (void)
> }
>
> /* Check for duplicate equivalences being loaded from different modules */
> - duplicate = false;
> + duplicate = gfc_current_ns->equiv ? false:true;
> for (equiv = gfc_current_ns->equiv; equiv; equiv = equiv->next)
> {
> if (equiv->module && head->module
>
>
>
> --
> Steve
--
The difference between genius and stupidity is; genius has its limits.
Albert Einstein