1 Sep 2009 19:43
Re: FORTRAN IV DATA statements
Tim Prince <n8tm <at> aol.com>
2009-09-01 17:43:40 GMT
2009-09-01 17:43:40 GMT
Tobias Burnus wrote: > Hi Stephan, > > On 09/01/2009 02:53 PM, Stephan Buchert wrote: >> The offending lines are >> COMMON/DATIME/ISDATE(3),ISTIME(2),NAME(2) >> DATA ISDATE/'01-F','EB-0','2 '/,ISTIME/'15:4','9:27'/ >> and the like (ISDATE implicitly declared a 3 element integer array and >> expected to hold a 12 character long string). [...] >> >> I believe that such DATA statements were allowed in FORTRAN IV and >> FORTRAN 66 > > I think that this is some kind of vendor extension. The reason is that > Fortran 66 did not have character strings (only Hollerith, which were > new in F66) while F77 added the character data type but seemingly does > not allow this. > Hollerith constant expressed with apostrophes was a vendor extension to f66, typically supported by IBM and HP but few others. Its use was often a sign of intentional non-portability. In order to support the extension in f77, it involved the new extension of supporting character strings to assign and initialize Hollerith.
RSS Feed