Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!utgpu!water!watmath!clyde!cbosgd!soma!gonzalez
From: gonzalez@soma.UUCP
Newsgroups: comp.sys.masscomp
Subject: SCCS question
Message-ID: <8707081847.AA25826@TMC.EDU>
Date: Wed, 8-Jul-87 14:31:56 EDT
Article-I.D.: TMC.8707081847.AA25826
Posted: Wed Jul  8 14:31:56 1987
Date-Received: Sun, 12-Jul-87 01:59:28 EDT
Sender: masscomp@soma.bcm.tmc.edu
Lines: 26
Approved: masscomp@soma.bcm.tmc.edu (AA02560); Wed, 8 Jul 87 15:52:52 EDT
To: info-unix@brl.arpa
Cc: masscomp@soma.bcm.tmc.edu, gonzalez@vax.bbn.com

I am attempting to put some (somebody else's) FORTRAN source under SCCS.  
Being a C hacker, I am somewhat unfamiliar with how f77 stores strings.  
In C, a convenient way to embed an SCCS string, for later detection by
what(1) and strings(1), is to begin each source file with:

	static char *
	sccsid = "%W% (...) %G%";

The closest I've been able to get with f77 is to declare a character array 
in the first function of each source file, and then assign to it:

	character*72	sccsid
		.
		.
	sccsid = '%W% (...) %G%'

There several problems with this.  First of all, strings(1) doesn't find 
the string unless you give it the - switch, because it is unitialized
data.  Secondly, the function in each source file that has this is doing 
busy work (the assignment) each time it is called.  I first thought that 
the parameter mechanism was what I wanted, but it appears to be more like 
#define (the string appears *nowhere* in the object file).  Any ideas?

				-Jim Gonzalez
				 BBN Laboratories, Inc.
				 gonzalez@vax.bbn.com