From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-patches-return-412374-listarch-gcc-patches=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 15057 invoked by alias); 2 Nov 2015 16:28:48 -0000
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
Received: (qmail 15039 invoked by uid 89); 2 Nov 2015 16:28:47 -0000
Authentication-Results: sourceware.org; auth=none
X-Virus-Found: No
X-Spam-SWARE-Status: No, score=-0.6 required=5.0 tests=AWL,BAYES_00,KAM_LAZY_DOMAIN_SECURITY,T_RP_MATCHES_RCVD autolearn=no version=3.3.2
X-Spam-User: qpsmtpd, 2 recipients
X-HELO: nef2.ens.fr
Received: from nef2.ens.fr (HELO nef2.ens.fr) (129.199.96.40) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Mon, 02 Nov 2015 16:28:47 +0000
Received: from mailhost.lps.ens.fr (tournesol.lps.ens.fr [129.199.120.1])          by nef2.ens.fr (8.13.6/1.01.28121999) with ESMTP id tA2GSigN003813          ; Mon, 2 Nov 2015 17:28:44 +0100 (CET)
Received: from localhost (localhost [127.0.0.1])	by mailhost.lps.ens.fr (Postfix) with ESMTP id 6AAF0157;	Mon,  2 Nov 2015 17:28:44 +0100 (CET)
Received: from mailhost.lps.ens.fr ([127.0.0.1])	by localhost (tournesol.lps.ens.fr [127.0.0.1]) (amavisd-new, port 10024)	with ESMTP id 2kUD3XEI-ww4; Mon,  2 Nov 2015 17:28:44 +0100 (CET)
Received: from [192.168.1.14] (log78-1-82-242-47-10.fbx.proxad.net [82.242.47.10])	by mailhost.lps.ens.fr (Postfix) with ESMTPSA id 2A9C7156;	Mon,  2 Nov 2015 17:28:44 +0100 (CET)
From: =?utf-8?Q?Dominique_d=27Humi=C3=A8res?= <dominiq@lps.ens.fr>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: quoted-printable
Subject: Re: [PATCH] Pr fortran/68153 -- Enhance checking of RESHAPE shape arg
Date: Mon, 02 Nov 2015 16:28:00 -0000
Message-Id: <6ABE830B-E818-4051-BE81-0F23D5B325A0@lps.ens.fr>
Cc: Mikael Morin <mikael.morin@sfr.fr>, gfortran <fortran@gcc.gnu.org>,        gcc-patches <gcc-patches@gcc.gnu.org>
To: Steve Kargl <sgk@troutmask.apl.washington.edu>
Mime-Version: 1.0 (Mac OS X Mail 8.2 \(2104\))
X-SW-Source: 2015-11/txt/msg00090.txt.bz2

Steve,

The error for the test

program p
   integer, parameter :: sh(2) =3D [2, 2]
   integer, parameter :: a(2,2) =3D reshape([1, 2, 3, 4], -sh)
   print *, a
end

is

pr68153_2.f90:2:34:

    integer, parameter :: sh(2) =3D [2, 2]
                                  1
Error: 'shape' argument of 'reshape' intrinsic at (1) has negative element =
(-2)

I am pretty sure that some day a user will complain about a confusing error=
 message!-(

Dominique