[Bug fortran/24965] New: Wrong file name in error message

["schnetter at aei dot mpg dot de" <gcc-bugzilla at gcc dot gnu dot org>]

The enclosed source file contains errors.  The errors are detected, but are
attributed to the wrong source file.  The relevant lines of the source files
are:

# 1
"/Users/eschnett/Cvanilla/arrangements/AEIThorns/Exact/src/include/Scalar_CalcTmunu_temps.inc"
c
c temporary variables for code in Scalar_CalcTmunu.inc
c
        REAL*8  unu,doi,trei,rr,sum,rr2,aha1,aha2,kkkk,riih,rii2
        REAL*8  aaaa,bbbb,aaaa1,bbbb1,kkkk1,r3,bass,term1,term2
        REAL*8  unu1, raz, raz2, razsch2, coefsch, pppsch, unusch
        REAL*8  treiori
        REAL*8  star_m, star_r

This particular block appears twice in the source file.  When compiled with

$ ~/gcc/bin/gfortran setupmaximal.f 

The error messages begin with

 In file
/Users/eschnett/Cvanilla/arrangements/CactusEinstein/Maximal/src/setupmaximal.F:4

        REAL*8  unu,doi,trei,rr,sum,rr2,aha1,aha2,kkkk,riih,rii2        
                  1
Error: Symbol 'unu' at (1) already has basic type of REAL

Note that the file name ends with "setupmaximal.F" and not
"Scalar_CalcTmunu_temps.inc", as it should.

I failed to reproduce this with a smaller source file.


-- 
           Summary: Wrong file name in error message
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: schnetter at aei dot mpg dot de
 GCC build triplet: powerpc-apple-darwin8.3.0
  GCC host triplet: powerpc-apple-darwin8.3.0
GCC target triplet: powerpc-apple-darwin8.3.0


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24965