From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugs-return-84397-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 8612 invoked by alias); 31 Jan 2004 01:45:57 -0000
Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Archive: <http://gcc.gnu.org/ml/gcc-bugs/>
List-Post: <mailto:gcc-bugs@gcc.gnu.org>
List-Help: <mailto:gcc-bugs-help@gcc.gnu.org>
Sender: gcc-bugs-owner@gcc.gnu.org
Received: (qmail 8586 invoked by uid 48); 31 Jan 2004 01:45:56 -0000
Date: Sat, 31 Jan 2004 01:45:00 -0000
From: "bdavis9659 at comcast dot net" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Message-ID: <20040131014550.13939.bdavis9659@comcast.net>
Reply-To: gcc-bugzilla@gcc.gnu.org
Subject: [Bug fortran/13939] New: [gfortran] Does not except missing subroutine arguments like g77
X-Bugzilla-Reason: CC
X-SW-Source: 2004-01/txt/msg03945.txt.bz2
List-Id: <gcc-bugs.sourceware.org>

Below code is accepted by g77 (albeit with warnings) and is rejected by gfortran.

This is not "standard conforming" f77,f66, or f90 code, but it was supported by
at least one f77 compiler (SEL/Gould) and is currently accepted by g77.

 
$ cat example7.f
       I = 1
       CALL VARARGS(I,,)
       END
       SUBROUTINE VARARGS(I,J,K)
       PRINT*,I
       END
$ g77 example7.f
example7.f: In subroutine `varargs':
example7.f:2: warning:
          CALL VARARGS(I,,)
               1
example7.f:4: (continued):
          SUBROUTINE VARARGS(I,J,K)
                     2
Too many arguments for `varargs' at (1) versus invocation at (2) [info -f g77 M
GLOBALS]
$ ./a.out
 1
$ /usr/local/bin/gfortran example7.f
 In file example7.f:2
 
       CALL VARARGS(I,,)
                     1
Error: Syntax error in argument list at (1)

$ /usr/local/bin/gfortran --version
GNU Fortran 95 (GCC 3.5-tree-ssa 20040128 (merged 20040102))

-- 
           Summary: [gfortran] Does not except missing subroutine arguments
                    like g77
           Product: gcc
           Version: tree-ssa
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: bdavis9659 at comcast dot net
                CC: gcc-bugs at gcc dot gnu dot org


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