From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-patches-return-335517-listarch-gcc-patches=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 29417 invoked by alias); 15 Jan 2013 05:32:43 -0000
Received: (qmail 29400 invoked by uid 22791); 15 Jan 2013 05:32:42 -0000
X-SWARE-Spam-Status: No, hits=-4.8 required=5.0	tests=AWL,BAYES_00,DEAR_NOBODY,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,FREEMAIL_FROM,KHOP_RCVD_TRUST,KHOP_THREADED,RCVD_IN_DNSWL_LOW,RCVD_IN_HOSTKARMA_YE
X-Spam-Check-By: sourceware.org
Received: from mail-vb0-f54.google.com (HELO mail-vb0-f54.google.com) (209.85.212.54)    by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Tue, 15 Jan 2013 05:32:36 +0000
Received: by mail-vb0-f54.google.com with SMTP id l1so4363721vba.27        for <multiple recipients>; Mon, 14 Jan 2013 21:32:35 -0800 (PST)
MIME-Version: 1.0
Received: by 10.220.149.17 with SMTP id r17mr104493535vcv.0.1358227955669; Mon, 14 Jan 2013 21:32:35 -0800 (PST)
Received: by 10.220.241.212 with HTTP; Mon, 14 Jan 2013 21:32:35 -0800 (PST)
In-Reply-To: <bug-54286-10374-cV3eGTkmj0@http.gcc.gnu.org/bugzilla/>
References: <bug-54286-10374@http.gcc.gnu.org/bugzilla/>	<bug-54286-10374-cV3eGTkmj0@http.gcc.gnu.org/bugzilla/>
Date: Tue, 15 Jan 2013 05:32:00 -0000
Message-ID: <CAGkQGiJpddQ7+2n6o2FbqX9WnineRxWy8m-2T8i_B0o3x8Nx3g@mail.gmail.com>
Subject: Fwd: [Bug fortran/54286] [4.8 Regression] Accepts invalid proc-pointer assignments involving proc-ptr function result
From: Paul Richard Thomas <paul.richard.thomas@gmail.com>
To: "fortran@gcc.gnu.org" <fortran@gcc.gnu.org>, gcc-patches <gcc-patches@gcc.gnu.org>
Content-Type: text/plain; charset=ISO-8859-1
Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Id: <gcc-patches.gcc.gnu.org>
List-Archive: <http://gcc.gnu.org/ml/gcc-patches/>
List-Post: <mailto:gcc-patches@gcc.gnu.org>
List-Help: <mailto:gcc-patches-help@gcc.gnu.org>
Sender: gcc-patches-owner@gcc.gnu.org
X-SW-Source: 2013-01/txt/msg00760.txt.bz2

Dear,

I missed the null interface case in the fix for PR54286.  The fix is
'obvious' and 'safe'.

Thanks to Dominique for identifying the problem and the fix.

Cheers

Paul

Author: pault
Date: Tue Jan 15 05:29:01 2013
New Revision: 195185

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=195185
Log:
2013-01-15  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/54286
    * expr.c (gfc_check_pointer_assign): Check for presence of
    's2' before using it.

2013-01-15  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/54286
    * gfortran.dg/proc_ptr_result_8.f90 : Add module 'm' to check
    case where interface is null.


Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/expr.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_result_8.f90