------- Additional Comments From pinskia at gcc dot gnu dot org 2005-08-02 17:11 ------- We do get a warning: In file t.2.f:4
COMMON /SUBSTR/ NPHASE,NSUB,IDUM1,KURPA,KTBUF 1 Warning: Named COMMON block 'substr' at (1) shall be of the same size -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23201