🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: net.lang.f77
Article #370

Subroutine bug with 4.2 BSD F77.

#370
From: B. Banerjee
Date: Fri, 13 Jun 1986 15:29
25 lines
961 bytes
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.
Technical Details
Message-ID: <3174@sjuvax.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!burl!ulysses!allegra!princeton!astrovax!sjuvax!bbanerje

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/5/84; site sjuvax.UUCP
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!burl!ulysses!allegra!princeton!astrovax!sjuvax!bbanerje
From: bbanerje@sjuvax.UUCP (B. Banerjee)
Newsgroups: net.lang.f77,net.bugs.4bsd
Subject: Subroutine bug with 4.2 BSD F77.
Message-ID: <3174@sjuvax.UUCP>
Date: Fri, 13-Jun-86 11:29:14 EDT
Article-I.D.: sjuvax.3174
Posted: Fri Jun 13 11:29:14 1986
Date-Received: Tue, 17-Jun-86 21:21:29 EDT
Distribution: net
Organization: St. Joseph's University, Phila. PA.
Lines: 25