[Bug fortran/33015] New: F66/Vendor extension: Implement support for DATA jhlf/'f'/

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

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