From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <fortran-return-50906-listarch-fortran=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 108043 invoked by alias); 31 Aug 2018 13:32:59 -0000
Mailing-List: contact fortran-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Id: <fortran.gcc.gnu.org>
List-Subscribe: <mailto:fortran-subscribe@gcc.gnu.org>
List-Post: <mailto:fortran@gcc.gnu.org>
List-Help: <mailto:fortran-help@gcc.gnu.org>, <http://sourceware.org/lists.html#faqs>
Sender: fortran-owner@gcc.gnu.org
Received: (qmail 108034 invoked by uid 89); 31 Aug 2018 13:32:58 -0000
Authentication-Results: sourceware.org; auth=none
X-Spam-SWARE-Status: No, score=1.1 required=5.0 tests=BAYES_50,FREEMAIL_ENVFROM_END_DIGIT,FREEMAIL_FROM,SPF_PASS autolearn=no version=3.3.2 spammy=Starting, Janus, iso_c_binding, H*f:sk:54601FB
X-HELO: mail-yb1-f174.google.com
Received: from mail-yb1-f174.google.com (HELO mail-yb1-f174.google.com) (209.85.219.174) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 31 Aug 2018 13:32:57 +0000
Received: by mail-yb1-f174.google.com with SMTP id z12-v6so859271ybg.9        for <fortran@gcc.gnu.org>; Fri, 31 Aug 2018 06:32:57 -0700 (PDT)
MIME-Version: 1.0
References: <54601FBE-6F7E-4075-8F11-E9D894177AE0@lps.ens.fr>
In-Reply-To: <54601FBE-6F7E-4075-8F11-E9D894177AE0@lps.ens.fr>
From: Janus Weil <janus@gcc.gnu.org>
Date: Fri, 31 Aug 2018 13:32:00 -0000
Message-ID: <CAKwh3qjspMg6CG6AsGX4TbzZ6YJoWLfz0zFOzPcMjiB=JJWvmw@mail.gmail.com>
Subject: Re: [Patch, Fortran, F08] PR 86888: allocatable components of indirectly recursive type
To: Dominique Dhumieres <dominiq@lps.ens.fr>
Cc: gfortran <fortran@gcc.gnu.org>
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-IsSubscribed: yes
X-SW-Source: 2018-08/txt/msg00118.txt.bz2

Hi Dominique,

> > Thanks, Paul. Committed as r263782.
>
> Up to revision r263781, gfortran compiles the following test (pr71764 com=
ment 3)
>
> module sqlite3_primitive
>    use iso_c_binding, only: c_funptr
> end module sqlite3_primitive
>
> module fsqlite_runtime
>
>   use sqlite3_primitive
>
>   use, intrinsic :: iso_c_binding, only : c_null_funptr, c_funptr
>
>   implicit none
>
>    contains
>
>       subroutine fsqlite_exec
>          type(c_funptr) to_cb
>          to_cb =3D c_null_funptr
>       end subroutine
>
> end module
>
> Starting at r263782, I get the error
>
> pr71764_1.f90:7:6:
>
> 7 |   use sqlite3_primitive
>   |      1
> Error: Derived type 'c_funptr' at (1) has not been declared
>
> Is this expected? If no, I=E2=80=99ll file a new PR.

this is certainly not expected. Please file a new PR and assign it to
me. Thanks for reporting!

Cheers,
Janus