Bug in IFort 13.0.1 64-bit compiler for Linux

Bug in IFort 13.0.1 64-bit compiler for Linux

This is a simple reproducer for the bug exposed in a recent thread in this forum (http://software.intel.com/en-us/comment/reply/328146/1687759 ). Older versions of the Intel compiler compile this program with no error, but IFort 13.0.1, 64-bit version, when used with or without the recommended options -O3 -shared-intel -mcmodel=large, fails on Suse 12.2 X64:

bcom2.f90(14): error #6502: COMMON cannot be extended beyond the beginning of a block. [WKC] ,wkc(1) ---------------^ compilation aborted for bcom2.f90 (code 1) 

Here is the reproducer:

                program IFort13Bug
!
      implicit none
      integer, parameter :: &
        natmmx=22, ncmpmx=12, mxlmx=3, nk1x=550, nk3x=21, &
        msex=201, ngmx=15, ngpmx=650, npmx=350, msr=400
!
      integer, parameter ::  &
        ndmx=natmmx*(natmmx-1)+1,  &
        ntypmx=ncmpmx, nkmx=nk1x+nk3x
!
      complex*16 :: tch((2*mxlmx-1)**2*ngmx*nkmx*ndmx) &
              ,pexf(npmx*nkmx*ndmx),wt(ngmx,3,msex,2) &
              ,wkc(1)
!
      real*8     hh(npmx,(2*mxlmx-1)**2,nkmx)
!
      real*8     wk(1)
      real*8     wk1(4*natmmx+ngpmx+ntypmx),wk2(ncmpmx*msr)        &
                ,wk3(5*msr),wk4(2*mxlmx**2*ncmpmx*msex),wk5(7620)  &
                ,wk6((2*mxlmx+2)*msr)                              &
                ,wk7((2*mxlmx-1)**2*mxlmx*msex)                    &
                ,wk8((2*mxlmx-1)**2*mxlmx*24)     
!
!
      common     tch,pexf,hh,wkc
!
      equivalence (wkc,wk,wk1,wk2,wk3,wk4,wk5,wk6,wk7,wk8)
!
      end program IFort13Bug

3 Beiträge / 0 neu
Letzter Beitrag
Nähere Informationen zur Compiler-Optimierung finden Sie in unserem Optimierungshinweis.

Thanks - I've escalated this as issue DPD200240073. Curiously, on Windows (where this shouldn't work at all), 12.1 gives a correct error message but 13.0 gives the same bogus error Linux does.

Steve - Intel Developer Support

I expect this problem to be fixed in Update 3 (end of March).

Steve - Intel Developer Support

Kommentar hinterlassen

Bitte anmelden, um einen Kommentar hinzuzufügen. Sie sind noch nicht Mitglied? Jetzt teilnehmen