OK, I have spoken to the vendor (Absoft) and it appears this is a
boo-boo. They didn't implement the standard appropriately in this case
when they went to F95 from F90. They said they would fix it in the next
service patch.
Alvaro
> -----Original Message-----
> From: Fortran 90 List [mailto:[log in to unmask]] On
Behalf Of
> Alvaro Fernandez
> Sent: Monday, March 17, 2003 2:34 PM
> To: [log in to unmask]
> Subject: Re: Standard question about WHERE()
>
> I should specify that this is a Fortran 95 compiler - Absoft 8.0.
>
>
> Alvaro Fernandez
>
> > -----Original Message-----
> > From: Fortran 90 List [mailto:[log in to unmask]] On
> Behalf Of
> > Dick Hendrickson
> > Sent: Monday, March 17, 2003 2:19 PM
> > To: [log in to unmask]
> > Subject: Re: Standard question about WHERE()
> >
> > Fortran 95 allows construct names on a WHERE construct, Fortran 90
> > did not. From the error message it looks like you are using an
> > F 90 compiler.
> >
> > Dick Hendrickson
> >
> >
> > -------
> > I am compiling some third party software written in Fortran 95 on an
> > Absoft 8.0 compiler.
> > The code in question has several where() blocks with labels. For
> > example:
> >
> >
> >
> > valid_times: where( statistics% valid)
> >
> >
> >
> > elsewhere valid_times
> >
> > statistics% speedup = 0.0
> >
> > end where valid_times
> >
> >
> >
> > The error I get is:
> >
> >
> >
> > cf90-7 f90fe: ERROR ESTIMATE_CACHE_SIZES, File =
..\Coco\make_pm.f95,
> > Line = 3993, Column
> > = 17
> >
> > A construct name is not allowed on a WHERE construct statement.
> >
> >
> >
> > My copy of "Fortran 90/95 explained" would seem to indicate
otherwise.
> > Am I missing
> > something?
> >
> >
> >
> > Alvaro Fernandez
|