-fugly-assign option forces
g77 to use the
same storage for assigned labels as it would for a normal
assignment to the same variable.
For example, consider the following code fragment:
I = 3 ASSIGN 10 TO I
Normally, for portability and improved diagnostics,
reserves distinct storage for a "sibling" of
ASSIGN statements to that variable (along with
the corresponding assigned-
GOTO and assigned-
statements that reference the variable).
However, some code (that violates the ANSI FORTRAN 77 standard)
attempts to copy assigned labels among variables involved with
ASSIGN statements, as in:
ASSIGN 10 TO I ISTATE(5) = I ... J = ISTATE(ICUR) GOTO J
Such code doesn't work under
is specified on the command-line, ensuring that the value of
referenced in the second line is whatever value
to designate statement label
10, so the value may be
copied into the
ISTATE array, later retrieved into a
variable of the appropriate type (
J), and used as the target of
Note: To avoid subtle program bugs,
-fugly-assign is specified,
g77 requires the type of variables
specified in assigned-label contexts
must be the same type returned by
On many systems, this type is effectively the same
INTEGER(KIND=1), while, on others, it is
effectively the same as
Do not depend on
g77 actually writing valid pointers
to these variables, however.
g77 currently chooses that implementation, it might
be changed in the future.
See Assigned Statement Labels (ASSIGN and GOTO), for implementation details on assigned-statement labels.