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!burl!ulysses!mhuxl!ihnp4!astrovax!trq
From: trq@astrovax.UUCP (Thomas R. Quinn)
Newsgroups: net.bugs.4bsd,net.lang.f77
Subject: reposting: problem in f77 (4.2BSD)
Message-ID: <243@astrovax.UUCP>
Date: Mon, 19-Mar-84 12:43:16 EST
Article-I.D.: astrovax.243
Posted: Mon Mar 19 12:43:16 1984
Date-Received: Tue, 20-Mar-84 01:56:55 EST
Organization: Princeton Univ. Astrophysics
Lines: 22

I have sent the following bug report to berkely:

Subject: problem with parameters in f77
Index:	usr.bin/f77 4.2BSD

Description:
	Assigning an integer to the sum of an integer and "0" times "iparam"
	where the value of "iparam" is defined in a parameter statement results
	in the integer being assigned the value "0".
Repeat-By:
	Compile and run the following program under f77.


	parameter(IRED = 256)
	iwrblk = 10 + 0*IRED
	print *,iwrblk
	end

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