Tim Prince | 1 Sep 2009 19:43
Picon
Favicon

Re: FORTRAN IV DATA statements

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.


Gmane