From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 21898 invoked by alias); 3 Aug 2003 18:54:47 -0000 Mailing-List: contact gcc-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-owner@gcc.gnu.org Received: (qmail 21882 invoked from network); 3 Aug 2003 18:54:41 -0000 Received: from unknown (HELO localhost.localdomain) (195.113.19.66) by sources.redhat.com with SMTP; 3 Aug 2003 18:54:41 -0000 Received: from sunsite.ms.mff.cuni.cz (sunsite.mff.cuni.cz [127.0.0.1]) by localhost.localdomain (8.12.8/8.12.8) with ESMTP id h73IseqO027237; Sun, 3 Aug 2003 20:54:40 +0200 Received: (from jakub@localhost) by sunsite.ms.mff.cuni.cz (8.12.8/8.12.8/Submit) id h73IsdQq027235; Sun, 3 Aug 2003 20:54:39 +0200 Date: Sun, 03 Aug 2003 20:35:00 -0000 From: Jakub Jelinek To: Erik Schnetter Cc: gcc@gcc.gnu.org Subject: Re: Implementing real*16 in Fortran Message-ID: <20030803185439.GR20507@sunsite.ms.mff.cuni.cz> Reply-To: Jakub Jelinek References: <200308031317.33934.schnetter@uni-tuebingen.de> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <200308031317.33934.schnetter@uni-tuebingen.de> User-Agent: Mutt/1.4i X-SW-Source: 2003-08/txt/msg00084.txt.bz2 On Sun, Aug 03, 2003 at 01:17:19PM +0200, Erik Schnetter wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > I want to implement real*16 in Fortran. For that I seem to need two > things: > > (1) For run time libraries, I need a corresponding C type. I think the > best thing would be to use long double for that, but it has to have a > sizeof of 16. On i386, the option -m128bit-long-double does just this. > Is there a way to declare a type that does not need this option? I I don't think IA-32/IA-64/amd64 TFmode (ieee_extended_128) is what you're looking for. That's still the same thing as XFmode, but padded to 16 bytes. Doesn't Fortran mandate IEEE quad format (TFmode on sparc and a couple of other platforms), ie. 1 bit sign, 15 bits exponent, 112+1 bits of mantissa? Jakub