This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

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.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]