Path: ...!3.eu.feeder.erje.net!feeder.erje.net!weretis.net!feeder8.news.weretis.net!eternal-september.org!feeder3.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: "Steven G. Kargl" <sgk@REMOVEtroutmask.apl.washington.edu>
Newsgroups: comp.lang.fortran
Subject: Re: Is there a way in Fortran to designate an integer value as
 integer*8 ?
Date: Thu, 3 Oct 2024 19:59:42 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 33
Message-ID: <vdmt3e$3rq14$1@dont-email.me>
References: <vdict2$339ak$1@dont-email.me> <vdir24$35104$1@dont-email.me>
	<vdk718$3bulb$1@dont-email.me> <vdl6fi$3jra3$2@dont-email.me>
	<vdlfpl$3l0f5$1@dont-email.me> <vdmbml$3p2dv$1@dont-email.me>
	<vdmrgc$3rih7$2@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Injection-Date: Thu, 03 Oct 2024 21:59:42 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="9267902249e3034aaeed5777ddbc0044";
	logging-data="4057124"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX198WAhxKsuDbaiVJ03TTiDu"
User-Agent: Pan/0.145 (Duplicitous mercenary valetism; d7e168a
 git.gnome.org/pan2)
Cancel-Lock: sha1:f5ExL3ABHTx3h1UMpGXCDbu5/ds=
Bytes: 2691

On Thu, 03 Oct 2024 14:32:28 -0500, Lynn McGuire wrote:

> On 10/3/2024 10:02 AM, Steven G. Kargl wrote:
>> On Thu, 03 Oct 2024 02:06:28 -0500, Lynn McGuire wrote:
>> 
>>> On 10/2/2024 11:27 PM, Steven G. Kargl wrote:
>>> 
>> As the person who gave gfortran the -fdefault-integer-8 option, I hope
>> your XXX kloc of code uses neither equivalence nor common blocks.
> 
> I have 197 common blocks included from dedicated files and a massive 
> number of equivalences all over the place.  Several of the equivalences 
> are actually in the common block files.  The equivalences have made the 
> eventual C++ conversion of the Fortran code tricky.
> 
> This code is 850,000 lines of F77 code and 50,000 lines of C++ code that 
> dates back to 1965 or so.  Half of the code is Fortran IV and half is 
> F77.  It has been ported to 12 ? different platforms, mostly mainframes 
> in the 1960s, 1970s, 1980s, and 1990s.


The gfortran's -fdefault-* options break storage association.
This may have some interesting alignment issues, which can
lead to hard to find bugs.  If you think to needed the
-fdefault-integer-8 option, then I'll kindly suggest that you
likely want to use -finteger-4-integer-8 option instead.

My personal recommendation would be to do a proper porting from
integer (aka integer*4) to integer(kind=8).  And, yes, 8 in the
'kind=8' is not portable.

-- 
steve