From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 71728 invoked by alias); 13 Sep 2017 21:19:31 -0000 Mailing-List: contact fortran-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Post: List-Help: , Sender: fortran-owner@gcc.gnu.org Received: (qmail 71712 invoked by uid 89); 13 Sep 2017 21:19:30 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-5.9 required=5.0 tests=AWL,BAYES_00,FREEMAIL_FROM,GIT_PATCH_2,RCVD_IN_DNSWL_NONE,RCVD_IN_SORBS_SPAM,SPF_PASS autolearn=ham version=3.3.2 spammy=mysterious X-HELO: mail-yw0-f181.google.com Received: from mail-yw0-f181.google.com (HELO mail-yw0-f181.google.com) (209.85.161.181) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Wed, 13 Sep 2017 21:19:28 +0000 Received: by mail-yw0-f181.google.com with SMTP id q80so3354930ywg.2 for ; Wed, 13 Sep 2017 14:19:28 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=6gVJv+M5oLXlzAai6J7SP8mvQsKuPUtVQnuxLrH85Jo=; b=MOVh0Suu9+h5SR6VU+9Jk8Qaj7PQouVC6LnKAtLi3LJSNK2orTmytvq3dT05opNhY2 ZlEHs68JnLmCzGZVNV1ykGbThZOyLQ+Pgv8VT0+r8eqn2+8HZ4IF8nfH3ZypxonlNCLg WxLt9RSHLU5FS5/7Hio0csZpyA5I0+u6FSloJHScUFNf9uGFRtN3RrGkOHcdfi9hO4GJ tdNGODsKx52rKA80cRsaDCzP7KvsaPsrU+0MNX6gimhNP3u63PDTw/40DB8txOHtBgdf euZ0pPQBS4zy1NpThifSBdz4bNsNrK6WDFnm/Oqp8GRJCVGT+OyxjHrqv3cAJTVV0nWS vyyg== X-Gm-Message-State: AHPjjUjUJuYMfp74i0sf3/n11KpRB0DbXROh+kJuVGZt+04NvyTKjOLw 6DfjVc2Ty7T9arbxxtFlvbe/viqgXnrYbyG0C5w= X-Google-Smtp-Source: AOwi7QBZtt44cqre6PE3cf2vnRgS2TjUFsKfwF/f7t1phUsrIBLX5HNOk6y+5IQ0Sb4XiimDHYISY1g53VA/DGksiOo= X-Received: by 10.37.36.3 with SMTP id k3mr2311557ybk.263.1505337566986; Wed, 13 Sep 2017 14:19:26 -0700 (PDT) MIME-Version: 1.0 Received: by 10.129.145.147 with HTTP; Wed, 13 Sep 2017 14:19:26 -0700 (PDT) From: Paul Richard Thomas Date: Wed, 13 Sep 2017 21:19:00 -0000 Message-ID: Subject: [Patch, fortran] PR82173 [meta-bug] Parameterized derived type errors To: "fortran@gcc.gnu.org" Content-Type: text/plain; charset="UTF-8" X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00043.txt.bz2 Committed as 'obvious'. Thanks to fortranFan on clf. It fixes a rather mysterious fault that I already knew about - intrinsics in the paraneter expressions were not being accepted. I forgot to resolve the expressions. Paul https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82173 --- Comment #3 from Paul Thomas --- Author: pault Date: Wed Sep 13 21:15:26 2017 New Revision: 252734 URL: https://gcc.gnu.org/viewcvs?rev=252734&root=gcc&view=rev Log: 2017-09-13 Paul Thomas PR fortran/82173 * decl.c (match_char_kind): If the kind expression is parameterized, save it in saved_kind_expr and set kind = 0. (gfc_get_pdt_instance): Resolve and simplify before emitting error on expression kind. Insert a missing simplification after insertion of kind expressions. 2017-09-13 Paul Thomas PR fortran/82173 * gfortran.dg/pdt_10.f03 : New test. Added: trunk/gcc/testsuite/gfortran.dg/pdt_10.f03 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/decl.c trunk/gcc/testsuite/ChangeLog