From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 10685 invoked by alias); 8 Oct 2018 13:14:19 -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 10661 invoked by uid 89); 8 Oct 2018 13:14:18 -0000 Authentication-Results: sourceware.org; auth=none X-Spam-SWARE-Status: No, score=-6.1 required=5.0 tests=AWL,BAYES_00,FREEMAIL_FROM,GIT_PATCH_2,KAM_ASCII_DIVIDERS,RCVD_IN_DNSWL_NONE,SPF_PASS autolearn=ham version=3.3.2 spammy=weil, Hx-languages-length:1826, thereby X-HELO: mail-yb1-f170.google.com Received: from mail-yb1-f170.google.com (HELO mail-yb1-f170.google.com) (209.85.219.170) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Mon, 08 Oct 2018 13:14:17 +0000 Received: by mail-yb1-f170.google.com with SMTP id w80-v6so8231678ybe.10; Mon, 08 Oct 2018 06:14:17 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=mime-version:from:date:message-id:subject:to; bh=RhP4v7hm3kSnZUub2DN7mAR+aAwXvtdfVJLO2/18+d8=; b=gIafPI9Kxau55B3iG7lPJ03CEn41WhxdI+uK75lWPn5TbbbAxbPKGbbmzWYzxEy6J4 y/vFD6JJchP1t6MOC5H7lLEGFMbUTfuPMLIu2ehJtrMi78kyA7CfY/MRdaj5O+loQJYN 1bH2XBB7VN90MdH4M0hvsrRm3QTCUEgCISC86XUzvm0tMP7GdrWfcHnVjHRBV1kdiDSK Dk/3rB1/I1zt7tywoc7npHjJ3h3upaKzes1FCqqLhE5+zDxr18aNnj/O0+xpmTobzWt2 RlI/FChUuyp9WYerVq4cGdgyxCpeWRbGKMZB5IguSjp6VwO3531Ej7rxNHhmadHneZvc HciA== MIME-Version: 1.0 From: Paul Richard Thomas Date: Mon, 08 Oct 2018 13:14:00 -0000 Message-ID: Subject: {Patch, fortran] PR86372 - [8/9 Regression] Segfault on ASSOCIATE statement with CHARACTER variable To: "fortran@gcc.gnu.org" , gcc-patches Content-Type: multipart/mixed; boundary="000000000000db26770577b765a2" X-IsSubscribed: yes X-SW-Source: 2018-10/txt/msg00035.txt.bz2 --000000000000db26770577b765a2 Content-Type: text/plain; charset="UTF-8" Content-length: 492 I have fixed this as 'obvious' on 8-branch(r264925) and trunk(r264915). Paul 2018-10-08 Paul Thomas Backport from trunk PR fortran/86372 * trans-stmt.c (trans_associate_var): Character associate names with variable string length do not have to be deferred length for the string length to be set, if variable. 2018-10-08 Paul Thomas Backport from trunk PR fortran/86372 * gfortran.dg/associate_41.f90: New test. --000000000000db26770577b765a2 Content-Type: text/x-patch; charset="US-ASCII"; name="submit.diff" Content-Disposition: attachment; filename="submit.diff" Content-Transfer-Encoding: base64 Content-ID: X-Attachment-Id: f_jn0bi8sy0 Content-length: 1826 SW5kZXg6IGdjYy9mb3J0cmFuL3RyYW5zLXN0bXQuYwo9PT09PT09PT09PT09 PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09 PT09PT09PT09CioqKiBnY2MvZm9ydHJhbi90cmFucy1zdG10LmMJKHJldmlz aW9uIDI2NDkxMikKLS0tIGdjYy9mb3J0cmFuL3RyYW5zLXN0bXQuYwkod29y a2luZyBjb3B5KQoqKioqKioqKioqKioqKiogdHJhbnNfYXNzb2NpYXRlX3Zh ciAoZ2ZjX3N5bWJvbCAqc3ltLCBnZgoqKiogMTg4NSwxODkxICoqKioKICAJ fQogIAogICAgICAgIGlmIChzeW0tPnRzLnR5cGUgPT0gQlRfQ0hBUkFDVEVS Ci0gCSAgJiYgc3ltLT50cy5kZWZlcnJlZAogIAkgICYmICFzeW0tPmF0dHIu c2VsZWN0X3R5cGVfdGVtcG9yYXJ5CiAgCSAgJiYgVkFSX1AgKHN5bS0+dHMu dS5jbC0+YmFja2VuZF9kZWNsKQogIAkgICYmIHNlLnN0cmluZ19sZW5ndGgg IT0gc3ltLT50cy51LmNsLT5iYWNrZW5kX2RlY2wpCi0tLSAxODg1LDE4OTAg LS0tLQpJbmRleDogZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9hc3NvY2lh dGVfNDEuZjkwCj09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09 PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT0KKioqIGdjYy90ZXN0 c3VpdGUvZ2ZvcnRyYW4uZGcvYXNzb2NpYXRlXzQxLmY5MAkobm9uZXhpc3Rl bnQpCi0tLSBnY2MvdGVzdHN1aXRlL2dmb3J0cmFuLmRnL2Fzc29jaWF0ZV80 MS5mOTAJKHdvcmtpbmcgY29weSkKKioqKioqKioqKioqKioqCioqKiAwICoq KioKLS0tIDEsMjUgLS0tLQorICEgeyBkZy1kbyBydW4gfQorICEKKyAhIFRl c3QgdGhlIGZpeCBmb3IgUFI4NjM3MiBpbiB3aGljaCB0aGUgYXNzb2NpYXRl IG5hbWUgc3RyaW5nIGxlbmd0aCB3YXMKKyAhIG5vdCBiZWluZyBzZXQsIHRo ZXJlYnkgY2F1c2luZyBhIHNlZ2ZhdWx0LgorICEKKyAhIENvbnRyaWJ1dGVk IGJ5IEphbnVzIFdlaWwgIDxqYW51c0BnY2MuZ251Lm9yZz4KKyAhCisgcHJv Z3JhbSB4eHgKKyAKKyAgICBjaGFyYWN0ZXIobGVuPTUwKSA6OiBzCisgCisg ICAgcyA9IHJlcGVhdCAoJyonLCBsZW4ocykpCisgICAgY2FsbCBzdWIocykK KyAgICBpZiAocyAubmUuICcqKicvLycxMjMnLy9yZXBlYXQgKCcqJywgbGVu KHMpIC0gNSkpIHN0b3AgMQorIAorIGNvbnRhaW5zCisgCisgICAgc3Vicm91 dGluZSBzdWIoc3RyKQorICAgICAgIGNoYXJhY3RlcihsZW49KiksIGludGVu dChpbm91dCkgOjogc3RyCisgICAgICAgYXNzb2NpYXRlIChzdWJzdHIgPT4g c3RyKDM6NSkpCisgICAgICAgICAgc3Vic3RyID0gJzEyMycKKyAgICAgICBl bmQgYXNzb2NpYXRlCisgICAgZW5kIHN1YnJvdXRpbmUKKyAKKyBlbmQK --000000000000db26770577b765a2--