> Date: Thu, 01 Apr 2004 19:37:29 -0500
> From: Jean Vezina <[log in to unmask]>
> Robin wrote:
>
> >
> > Why would you want to use this statement anyway?
> > It's more typing than
> > CHARACTER (*) :: a, b
> >
>
> I agree entirely with your remark. But I wanted to clarify that point.
>
> I posted the question to the J3 mailing list and Malcolm Cohen
> confirmed that IMPLICIT CHARACTER(*) is indeed standard conforming.
>
> Thus, all the compilers that reject the test program have a bug!
>
> It should be noted also that an explicit interface is not required
> for character dummy arguments having a length of (*). Consequently,
> the test program is standard conforming.
While one is not required (as are most of the old style Fortran
procedure calls) it is recommended that one be included,
for the compiler can check that there are no errors
in matching arguments and their corresponding dummy arguments --
a frequent source of error.
> Thanks for everyone who responded!
>
> Best regards,
>
> Jean Vezina
|