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.