[Bug fortran/27594] New: Warn/Error when number of arguments of a function does not match

["tobias dot burnus at physik dot fu-berlin dot de" <gcc-bugzilla at gcc dot gnu dot org>]

The following testcase has a function with 13 arguments, but 14 are passed.
gfortran-4.2 -Wall does not show a warning.

Other compilers:

NAG's f95 (no options):
Error: test2.f: Wrong number of arguments to TRNS from TEST: 14 found, 13
expected

g95 (Default-on warning):
In file test2.f:19
     &                      ,NCNF1,ACNF1,ICNF1,ACNF2,ICNF2,NORD)
                                                                12
Warning (154): Inconsistent number of arguments in reference to 'trns' at (1)
and (2)

Testfile:
----------------------------------
      SUBROUTINE TRNS(NCNF ,ACNF,ICNF,NTRN,ATRN,NORD,AORD,IORD
     &               ,NCNF1,ACNF1,ICNF1,ACNF2,ICNF2)
      PARAMETER(NCNFM=50000,NORDM=100)
      CHARACTER*16 ACNF(NCNFM),ACNF1(NCNFM),ACNF2(NCNFM),AORD(NORDM)
      DIMENSION    ICNF(NCNFM),ICNF1(NCNFM),ICNF2(NCNFM),IORD(NORDM)
      CHARACTER*16 ATRN,AT,AC,APPND
      DIMENSION    IW(100)
      END SUBROUTINE TRNS

      PROGRAM TEST
      IMPLICIT REAL*8 (A-H,O-Z)
      PARAMETER(NCNFM=50000,IUIN=3,IUOUT=1,NORDM=100)
      CHARACTER*16 ACNF(NCNFM),ACNF1(NCNFM),ACNF2(NCNFM),ATRN(100)
     &            ,AORD(NORDM)
      DIMENSION    ICNF(NCNFM),ICNF1(NCNFM),ICNF2(NCNFM),ITRN(100)
     &            ,IORD(NORDM)

              CALL TRNS(NCNF,ACNF,ICNF,ITRN(L),ATRN(L),NORD,AORD,IORD
     &                      ,NCNF1,ACNF1,ICNF1,ACNF2,ICNF2,NORD)
      END PROGRAM TEST
----------------------------------


-- 
           Summary: Warn/Error when number of arguments of a function does
                    not match
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: enhancement
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tobias dot burnus at physik dot fu-berlin dot de


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