From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 119317 invoked by alias); 29 Sep 2016 14:30:30 -0000 Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Received: (qmail 119294 invoked by uid 89); 29 Sep 2016 14:30:29 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=0.3 required=5.0 tests=AWL,BAYES_40,FREEMAIL_FROM,RCVD_IN_DNSWL_NONE,RCVD_IN_SORBS_SPAM,SPF_PASS autolearn=no version=3.3.2 spammy=UD:attr.flavor, attr.flavor, UD:flavor, attrflavor X-Spam-User: qpsmtpd, 2 recipients X-HELO: mail-oi0-f51.google.com Received: from mail-oi0-f51.google.com (HELO mail-oi0-f51.google.com) (209.85.218.51) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Thu, 29 Sep 2016 14:30:16 +0000 Received: by mail-oi0-f51.google.com with SMTP id t83so93319292oie.3; Thu, 29 Sep 2016 07:30:16 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=f3HvaveWZisxlQXBg8ZDobSpWGjAMyGFltV5oQg4blU=; b=PR9c4jxw2yx8frFW5bi2lUl6aZzbmD/JItsp0nqhvoyjTOvkaJqWE2ewgdYz9ySAcK JiAbhVckJDg3AvA7DQ/3cB60UM0dHB1wJb8hiabe/NkP0bPwbPFOWTlVez8s+h2vHjwJ EPciuUQ28XS+Gxo3lwEwgbX+MMm1HWaFOqGIi8NehJij71p9J14HNx/A9GB4CbnqDnSa Bwn2BrrMWEkFQyP07V3g2ZAw/2H6M27H5Q5wM0itnTo7J1w1p2vasgJ6hiSmwujG5560 jqFjzr0yO1sasKJNn47RcAA62/kYgj8rqflJQ1s3tqMnyYN3qQCWkSXQZU/MF14dT7Et BizQ== X-Gm-Message-State: AA6/9RnKGbRefM8I9YgKme5csEljJyFtVVBCSa3FKjirf6HysvsavBFTj+tqzzSa0DzU9HpJlFhsmmb1IuTbLA== X-Received: by 10.157.33.121 with SMTP id l54mr1174651otd.203.1475159414073; Thu, 29 Sep 2016 07:30:14 -0700 (PDT) MIME-Version: 1.0 Received: by 10.182.80.166 with HTTP; Thu, 29 Sep 2016 07:30:13 -0700 (PDT) From: Fritz Reese Date: Thu, 29 Sep 2016 14:45:00 -0000 Message-ID: Subject: [PATCH, Fortran] PR fortran/77764 - ICE in is_anonymous_component To: gcc-patches , fortran Content-Type: multipart/mixed; boundary=001a11371fbcdd38e4053da650df X-SW-Source: 2016-09/txt/msg02253.txt.bz2 --001a11371fbcdd38e4053da650df Content-Type: text/plain; charset=UTF-8 Content-length: 537 ICE in [1] is due to failure to null-guard map components in gfc_compare_union_types. Attached is [obvious] fix - will commit soon without complaints. --- Fritz Reese [1] https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77764 2016-09-29 Fritz Reese Fix ICE for maps with zero components. PR fortran/77764 * gcc/fortran/interface.c (gfc_compare_union_types): Null-guard map components. PR fortran/77764 * gcc/testsuite/gfortran.dg/dec_union_8.f90: New testcase. --001a11371fbcdd38e4053da650df Content-Type: text/x-patch; charset=US-ASCII; name="pr77764.patch" Content-Disposition: attachment; filename="pr77764.patch" Content-Transfer-Encoding: base64 X-Attachment-Id: f_itoft0tm0 Content-length: 2680 ZGlmZiAtLWdpdCBhL2djYy9mb3J0cmFuL2ludGVyZmFjZS5jIGIvZ2NjL2Zv cnRyYW4vaW50ZXJmYWNlLmMKaW5kZXggOWQ0ZTVlOS4uNTU5MjNhMyAxMDA2 NDQKLS0tIGEvZ2NjL2ZvcnRyYW4vaW50ZXJmYWNlLmMKKysrIGIvZ2NjL2Zv cnRyYW4vaW50ZXJmYWNlLmMKQEAgLTUyNiw2ICs1MjYsNyBAQCBpbnQKIGdm Y19jb21wYXJlX3VuaW9uX3R5cGVzIChnZmNfc3ltYm9sICp1bjEsIGdmY19z eW1ib2wgKnVuMikKIHsKICAgZ2ZjX2NvbXBvbmVudCAqbWFwMSwgKm1hcDIs ICpjbXAxLCAqY21wMjsKKyAgZ2ZjX3N5bWJvbCAqbWFwMV90LCAqbWFwMl90 OwogCiAgIGlmICh1bjEtPmF0dHIuZmxhdm9yICE9IEZMX1VOSU9OIHx8IHVu Mi0+YXR0ci5mbGF2b3IgIT0gRkxfVU5JT04pCiAgICAgcmV0dXJuIDA7CkBA IC01NDEsMTYgKzU0MiwyNiBAQCBnZmNfY29tcGFyZV91bmlvbl90eXBlcyAo Z2ZjX3N5bWJvbCAqdW4xLCBnZmNfc3ltYm9sICp1bjIpCiAgICAgIHdlIGNv bXBhcmUgdGhlIG1hcHMgc2VxdWVudGlhbGx5LiAqLwogICBmb3IgKDs7KQog ICB7Ci0gICAgY21wMSA9IG1hcDEtPnRzLnUuZGVyaXZlZC0+Y29tcG9uZW50 czsKLSAgICBjbXAyID0gbWFwMi0+dHMudS5kZXJpdmVkLT5jb21wb25lbnRz OworICAgIG1hcDFfdCA9IG1hcDEtPnRzLnUuZGVyaXZlZDsKKyAgICBtYXAy X3QgPSBtYXAyLT50cy51LmRlcml2ZWQ7CisKKyAgICBjbXAxID0gbWFwMV90 LT5jb21wb25lbnRzOworICAgIGNtcDIgPSBtYXAyX3QtPmNvbXBvbmVudHM7 CisKKyAgICAvKiBQcm90ZWN0IGFnYWluc3QgbnVsbCBjb21wb25lbnRzLiAg Ki8KKyAgICBpZiAobWFwMV90LT5hdHRyLnplcm9fY29tcCAhPSBtYXAyX3Qt PmF0dHIuemVyb19jb21wKQorICAgICAgcmV0dXJuIDA7CisKKyAgICBpZiAo bWFwMV90LT5hdHRyLnplcm9fY29tcCkKKyAgICAgIHJldHVybiAxOworCiAg ICAgZm9yICg7OykKICAgICB7CiAgICAgICAvKiBObyB0d28gZmllbGRzIHdp bGwgZXZlciBwb2ludCB0byB0aGUgc2FtZSBtYXAgdHlwZSB1bmxlc3MgdGhl eSBhcmUKICAgICAgICAgIHRoZSBzYW1lIGNvbXBvbmVudCwgYmVjYXVzZSBv bmUgbWFwIGZpZWxkIGlzIGNyZWF0ZWQgd2l0aCBpdHMgdHlwZQogICAgICAg ICAgZGVjbGFyYXRpb24uIFRoZXJlZm9yZSBkb24ndCB3b3JyeSBhYm91dCBy ZWN1cnNpb24gaGVyZS4gKi8KICAgICAgIC8qIFRPRE86IHdvcnJ5IGFib3V0 IHJlY3Vyc2lvbiBpbnRvIHBhcmVudCB0eXBlcyBvZiB0aGUgdW5pb25zPyAq LwotICAgICAgaWYgKGNvbXBhcmVfY29tcG9uZW50cyAoY21wMSwgY21wMiwK LSAgICAgICAgICAgIG1hcDEtPnRzLnUuZGVyaXZlZCwgbWFwMi0+dHMudS5k ZXJpdmVkKSA9PSAwKQorICAgICAgaWYgKGNvbXBhcmVfY29tcG9uZW50cyAo Y21wMSwgY21wMiwgbWFwMV90LCBtYXAyX3QpID09IDApCiAgICAgICAgIHJl dHVybiAwOwogCiAgICAgICBjbXAxID0gY21wMS0+bmV4dDsKZGlmZiAtLWdp dCBhL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcvZGVjX3VuaW9uXzguZjkw IGIvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9kZWNfdW5pb25fOC5mOTAK bmV3IGZpbGUgbW9kZSAxMDA2NDQKaW5kZXggMDAwMDAwMC4uMmQ4NTZmYwot LS0gL2Rldi9udWxsCisrKyBiL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcv ZGVjX3VuaW9uXzguZjkwCkBAIC0wLDAgKzEsMjEgQEAKKyEgeyBkZy1kbyBj b21waWxlIH0KKyEgeyBkZy1vcHRpb25zICItZmRlYy1zdHJ1Y3R1cmUiIH0K KyEKKyEgUFIgZm9ydHJhbi83Nzc2NAorIQorISBUZXN0IGFuIElDRSBkdWUg dG8gYSBtYXAgd2l0aCB6ZXJvIGNvbXBvbmVudHMuCishCisKK3Byb2dyYW0g cAorCitzdHJ1Y3R1cmUgL3MxLworICB1bmlvbgorICAgIG1hcAorICAgIGVu ZCBtYXAKKyAgICBtYXAKKyAgICAgIHJlYWwgOjogYSA9IDIuMAorICAgIGVu ZCBtYXAKKyAgZW5kIHVuaW9uCitlbmQgc3RydWN0dXJlCisKK2VuZAo= --001a11371fbcdd38e4053da650df--