Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site astrovax.UUCP
Path: utzoo!watmath!clyde!floyd!harpo!ulysses!mhuxl!ihnp4!astrovax!trq
From: trq@astrovax.UUCP (Thomas R. Quinn)
Newsgroups: net.lang.f77
Subject: bug with mixed mode (4.2BSD)
Message-ID: <289@astrovax.UUCP>
Date: Wed, 4-Apr-84 21:16:03 EST
Article-I.D.: astrovax.289
Posted: Wed Apr  4 21:16:03 1984
Date-Received: Sat, 7-Apr-84 01:13:20 EST
Organization: Princeton Univ. Astrophysics
Lines: 18

Subject: problem with mixed-mode in f77
Index:	usr.bin/f77 4.2BSD

Description:
	Assigning an integer to the sum of a non-zero integer and "0" times a 
	real results in the integer being assigned the value "0".
Repeat-By:
	Compile and run the following program under f77.


	iwrblk = 1 + 0*1.0
	print *,iwrblk
	end

	The program will print "0" instead of the correct value "1".  Note 
	that the statement
		print *, 1 + 0*1.0
	will print the correct value.