Xref: utzoo comp.lang.fortran:354 comp.bugs.4bsd:673
Path: utzoo!mnetor!uunet!husc6!linus!philabs!mrs
From: mrs@philabs.Philips.Com (Member Research Staff)
Newsgroups: comp.lang.fortran,comp.bugs.4bsd
Subject: bug fix for f77 (4,3 bsd) entry statement ?
Message-ID: <3124@briar.Philips.Com>
Date: 8 Jan 88 15:27:30 GMT
Reply-To: mrs@philabs.Philips.Com (Mark R. Simpson)
Organization: Philips Laboratories, Briarcliff Manor, NY
Lines: 40
Keywords: f77, entry, bug

While trying to port a program from VMS to UNIX I ran across the following
bug in the UNIX 4.3 BSD f77 compiler. (This subroutine isn't meant to
do anything but display the bug). Here is the file:

% cat foo.f
      subroutine getc(char)
      character        char,chas*(*)
      integer          n
c
      return
      entry      gets(chas,n)
      return
      end

and the error message I get is:
% f77 foo.f 
foo.f
   getc:
Error on line 2 of foo.f: Declaration error for chas: illegal adjustable length character variable
       entry    gets:

Error.  No assembly.

--------------------

The file compiles correctly using the following machines, operating systems:
    IBM/CMS  fortran compilier
    VAX/VMS  fortran compilier
    SUN UNIX 4.2 Release 3.4   f77  compilier

Does anyone on the net have a fix for this bug.


Thanks
Mark R. Simpson

Philips Laboratories					uunet!philabs!mrs
North American Philips Corporation			       or
Briarcliff Manor, NY 10510			    mrs@philabs.philips.com
(914) 945-6163