Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!allegra!princeton!caip!seismo!mcvax!zuring!walter
From: walter@zuring.uucp (Walter M. Lioen)
Newsgroups: net.lang.f77,net.bugs.4bsd
Subject: Re: Subroutine bug with 4.2 BSD F77.
Message-ID: <302@zuring.UUCP>
Date: Mon, 23-Jun-86 13:34:04 EDT
Article-I.D.: zuring.302
Posted: Mon Jun 23 13:34:04 1986
Date-Received: Wed, 25-Jun-86 06:33:00 EDT
References: <3174@sjuvax.UUCP>
Reply-To: walter@zuring.UUCP (Walter M. Lioen)
Distribution: net
Organization: CWI, Amsterdam
Lines: 33
Xref: watmath net.lang.f77:561 net.bugs.4bsd:2199
Apparently-To: rnews@mcvax

In article <3174@sjuvax.UUCP> bbanerje@sjuvax.UUCP writes:
>Description:
>	
>	User defined functions always return a value of 0 (including
>	logical functions).
>
>Repeat-By:
>
>	Compile and execute the following program.
>============================================================
>	integer i
>	i = 1
>	print *, bug(i)
>	stop
>	end
>
>
>	integer function bug(i)
>	integer i
>
>	bug = 2
>	return
>	end
>
>Fix:
>	Hopefully fixed in 4.3 BSD.

Fix:	%s/bug/nobug/g
-- 
Mail: Walter M. Lioen, CWI, P.O. Box 4079, 1009 AB  Amsterdam, The Netherlands.
UUCP: {seismo,decvax,philabs,okstate,garfield}!mcvax!walter
  or: walter@mcvax.uucp
ARPA: walter%mcvax.uucp@seismo.css.gov