What version of linux are you running? Send ``uname -a''
What version of g77 are you running? Send ``rpm -q -a | grep g77''
With what version of the Cern code are you working? Send complete id.
What class of source unit is this code fragment located? Specify PROGRAM,
SUBROUTINE, FUNCTION or BLOCK DATA.
Where and how can we examine the complete source unit? Suggested answers
are anonymous ftp path, URL, offer to e-mail, etc.
We are not mind-readers or long distance sensors. You need to provide us
sufficient data with which to work.
Randolph J. Herber, herber@dcdrjh.fnal.gov, +1 630 840 2966, CD/CDFTF PK-149F,
Mail Stop 318, Fermilab, Kirk & Pine Rds., PO Box 500, Batavia, IL 60510-0500,
USA. (Speaking for myself and not for US, US DOE, FNAL nor URA.) (Product,
trade, or service marks herein belong to their respective owners.)
The following header lines retained to affect attribution:
|Date: Tue, 17 Aug 1999 17:08:32 -0400 (EDT)
|From: Jeffrey McDonald <jm@heplx.phyast.pitt.edu>
|Subject: f77 problem -- flag???
|To: linux-users@fnal.gov
|Hello,
| This probably isn't the best mail server for these problems, but I
|expect that perhaps someone who has ported cern code to linux/f77 has
|experience a similar problem.....
| I'm having a problem with some sloppy code from cern. I think I
|know what the authors want to do, but the code is in some patchy format
|that I don't know if I can change. With f77, there is a problem with the
|following two lines:
| DOUBLE PRECISION ACTION(8)
| DATA ACTION/'HOLD ','RESUME','EOF ','REWIND','ATTACH','DETACH'
| +, 'EOFREW','CLOSE ' /
| I know of work-arounds, but the code is re-created during each
|build by a ypatchy script which is a binary file that I don't know how to
|edit. Strangely enough, this is an acceptable f77 construct (at least on
|sgi). Does anyone know a flag to pass to f77 to allow it to compile this
|code? (I've searched but haven't found anything yet.) I do know that I
|can change the flags to the f77 compiler.
| Jeff
|_____________________________________________________
|Jeffrey McDonald, University of Pittsburgh jemcdon+@pitt.edu
|100 Allen Hall office: 412-624-9056
|3941 O'Hara St. lab: 412-624-9160
|Dept. of Physics and Astronomy
|University of Pittsburgh
|Pittsburgh, PA 15260