From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 56401 invoked by alias); 14 Jul 2015 20:40:04 -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 56382 invoked by uid 89); 14 Jul 2015 20:40:04 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-1.1 required=5.0 tests=AWL,BAYES_50,FREEMAIL_FROM,RCVD_IN_DNSWL_LOW,SPF_PASS autolearn=ham version=3.3.2 X-Spam-User: qpsmtpd, 2 recipients X-HELO: mail-ie0-f178.google.com Received: from mail-ie0-f178.google.com (HELO mail-ie0-f178.google.com) (209.85.223.178) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with (AES128-GCM-SHA256 encrypted) ESMTPS; Tue, 14 Jul 2015 20:40:03 +0000 Received: by iebmu5 with SMTP id mu5so19766278ieb.1; Tue, 14 Jul 2015 13:40:01 -0700 (PDT) MIME-Version: 1.0 X-Received: by 10.50.50.130 with SMTP id c2mr5843226igo.19.1436906401117; Tue, 14 Jul 2015 13:40:01 -0700 (PDT) Received: by 10.36.37.66 with HTTP; Tue, 14 Jul 2015 13:40:01 -0700 (PDT) In-Reply-To: <20150714192042.GA19872@troutmask.apl.washington.edu> References: <20150714192042.GA19872@troutmask.apl.washington.edu> Date: Tue, 14 Jul 2015 21:20:00 -0000 Message-ID: Subject: Re: [PATCH] PR fortran/66864 -- Use the right precision in FLOOR() From: Janne Blomqvist To: Steve Kargl Cc: Fortran List , GCC Patches Content-Type: text/plain; charset=UTF-8 X-SW-Source: 2015-07/txt/msg01204.txt.bz2 On Tue, Jul 14, 2015 at 10:20 PM, Steve Kargl wrote: > The attached patch fixes an issue in the constant > folding of FLOOR(). In the old code, the precision > of an temporary MPFR variable was set according to > the requested kind of the INTEGER result, ie., the > wrong precision. The patch sets the precision to > the precision of the arg of FLOOR(). Regression > tested on trunk. OK to commit. > > 2015-07-14 Steven G. Kargl > > * simplify.c (gfc_simplify_floor): Set precision of temporary to > that of arg. > > 2015-07-14 Steven G. Kargl > > gfortran.dg/pr66864.f90: New test. > > > -- > Steve Ok, thanks. -- Janne Blomqvist