From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 73145 invoked by alias); 21 Sep 2017 07:10:48 -0000 Mailing-List: contact fortran-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Post: List-Help: , Sender: fortran-owner@gcc.gnu.org Received: (qmail 72000 invoked by uid 89); 21 Sep 2017 07:10:46 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-14.0 required=5.0 tests=AWL,BAYES_00,FREEMAIL_ENVFROM_END_DIGIT,FREEMAIL_FROM,GIT_PATCH_1,GIT_PATCH_2,GIT_PATCH_3,KAM_ASCII_DIVIDERS,RCVD_IN_DNSWL_NONE,RCVD_IN_SORBS_SPAM,SPF_PASS autolearn=ham version=3.3.2 spammy=H*RU:209.85.161.196, Hx-spam-relays-external:209.85.161.196, signs, 5307 X-Spam-User: qpsmtpd, 2 recipients X-HELO: mail-yw0-f196.google.com Received: from mail-yw0-f196.google.com (HELO mail-yw0-f196.google.com) (209.85.161.196) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Thu, 21 Sep 2017 07:10:44 +0000 Received: by mail-yw0-f196.google.com with SMTP id s62so2459918ywg.4; Thu, 21 Sep 2017 00:10:44 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:sender:in-reply-to:references:from :date:message-id:subject:to:cc; bh=KcJSKkABNbKQ6nqEUECwCC8Mi+UksowyYxlTZNhaBB4=; b=epqEATIU98r8JsFa8MzvF991ujXDLYkX2BJhSCUmfbpGsSpkrTiUcYARxVHz6M9coU XgmmaSgAFjFYgVgdH/SFvoqqy7IqD7WvKKKZ/ter+MG6l7oDJMtoYEte3EwfOMqKY8JS NOdMDwJ6gJtrckJqnrLOGQznj7KRd6WAVlmMFYplg/o1HHYGeRcJO3A/E+64Q5y3pWr+ oNOhBH6eN8V336x5ODexM6cRVYyy+GlpRCu0AeGQmh3EaGp0GoKGfe7XGt5ppxUtD7kR RtZEQtyACO7qjkhYHbKGgysXJotT88CbcT+lGDpeNyP7wlRFlT/IwbjBXf7cW7zzf8kU k0dw== X-Gm-Message-State: AHPjjUghiOarmeBBi71I/F8Ek0vkw4sOF5b7hNPC6Fgzvtl/RUZ+aSiV H0uHz8XFrFRTCGSnLlyMb7bfhSvFH4Kms9ouOKDltw== X-Google-Smtp-Source: AOwi7QCGn6CbdpXWHQcEDlmJ5yb4sdk+It8gD8uqd6pAvPnhzXD4ZbXJXYjC8K6bmGgO+ZZKZn+sIn+p3WdTcKydkkg= X-Received: by 10.129.82.86 with SMTP id g83mr939585ywb.319.1505977842957; Thu, 21 Sep 2017 00:10:42 -0700 (PDT) MIME-Version: 1.0 Received: by 10.129.162.148 with HTTP; Thu, 21 Sep 2017 00:10:42 -0700 (PDT) In-Reply-To: References: <20170918045045.GA79226@troutmask.apl.washington.edu> <20170918140823.GA83251@troutmask.apl.washington.edu> From: Janus Weil Date: Thu, 21 Sep 2017 07:10:00 -0000 Message-ID: Subject: Re: [Patch, Fortran] PR 82143: add a -fdefault-real-16 flag To: Steve Kargl Cc: gfortran , gcc-patches Content-Type: multipart/mixed; boundary="001a114dae4e5ea2110559adca62" X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00073.txt.bz2 --001a114dae4e5ea2110559adca62 Content-Type: text/plain; charset="UTF-8" Content-length: 1641 Attached is an updated patch, where I'm adding -fdefault-real-10 according to Steve's suggestion. As with -fdefault-real-8 and -fdefault-real-16, I'm choosing to set the double kind to 16 in this case. Also I'm renaming flag_default_real to flag_default_real_8 (for symmetry reasons and to make the code more readable). Finally I'm removing the restriction that -fdefault-double-8 must occur together with -fdefault-real-8. It may be useful on its own and should be combinable with the new flags. Ok for trunk? Cheers, Janus 2017-09-18 19:57 GMT+02:00 Janus Weil : > 2017-09-18 16:08 GMT+02:00 Steve Kargl : >> On Mon, Sep 18, 2017 at 09:02:22AM +0200, Janus Weil wrote: >>> Hi Steve, >>> >>> >> attached is a (technically) simple patch that implements the compiler >>> >> flag "-fdefault-real-16" for gfortran. >>> > >>> > What about -fdefault-real-10? If you're going to add bloat to the >>> > compiler, then you might as well to it right. >>> >>> well, yeah. If my only aim was to add bloat to the compiler out of >>> plain boredom and nastiness, then I might as well add >>> -fdefault-real-37. But I don't think that would be very useful. >> >> Why? One gets 11-bits of additional precision (on most platforms) >> and a significant increase in the exponent range (+- ~1024 to >> +- ~16384). REAL(10) maps to hardware floating point, which is >> faster than software quad precision. > > Well, ok. If adding -fdefault-real-10 was a serious suggestion from > your side (which was not so easy to tell through all the sarcasm), I > can surely add that as well. > > Cheers, > Janus --001a114dae4e5ea2110559adca62 Content-Type: text/plain; charset="US-ASCII"; name="pr82143_v2.diff" Content-Disposition: attachment; filename="pr82143_v2.diff" Content-Transfer-Encoding: base64 X-Attachment-Id: f_j7u47zek0 Content-length: 7495 SW5kZXg6IGdjYy9mb3J0cmFuL2ludm9rZS50ZXhpCj09PT09PT09PT09PT09 PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09 PT09PT09PT0KLS0tIGdjYy9mb3J0cmFuL2ludm9rZS50ZXhpCShyZXZpc2lv biAyNTI4OTIpCisrKyBnY2MvZm9ydHJhbi9pbnZva2UudGV4aQkod29ya2lu ZyBjb3B5KQpAQCAtMTE5LDggKzExOSw4IEBAIGJ5IHR5cGUuICBFeHBsYW5h dGlvbnMgYXJlIGluIHRoZSBmb2xsb3dpbmcgc2VjdGlvCiBAZ2Njb3B0bGlz dHstZmFsbC1pbnRyaW5zaWNzIC1mYmFja3NsYXNoIC1mY3JheS1wb2ludGVy IC1mZC1saW5lcy1hcy1jb2RlIEBnb2wKIC1mZC1saW5lcy1hcy1jb21tZW50 cyBAZ29sCiAtZmRlYyAtZmRlYy1zdHJ1Y3R1cmUgLWZkZWMtaW50cmluc2lj LWludHMgLWZkZWMtc3RhdGljIC1mZGVjLW1hdGggQGdvbAotLWZkZWZhdWx0 LWRvdWJsZS04IC1mZGVmYXVsdC1pbnRlZ2VyLTggQGdvbAotLWZkZWZhdWx0 LXJlYWwtOCAtZmRvbGxhci1vayAtZmZpeGVkLWxpbmUtbGVuZ3RoLUB2YXJ7 bn0gQGdvbAorLWZkZWZhdWx0LWRvdWJsZS04IC1mZGVmYXVsdC1pbnRlZ2Vy LTggLWZkZWZhdWx0LXJlYWwtOCBAZ29sCistZmRlZmF1bHQtcmVhbC0xMCAt ZmRlZmF1bHQtcmVhbC0xNiAtZmRvbGxhci1vayAtZmZpeGVkLWxpbmUtbGVu Z3RoLUB2YXJ7bn0gQGdvbAogLWZmaXhlZC1saW5lLWxlbmd0aC1ub25lIC1m ZnJlZS1mb3JtIC1mZnJlZS1saW5lLWxlbmd0aC1AdmFye259IEBnb2wKIC1m ZnJlZS1saW5lLWxlbmd0aC1ub25lIC1maW1wbGljaXQtbm9uZSAtZmludGVn ZXItNC1pbnRlZ2VyLTggQGdvbAogLWZtYXgtaWRlbnRpZmllci1sZW5ndGgg LWZtb2R1bGUtcHJpdmF0ZSAtZmZpeGVkLWZvcm0gLWZuby1yYW5nZS1jaGVj ayBAZ29sCkBAIC00MDQsNiArNDA0LDIyIEBAIHRoZSBkZWZhdWx0IHdpZHRo IG9mIEBjb2Rle0RPVUJMRSBQUkVDSVNJT059IHRvIDE2CiBAY29kZXstZmRl ZmF1bHQtZG91YmxlLTh9IGlzIGdpdmVuLCB0b28uIFVubGlrZSBAb3B0aW9u ey1mcmVhbC00LXJlYWwtOH0sCiBpdCBkb2VzIG5vdCBwcm9tb3RlIHZhcmlh YmxlcyB3aXRoIGV4cGxpY2l0IGtpbmQgZGVjbGFyYXRpb24uCiAKK0BpdGVt IC1mZGVmYXVsdC1yZWFsLTEwCitAb3BpbmRleCBAY29kZXtmZGVmYXVsdC1y ZWFsLTEwfQorU2V0IHRoZSBkZWZhdWx0IHJlYWwgdHlwZSB0byBhIDEwIGJ5 dGUgd2lkZSB0eXBlLiBUaGlzIG9wdGlvbiBhbHNvIGFmZmVjdHMKK3RoZSBr aW5kIG9mIG5vbi1kb3VibGUgcmVhbCBjb25zdGFudHMgbGlrZSBAY29kZXsx LjB9LCBhbmQgZG9lcyBwcm9tb3RlCit0aGUgZGVmYXVsdCB3aWR0aCBvZiBA Y29kZXtET1VCTEUgUFJFQ0lTSU9OfSB0byAxNiBieXRlcyBpZiBwb3NzaWJs ZSwgdW5sZXNzCitAY29kZXstZmRlZmF1bHQtZG91YmxlLTh9IGlzIGdpdmVu LiBVbmxpa2UgQG9wdGlvbnstZnJlYWwtNC1yZWFsLTEwfSwKK2l0IGRvZXMg bm90IHByb21vdGUgdmFyaWFibGVzIHdpdGggZXhwbGljaXQga2luZCBkZWNs YXJhdGlvbi4KKworQGl0ZW0gLWZkZWZhdWx0LXJlYWwtMTYKK0BvcGluZGV4 IEBjb2Rle2ZkZWZhdWx0LXJlYWwtMTZ9CitTZXQgdGhlIGRlZmF1bHQgcmVh bCB0eXBlIHRvIGEgMTYgYnl0ZSB3aWRlIHR5cGUuIFRoaXMgb3B0aW9uIGFs c28gYWZmZWN0cwordGhlIGtpbmQgb2Ygbm9uLWRvdWJsZSByZWFsIGNvbnN0 YW50cyBsaWtlIEBjb2RlezEuMH0sIGFuZCBkb2VzIHByb21vdGUKK3RoZSBk ZWZhdWx0IHdpZHRoIG9mIEBjb2Rle0RPVUJMRSBQUkVDSVNJT059IHRvIDE2 IGJ5dGVzIGlmIHBvc3NpYmxlLCB1bmxlc3MKK0Bjb2Rley1mZGVmYXVsdC1k b3VibGUtOH0gaXMgZ2l2ZW4uIFVubGlrZSBAb3B0aW9uey1mcmVhbC00LXJl YWwtMTZ9LAoraXQgZG9lcyBub3QgcHJvbW90ZSB2YXJpYWJsZXMgd2l0aCBl eHBsaWNpdCBraW5kIGRlY2xhcmF0aW9uLgorCiBAaXRlbSAtZmRlZmF1bHQt ZG91YmxlLTgKIEBvcGluZGV4IEBjb2Rle2ZkZWZhdWx0LWRvdWJsZS04fQog U2V0IHRoZSBAY29kZXtET1VCTEUgUFJFQ0lTSU9OfSB0eXBlIHRvIGFuIDgg Ynl0ZSB3aWRlIHR5cGUuICBEbyBub3RoaW5nIGlmIHRoaXMKSW5kZXg6IGdj Yy9mb3J0cmFuL2xhbmcub3B0Cj09PT09PT09PT09PT09PT09PT09PT09PT09 PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT0KLS0t IGdjYy9mb3J0cmFuL2xhbmcub3B0CShyZXZpc2lvbiAyNTI4OTIpCisrKyBn Y2MvZm9ydHJhbi9sYW5nLm9wdAkod29ya2luZyBjb3B5KQpAQCAtNDU3LDkg KzQ1NywxNyBAQCBGb3J0cmFuIFZhcihmbGFnX2RlZmF1bHRfaW50ZWdlcikK IFNldCB0aGUgZGVmYXVsdCBpbnRlZ2VyIGtpbmQgdG8gYW4gOCBieXRlIHdp ZGUgdHlwZS4KIAogZmRlZmF1bHQtcmVhbC04Ci1Gb3J0cmFuIFZhcihmbGFn X2RlZmF1bHRfcmVhbCkKK0ZvcnRyYW4gVmFyKGZsYWdfZGVmYXVsdF9yZWFs XzgpCiBTZXQgdGhlIGRlZmF1bHQgcmVhbCBraW5kIHRvIGFuIDggYnl0ZSB3 aWRlIHR5cGUuCiAKK2ZkZWZhdWx0LXJlYWwtMTAKK0ZvcnRyYW4gVmFyKGZs YWdfZGVmYXVsdF9yZWFsXzEwKQorU2V0IHRoZSBkZWZhdWx0IHJlYWwga2lu ZCB0byBhbiAxMCBieXRlIHdpZGUgdHlwZS4KKworZmRlZmF1bHQtcmVhbC0x NgorRm9ydHJhbiBWYXIoZmxhZ19kZWZhdWx0X3JlYWxfMTYpCitTZXQgdGhl IGRlZmF1bHQgcmVhbCBraW5kIHRvIGFuIDE2IGJ5dGUgd2lkZSB0eXBlLgor CiBmZG9sbGFyLW9rCiBGb3J0cmFuIFZhcihmbGFnX2RvbGxhcl9vaykKIEFs bG93IGRvbGxhciBzaWducyBpbiBlbnRpdHkgbmFtZXMuCkluZGV4OiBnY2Mv Zm9ydHJhbi9tb2R1bGUuYwo9PT09PT09PT09PT09PT09PT09PT09PT09PT09 PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09Ci0tLSBn Y2MvZm9ydHJhbi9tb2R1bGUuYwkocmV2aXNpb24gMjUyODkyKQorKysgZ2Nj L2ZvcnRyYW4vbW9kdWxlLmMJKHdvcmtpbmcgY29weSkKQEAgLTY3NDEsNyAr Njc0MSw3IEBAIHVzZV9pc29fZm9ydHJhbl9lbnZfbW9kdWxlICh2b2lkKQog CQkJCSAgICJzdGFuZGFyZCIsIHN5bWJvbFtpXS5uYW1lLCAmdS0+d2hlcmUp KQogCSAgICAgICAgY29udGludWU7CiAKLQkgICAgICBpZiAoKGZsYWdfZGVm YXVsdF9pbnRlZ2VyIHx8IGZsYWdfZGVmYXVsdF9yZWFsKQorCSAgICAgIGlm ICgoZmxhZ19kZWZhdWx0X2ludGVnZXIgfHwgZmxhZ19kZWZhdWx0X3JlYWxf OCkKIAkJICAmJiBzeW1ib2xbaV0uaWQgPT0gSVNPRk9SVFJBTkVOVl9OVU1F UklDX1NUT1JBR0VfU0laRSkKIAkJZ2ZjX3dhcm5pbmdfbm93ICgwLCAiVXNl IG9mIHRoZSBOVU1FUklDX1NUT1JBR0VfU0laRSBuYW1lZCAiCiAJCQkJICJj b25zdGFudCBmcm9tIGludHJpbnNpYyBtb2R1bGUgIgpAQCAtNjgwOCw3ICs2 ODA4LDcgQEAgdXNlX2lzb19mb3J0cmFuX2Vudl9tb2R1bGUgKHZvaWQpCiAJ ICBpZiAoKGdmY19vcHRpb24uYWxsb3dfc3RkICYgc3ltYm9sW2ldLnN0YW5k YXJkKSA9PSAwKQogCSAgICBjb250aW51ZTsKIAotCSAgaWYgKChmbGFnX2Rl ZmF1bHRfaW50ZWdlciB8fCBmbGFnX2RlZmF1bHRfcmVhbCkKKwkgIGlmICgo ZmxhZ19kZWZhdWx0X2ludGVnZXIgfHwgZmxhZ19kZWZhdWx0X3JlYWxfOCkK IAkgICAgICAmJiBzeW1ib2xbaV0uaWQgPT0gSVNPRk9SVFJBTkVOVl9OVU1F UklDX1NUT1JBR0VfU0laRSkKIAkgICAgZ2ZjX3dhcm5pbmdfbm93ICgwLAog CQkJICAgICAiVXNlIG9mIHRoZSBOVU1FUklDX1NUT1JBR0VfU0laRSBuYW1l ZCBjb25zdGFudCAiCkluZGV4OiBnY2MvZm9ydHJhbi90cmFucy10eXBlcy5j Cj09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09 PT09PT09PT09PT09PT09PT09PT09PT0KLS0tIGdjYy9mb3J0cmFuL3RyYW5z LXR5cGVzLmMJKHJldmlzaW9uIDI1Mjg5MikKKysrIGdjYy9mb3J0cmFuL3Ry YW5zLXR5cGVzLmMJKHdvcmtpbmcgY29weSkKQEAgLTUzMCw3ICs1MzAsNyBA QCBnZmNfaW5pdF9raW5kcyAodm9pZCkKICAgICB9CiAKICAgLyogQ2hvb3Nl IHRoZSBkZWZhdWx0IHJlYWwga2luZC4gIEFnYWluLCB3ZSBjaG9vc2UgNCB3 aGVuIHBvc3NpYmxlLiAgKi8KLSAgaWYgKGZsYWdfZGVmYXVsdF9yZWFsKQor ICBpZiAoZmxhZ19kZWZhdWx0X3JlYWxfOCkKICAgICB7CiAgICAgICBpZiAo IXNhd19yOCkKIAlnZmNfZmF0YWxfZXJyb3IgKCJSRUFMKEtJTkQ9OCkgaXMg bm90IGF2YWlsYWJsZSBmb3IgIgpAQCAtNTM4LDYgKzUzOCwyMiBAQCBnZmNf aW5pdF9raW5kcyAodm9pZCkKIAogICAgICAgZ2ZjX2RlZmF1bHRfcmVhbF9r aW5kID0gODsKICAgICB9CisgIGVsc2UgaWYgKGZsYWdfZGVmYXVsdF9yZWFs XzEwKQorICB7CisgICAgaWYgKCFzYXdfcjEwKQorICAgICAgZ2ZjX2ZhdGFs X2Vycm9yICgiUkVBTChLSU5EPTEwKSBpcyBub3QgYXZhaWxhYmxlIGZvciAi CisJCQkiJTwtZmRlZmF1bHQtcmVhbC0xMCU+IG9wdGlvbiIpOworCisgICAg Z2ZjX2RlZmF1bHRfcmVhbF9raW5kID0gMTA7CisgIH0KKyAgZWxzZSBpZiAo ZmxhZ19kZWZhdWx0X3JlYWxfMTYpCisgIHsKKyAgICBpZiAoIXNhd19yMTYp CisgICAgICBnZmNfZmF0YWxfZXJyb3IgKCJSRUFMKEtJTkQ9MTYpIGlzIG5v dCBhdmFpbGFibGUgZm9yICIKKwkJCSIlPC1mZGVmYXVsdC1yZWFsLTE2JT4g b3B0aW9uIik7CisKKyAgICBnZmNfZGVmYXVsdF9yZWFsX2tpbmQgPSAxNjsK KyAgfQogICBlbHNlIGlmIChmbGFnX3JlYWw0X2tpbmQgPT0gOCkKICAgewog ICAgIGlmICghc2F3X3I4KQpAQCAtNTcxLDEzICs1ODcsMTAgQEAgZ2ZjX2lu aXRfa2luZHMgKHZvaWQpCiAgICAgIGFyZSBzcGVjaWZpZWQsIHdlIHVzZSBr aW5kPTgsIGlmIGl0J3MgYXZhaWxhYmxlLiAgSWYgLWZkZWZhdWx0LXJlYWwg aXMKICAgICAgc3BlY2lmaWVkIHdpdGhvdXQgLWZkZWZhdWx0LWRvdWJsZSwg d2UgdXNlIGtpbmQ9MTYsIGlmIGl0J3MgYXZhaWxhYmxlLgogICAgICBPdGhl cndpc2Ugd2UgZG8gbm90IGNoYW5nZSBhbnl0aGluZy4gICovCi0gIGlmIChm bGFnX2RlZmF1bHRfZG91YmxlICYmICFmbGFnX2RlZmF1bHRfcmVhbCkKLSAg ICBnZmNfZmF0YWxfZXJyb3IgKCJVc2Ugb2YgJTwtZmRlZmF1bHQtZG91Ymxl LTglPiByZXF1aXJlcyAiCi0JCSAgICAgIiU8LWZkZWZhdWx0LXJlYWwtOCU+ Iik7Ci0KLSAgaWYgKGZsYWdfZGVmYXVsdF9yZWFsICYmIGZsYWdfZGVmYXVs dF9kb3VibGUgJiYgc2F3X3I4KQorICBpZiAoZmxhZ19kZWZhdWx0X2RvdWJs ZSAmJiBzYXdfcjgpCiAgICAgZ2ZjX2RlZmF1bHRfZG91YmxlX2tpbmQgPSA4 OwotICBlbHNlIGlmIChmbGFnX2RlZmF1bHRfcmVhbCAmJiBzYXdfcjE2KQor ICBlbHNlIGlmICgoZmxhZ19kZWZhdWx0X3JlYWxfOCB8fCBmbGFnX2RlZmF1 bHRfcmVhbF8xMCB8fCBmbGFnX2RlZmF1bHRfcmVhbF8xNikKKwkgICAmJiBz YXdfcjE2KQogICAgIGdmY19kZWZhdWx0X2RvdWJsZV9raW5kID0gMTY7CiAg IGVsc2UgaWYgKGZsYWdfcmVhbDhfa2luZCA9PSA0KQogICAgIHsK --001a114dae4e5ea2110559adca62--