Path: ...!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 15:07:41 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 33
Message-ID: <vdmbvt$3p2dv$2@dont-email.me>
References: <vdict2$339ak$1@dont-email.me>
	<vdm3lb$1b8pr$1@paganini.bofh.team>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Injection-Date: Thu, 03 Oct 2024 17:07:41 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="40482caeff8303161f195d236ec38fea";
	logging-data="3967423"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX19GAAgkw89tpSPeymlQ8+vZ"
User-Agent: Pan/0.145 (Duplicitous mercenary valetism; d7e168a
 git.gnome.org/pan2)
Cancel-Lock: sha1:fg+ZgEbMfePm8kDHRZaOCxUIhkk=
Bytes: 1986

On Thu, 03 Oct 2024 14:45:31 +0200, R Daneel Olivaw wrote:

> Lynn McGuire wrote:
>> I need many of my integers to be integer*8 in my port to 64 bit.  In 
>> C/C++ code, I can say 123456L to mean a long long value, generally 64 
>> bit.  Is there a corresponding way to do this in Fortran or am I stuck 
>> with:
>> 
>>      call xyz (1)
>> 
>>      subroutine xyz (ivalue)
>>      integer*8 ivalue
>>      ...
>>      return end
>> 
>> must be:
>> 
>>      integer*8 ivalue
>>      ...
>>      ivalue = 1
>>      call xyz (ivalue)
>> 
> 
> This is not actually a Fortran issue as such, it's all about a specific 
> compiler (GNU Fortran).

If we overlook the nonstandard type in the declaration, and agree
that the compiler will accept 'integer*8', then the program is
still invalid Fortran.  It's technically not a Fortran issue.  It
is a programmer issue.

-- 
steve