🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: net.lang.f77
Article #349

f77 bug: comparing logicals

#349
From: Peter S. Shenkin
Date: Fri, 25 Apr 1986 19:48
15 lines
1154 bytes
The following program, compiled with f77, prints "f" for all three
comparisons;  under VMS, using dec fortran,  the three results are
"T", "F" and "T", as one would expect.

cccccccccccccccccccccccc BEGIN HERE ccccccccccccccccccccccccccccccccccccccc
	write(6,*)'.true. .eq. .true. :', .true. .eq. .true.
	write(6,*)'.true. .eq. .false. :', .true. .eq. .false.
	write(6,*)'.false. .eq. .false. :', .false. .eq. .false.

	stop
	end
cccccccccccccccccccccccc END HERE cccccccccccccccccccccccccccccccccccccccccc

Peter S. Shenkin	 Columbia Univ. Biology Dept., NY, NY  10027
{philabs,rna}!cubsvax!peters		cubsvax!peters@columbia.ARPA
Technical Details
Message-ID: <464@cubsvax.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!panda!talcott!harvard!cmcl2!rna!cubsvax!peters

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!panda!talcott!harvard!cmcl2!rna!cubsvax!peters
From: peters@cubsvax.UUCP (Peter S. Shenkin)
Newsgroups: net.lang.f77
Subject: f77 bug:  comparing logicals
Message-ID: <464@cubsvax.UUCP>
Date: Fri, 25-Apr-86 15:48:50 EDT
Article-I.D.: cubsvax.464
Posted: Fri Apr 25 15:48:50 1986
Date-Received: Sun, 27-Apr-86 07:30:48 EDT
Organization: Columbia Univ. Bio. CG Fac., NY
Lines: 15