From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <dhumieres.dominique@free.fr>
Received: from smtp3-g21.free.fr (smtp3-g21.free.fr [IPv6:2a01:e0c:1:1599::12])
 by sourceware.org (Postfix) with ESMTPS id 781D0384403C
 for <fortran@gcc.gnu.org>; Fri,  7 Aug 2020 12:21:12 +0000 (GMT)
DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org 781D0384403C
Authentication-Results: sourceware.org;
 dmarc=none (p=none dis=none) header.from=free.fr
Authentication-Results: sourceware.org;
 spf=none smtp.mailfrom=dhumieres.dominique@free.fr
Received: from webmail.free.fr (unknown [172.20.243.6])
 by smtp3-g21.free.fr (Postfix) with ESMTP id 5D54A13F838;
 Fri,  7 Aug 2020 14:21:11 +0200 (CEST)
Received: from 2a01:e0a:8a:4180:7c1c:48db:b16a:5f5
	by webmail.free.fr
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8;
 format=flowed
Content-Transfer-Encoding: 8bit
Date: Fri, 07 Aug 2020 14:21:11 +0200
From: dhumieres.dominique@free.fr
To: paul.richard.thomas@gmail.com, fortran@gcc.gnu.org
Subject: Re: [Patch, fortran] PR96102 - ICE in check_host_association, at
 fortran/resolve.c:5994
In-Reply-To: <db4641ce02fda40ec2ba8677634460f5@free.fr>
References: <db4641ce02fda40ec2ba8677634460f5@free.fr>
Message-ID: <b2d4b87027e0afef8e1e4f5b80fb81f0@free.fr>
X-Sender: dhumieres.dominique@free.fr
User-Agent: Webmail Free/1.3.3
X-Spam-Status: No, score=2.1 required=5.0 tests=BAYES_00, FREEMAIL_FROM,
 KAM_DMARC_STATUS, KAM_LAZY_DOMAIN_SECURITY, KAM_NUMSUBJECT, SPF_HELO_NONE,
 SPF_NONE, TXREP,
 UNPARSEABLE_RELAY autolearn=no autolearn_force=no version=3.4.2
X-Spam-Level: **
X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on
 server2.sourceware.org
X-BeenThere: fortran@gcc.gnu.org
X-Mailman-Version: 2.1.29
Precedence: list
List-Id: Fortran mailing list <fortran.gcc.gnu.org>
List-Unsubscribe: <https://gcc.gnu.org/mailman/options/fortran>,
 <mailto:fortran-request@gcc.gnu.org?subject=unsubscribe>
List-Archive: <https://gcc.gnu.org/pipermail/fortran/>
List-Help: <mailto:fortran-request@gcc.gnu.org?subject=help>
List-Subscribe: <https://gcc.gnu.org/mailman/listinfo/fortran>,
 <mailto:fortran-request@gcc.gnu.org?subject=subscribe>
X-List-Received-Date: Fri, 07 Aug 2020 12:21:13 -0000

Le 2020-08-05 21:12, dhumieres.dominique@free.fr a écrit :
> Hi Paul,
> 
> Are you sure the errors are
> 
>    type(mytype) :: d = mytype (42) ! { dg-error "is host associated" }
>    integer :: n = 2                ! { dg-error "is host associated" }
> 
> I get
> 
> /opt/gcc/work/gcc/testsuite/gfortran.dg/pr96102.f90:20:24:
> 
>    20 |       integer function n()
>       |                        1
> Error: 'n' at (1) is being host associated into a contained procedure
> with an internal procedure of the same name
> /opt/gcc/work/gcc/testsuite/gfortran.dg/pr96102.f90:23:29:
> 
>    23 |       type(mytype) function d()
>       |                             1
> Error: 'd' at (1) is being host associated into a contained procedure
> with an internal procedure of the same name
> 
> Cheers,
> 
> Dominique

The patch now matches the test case.

Thanks,

Dominique