Possible extension to be added is the support of:
data jhlf,jhlg/'f','g'/
Which is interpreted as follows (thanks to Steve Lionel of Intel):
| The character literals are blank-padded on the right to the length of the
| corresponding variables (or truncated as necessary) and then the ASCII
| equivalent is assigned. So what you have here could be replaced by:
|
| data jhlf,jhlg /Z'20202066',Z'20202067'/
|
| or use transfer('f ',jhlf), etc.
|
| Effectively, this is the old F66 Hollerith constant style of
| programming.
Found in Cowan's rcn program, which started in 1961.
ftp://aphysics.lanl.gov/pub/cowan/
I don't feel strong about it, but it would make life easier for such old
programs.
Actually, ifort also supports:
integer :: jhlf
jhlf = 'f'
Such a character -> integer/real/complex conversion would be something for
-std=legacy.
--
Summary: F66/Vendor extension: Implement support for DATA
jhlf/'f'/
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Severity: enhancement
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: burnus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33015
