Ugly Conversion of Initializers

The constructs disabled by -fno-ugly-init are:

• Use of Hollerith and typeless constants in contexts where they set initial (compile-time) values for variables, arrays, and named constants--that is, DATA and PARAMETER statements, plus type-declaration statements specifying initial values.

  Here are some sample initializations that are disabled by the -fno-ugly-init option:

            PARAMETER (VAL='9A304FFE'X)
            REAL*8 STRING/8HOUTPUT00/
            DATA VAR/4HABCD/
            

• In the same contexts as above, use of character constants to initialize numeric items and vice versa (one constant per item).

  Here are more sample initializations that are disabled by the -fno-ugly-init option:

            INTEGER IA
            CHARACTER BELL
            PARAMETER (IA = 'A')
            PARAMETER (BELL = 7)
            

• Use of Hollerith and typeless constants on the right-hand side of assignment statements to numeric types, and in other contexts (such as passing arguments in invocations of intrinsic procedures and statement functions) that are treated as assignments to known types (the dummy arguments, in these cases).

  Here are sample statements that are disabled by the -fno-ugly-init option:

            IVAR = 4HABCD
            PRINT *, IMAX0(2HAB, 2HBA)
            

The above constructs, when used, can tend to result in non-portable code. But, they are widely used in existing Fortran code in ways that often are quite portable. Therefore, they are enabled by default.