🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: net.lang.f77
Article #383

Re: Subroutine bug with 4.2 BSD F77.

#383
From: Jim Thompson
Date: Wed, 18 Jun 1986 11:35
39 lines
1236 bytes
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.


insert ',bug' in line one.
-- 


					Jim Thompson

{ihnp4,sdcrdcf}!otto!jim

[ Usual disclamer:  I have no opinion, therefore I don't exist .]

	
Technical Details
Message-ID: <148@otto.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!decvax!ittatc!dcdwest!sdcsvax!sdcrdcf!otto!jim
References: <3174@sjuvax.UUCP>

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!decvax!ittatc!dcdwest!sdcsvax!sdcrdcf!otto!jim
From: jim@otto.UUCP (Jim Thompson)
Newsgroups: net.lang.f77,net.bugs.4bsd
Subject: Re: Subroutine bug with 4.2 BSD F77.
Message-ID: <148@otto.UUCP>
Date: Wed, 18-Jun-86 07:35:45 EDT
Article-I.D.: otto.148
Posted: Wed Jun 18 07:35:45 1986
Date-Received: Sat, 21-Jun-86 08:30:45 EDT
References: <3174@sjuvax.UUCP>
Reply-To: jim@otto.UUCP (Jim Thompson)
Distribution: net
Organization: Las Vegas Sun -- Las Vegas, NV
Lines: 39