Our old fortran77 compiler allowed one to equivalence a record element
with a common block element. Our new fortran90 compiler does not.
Is there any way to have a record share the same memory as a common
block?
For example:
INTEGER A, B, C
COMMON / COMBLK / A, B, C
STRUCTURE /RECBLK /
INTEGER A, B, C
END STRUCTURE
RECORD /RECBLK/ REC
EQUIVALENCE ( A, REC.A ) <== Compiler Complains About This
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|