------- Comment #1 from pault at gcc dot gnu dot org 2007-02-03 16:11 -------
> Apparently the address of lenstr gets shifted in the subroutine because of the > equivalence statement. Is this the right behavior? This is what happens with my amd84: $ /irun/bin/gfortran --version GNU Fortran 95 (GCC) 4.3.0 20070202 (experimental) Copyright (C) 2006 Free Software Foundation, Inc. GNU Fortran comes with NO WARRANTY, to the extent permitted by law. You may redistribute copies of GNU Fortran under the terms of the GNU General Public License. For more information about these matters, see the file named COPYING [EMAIL PROTECTED] /home/fortran $ /irun/bin/gfortran -fdefault-integer-8 pr30689.f90 pr30689.f90:5.20: COMMON/QPSTAT/LASTYP,STATUS,CHRCTR,DIGIT,Intger,FP,dp,LENSTR 1 Warning: Padding of 4 bytes required before 'dp' in COMMON 'qpstat' at (1) pr30689.f90:16.20: Common/QPStat/LASTYP,STATUS,CHRCTR,DIGIT,Intger,FP,DP,LENSTR 1 Warning: Padding of 12 bytes required before 'dp' in COMMON 'qpstat' at (1) pr30689.f90:16.20: Common/QPStat/LASTYP,STATUS,CHRCTR,DIGIT,Intger,FP,DP,LENSTR 1 Warning: Named COMMON block 'qpstat' at (1) shall be of the same size Paul -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30689