Message-ID:

A LISP programmer knows the value of everything, but the cost of nothing. -- Alan Perlis

devel / comp.lang.fortran / Re: Conformant program or not?

Re: Conformant program or not?

<pX_QL.1104523$Tcw8.956644@fx10.iad>

https://www.rocksolidbbs.com/devel/article-flat.php?id=3289&group=comp.lang.fortran#3289

copy link Newsgroups: comp.lang.fortran

Path: i2pn2.org!i2pn.org!usenet.blueworldhosting.com!feed1.usenet.blueworldhosting.com!peer03.iad!feed-me.highwinds-media.com!news.highwinds-media.com!fx10.iad.POSTED!not-for-mail
MIME-Version: 1.0
User-Agent: Mozilla/5.0 (Macintosh; Intel Mac OS X 10.13; rv:102.0)
Gecko/20100101 Thunderbird/102.8.0
Subject: Re: Conformant program or not?
Content-Language: en-US
Newsgroups: comp.lang.fortran
References: <963ba9b6-9722-43b9-b8b2-062c6ce8cf60n@googlegroups.com>
<da4c1b27-38cd-462a-a7b1-4268da26b5dcn@googlegroups.com>
<0c1e0b42-5af0-46f6-86b4-6d2b7e3a43e2n@googlegroups.com>
<cba9db84-4cbf-432c-ad00-3be27f6566dcn@googlegroups.com>
<d626c658-5a05-4d38-bbe8-34e84d33fcd7n@googlegroups.com>
From: nospam@nowhere.org (Ron Shepard)
In-Reply-To: <d626c658-5a05-4d38-bbe8-34e84d33fcd7n@googlegroups.com>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Lines: 9
Message-ID: <pX_QL.1104523$Tcw8.956644@fx10.iad>
X-Complaints-To: abuse@easynews.com
Organization: Forte - www.forteinc.com
X-Complaints-Info: Please be sure to forward a copy of ALL headers otherwise we will be unable to process your complaint properly.
Date: Fri, 17 Mar 2023 09:38:13 -0500
X-Received-Bytes: 1305

by: Ron Shepard - Fri, 17 Mar 2023 14:38 UTC

Re: Conformant program or not?

<cd5a11b0-7142-49c3-97c4-b9c2d3d2e4d7n@googlegroups.com>

copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=3290&group=comp.lang.fortran#3290

copy link Newsgroups: comp.lang.fortran

X-Received: by 2002:ac8:7356:0:b0:3d2:8d87:6710 with SMTP id q22-20020ac87356000000b003d28d876710mr2160749qtp.12.1679095368346;
Fri, 17 Mar 2023 16:22:48 -0700 (PDT)
X-Received: by 2002:a5b:6c4:0:b0:b1d:d57:fbef with SMTP id r4-20020a5b06c4000000b00b1d0d57fbefmr154855ybq.11.1679095367986;
Fri, 17 Mar 2023 16:22:47 -0700 (PDT)
Path: i2pn2.org!i2pn.org!weretis.net!feeder8.news.weretis.net!proxad.net!feeder1-2.proxad.net!209.85.160.216.MISMATCH!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.fortran
Date: Fri, 17 Mar 2023 16:22:47 -0700 (PDT)
In-Reply-To: <pX_QL.1104523$Tcw8.956644@fx10.iad>
Injection-Info: google-groups.googlegroups.com; posting-host=2601:546:300:4c20:3203:c8ff:fe14:5ceb;
posting-account=7tVJUQoAAACymEG6aShD5R0lhHCm_A0r
NNTP-Posting-Host: 2601:546:300:4c20:3203:c8ff:fe14:5ceb
References: <963ba9b6-9722-43b9-b8b2-062c6ce8cf60n@googlegroups.com>
<da4c1b27-38cd-462a-a7b1-4268da26b5dcn@googlegroups.com> <0c1e0b42-5af0-46f6-86b4-6d2b7e3a43e2n@googlegroups.com>
<cba9db84-4cbf-432c-ad00-3be27f6566dcn@googlegroups.com> <d626c658-5a05-4d38-bbe8-34e84d33fcd7n@googlegroups.com>
<pX_QL.1104523$Tcw8.956644@fx10.iad>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <cd5a11b0-7142-49c3-97c4-b9c2d3d2e4d7n@googlegroups.com>
Subject: Re: Conformant program or not?
From: urbanjost@comcast.net (John)
Injection-Date: Fri, 17 Mar 2023 23:22:48 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

by: John - Fri, 17 Mar 2023 23:22 UTC

On Friday, March 17, 2023 at 10:38:17 AM UTC-4, Ron Shepard wrote:
> Here is a version that seems to work as expected for gfortran, but not
> ifort.
> complex, save, target :: a(4) = [(1.,0.),(2.,0.),(3.,0.),(4.,0)]
> real, pointer :: p(:)
> p => a%re
> p => p(1:3:2)
> print *, p
> end

I think that makes sense, as it looks like gfortran does not initialize pointers yet, per
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=101047
while investigating if my gfortran bug report was a duplicate. That would explain it, as P is not even associated by an initialization, but is by an assignment per #101047

Subject	Author
Re: Conformant program or not?	Ron Shepard
Re: Conformant program or not?	John