From patchwork Sat May  4 21:06:56 2013
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
X-Patchwork-Submitter: David Edelsohn <dje.gcc@gmail.com>
X-Patchwork-Id: 241479
Return-Path: 
 <gcc-patches-return-341059-incoming=patchwork.ozlabs.org@gcc.gnu.org>
X-Original-To: incoming@patchwork.ozlabs.org
Delivered-To: patchwork-incoming@bilbo.ozlabs.org
Received: from sourceware.org (server1.sourceware.org [209.132.180.131])
	(using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits))
	(Client CN "localhost", Issuer "www.qmailtoaster.com" (not verified))
	by ozlabs.org (Postfix) with ESMTPS id 810042C00D6
	for <incoming@patchwork.ozlabs.org>;
	Sun,  5 May 2013 07:07:16 +1000 (EST)
DomainKey-Signature: a=rsa-sha1; c=nofws; d=gcc.gnu.org; h=list-id
	:list-unsubscribe:list-archive:list-post:list-help:sender
	:mime-version:date:message-id:subject:from:to:content-type; q=
	dns; s=default; b=fBTD5t6YgBxPEwQ2+Tupann+03QV5MHz7zs5CqA8UPqS46
	qG5CnRnd1AL/ckJJ/15iswW2ulq9lcEbP9Vym1jctS26xq8Mw0uuD/x1lY0+5Oyx
	PxVBQdGBzxtzr8B6m0UVwVk+BLsp+NBoqt2/0c4ObtArgOHOPnDSp8VMcz2EI=
DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=gcc.gnu.org; h=list-id
	:list-unsubscribe:list-archive:list-post:list-help:sender
	:mime-version:date:message-id:subject:from:to:content-type; s=
	default; bh=rBDf5TL5/Qywn5OZOn6Nivm16vI=; b=dAiLuySyMFxFXNngIRGu
	hdW3HU8gHaTFl05fVxpFWiNeU7Ck85D4ths82exWfv1pqDlKn3GQp65vGXeQSB9g
	bJET0A8hBK2Xz8MIZ8i8MU6pAgogt5rnXBBHXUIo3QeXN1TjZ9lhD+sfakIe4H6k
	5oz64frIdzI4kWb1mTdKqig=
Received: (qmail 19473 invoked by alias); 4 May 2013 21:07:06 -0000
Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Id: <gcc-patches.gcc.gnu.org>
List-Unsubscribe: <mailto:gcc-patches-unsubscribe-##L=##H@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
Delivered-To: mailing list gcc-patches@gcc.gnu.org
Received: (qmail 19410 invoked by uid 89); 4 May 2013 21:06:58 -0000
X-Spam-SWARE-Status: No, score=-2.5 required=5.0 tests=AWL, BAYES_00,
	FREEMAIL_FROM, RCVD_IN_DNSWL_LOW, RCVD_IN_HOSTKARMA_YE,
	SPF_PASS autolearn=ham version=3.3.1
X-Spam-User: qpsmtpd, 2 recipients
Received: from mail-vc0-f176.google.com (HELO mail-vc0-f176.google.com)
	(209.85.220.176) by sourceware.org
	(qpsmtpd/0.84/v0.84-167-ge50287c) with ESMTP;
	Sat, 04 May 2013 21:06:58 +0000
Received: by mail-vc0-f176.google.com with SMTP id ib11so2263102vcb.35 for
	<multiple recipients>; Sat, 04 May 2013 14:06:56 -0700 (PDT)
MIME-Version: 1.0
X-Received: by 10.220.53.138 with SMTP id m10mr5181335vcg.29.1367701616253;
	Sat, 04 May 2013 14:06:56 -0700 (PDT)
Received: by 10.220.175.131 with HTTP; Sat, 4 May 2013 14:06:56 -0700 (PDT)
Date: Sat, 4 May 2013 17:06:56 -0400
Message-ID: 
 <CAGWvnykEhW6pUMWNgjqk4X3nFPevKfRpQ44tX6Vp15=hOy2d9g@mail.gmail.com>
Subject: [PATCH,FORTRAN] Variable "value" possibly unused in io/read.c
From: David Edelsohn <dje.gcc@gmail.com>
To: GCC Patches <gcc-patches@gcc.gnu.org>, Fortran List <fortran@gcc.gnu.org>

All uses of "value" are protected by

#if defined HAVE_GFC_REAL_16 || defined HAVE_GFC_REAL_10

so it may be unused, which generates a warning on some platforms.

Bootstrapped on powerpc-ibm-aix7.1.0.0.

Okay for trunk?

Thanks, David


       * io/read.c (si_max): Annotate value with attribute unused.

Index: io/read.c
===================================================================
--- io/read.c   (revision 198587)
+++ io/read.c   (working copy)
@@ -91,7 +91,7 @@
 GFC_UINTEGER_LARGEST
 si_max (int length)
 {
-  GFC_UINTEGER_LARGEST value;
+  GFC_UINTEGER_LARGEST value __attribute__((unused));

   switch (length)
       {