Przeglądaj źródła

Added RCS identification.

keie 40 lat temu
rodzic
commit
f077a39568

+ 1 - 0
util/ack/Makefile

@@ -1,3 +1,4 @@
+# $Header$
 HFILES=ack.h list.h trans.h data.h dmach.h grows.h
 DSRC=list.c data.c main.c scan.c svars.c trans.c util.c rmach.c run.c grows.c\
      files.c

+ 4 - 0
util/ack/ack.h

@@ -1,3 +1,7 @@
+#ifndef NORCSID
+#define RCS_ACK "$Header$"
+#endif
+
 /****************************************************************************/
 /*                      User settable options                               */
 /****************************************************************************/

+ 7 - 0
util/ack/data.c

@@ -2,8 +2,15 @@
 #include "list.h"
 #include "trans.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
 
 #undef EXTERN
 #define EXTERN
 
 #include "data.h"
+
+#ifndef NORCSID
+static char rcs_data[] = RCS_DATA ;
+#endif

+ 4 - 0
util/ack/data.h

@@ -1,3 +1,7 @@
+#ifndef NORCSID
+#define RCS_DATA "$Header$"
+#endif
+
 EXTERN  char            *stopsuffix;    /* Suffix to stop at */
 EXTERN  char            *machine;       /* The machine id */
 EXTERN  char            *rts;           /* The runtime-system id */

+ 4 - 0
util/ack/dmach.h

@@ -4,6 +4,10 @@
 /*                                                             */
 /***************************************************************/
 
+#ifndef NORCSID
+#define RCS_DMACH "$Header$"
+#endif
+
 
 typedef struct {
 	char *ma_name ;         /* The name of the machine */

+ 4 - 0
util/ack/files.c

@@ -22,6 +22,10 @@
 #include "data.h"
 #include "../../h/em_path.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 setfiles(phase) register trf *phase ; {
 	/* Set the out structure according to the in structure,
 	   the transformation and some global data */

+ 5 - 0
util/ack/grows.c

@@ -24,6 +24,11 @@
 #include "ack.h"
 #include "grows.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_grows[] = RCS_GROWS ;
+#endif
+
 gr_add(id,c) register growstring *id ; char c ; {
 	if ( id->gr_size==id->gr_max) {
 		if ( id->gr_size==0 ) { /* The first time */

+ 4 - 0
util/ack/grows.h

@@ -1,3 +1,7 @@
+#ifndef NORCSID
+#define RCS_GROWS "$Header$"
+#endif
+
 /* struct used to identify and do bookkeeping for growing strings */
 
 typedef struct {

+ 5 - 0
util/ack/list.c

@@ -18,6 +18,11 @@
 #include "ack.h"
 #include "list.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_list[] = RCS_LIST ;
+#endif
+
 /* List handling, operations allowed:
 	adding strings to the list,
 	throwing away whole lists,

+ 4 - 0
util/ack/list.h

@@ -1,3 +1,7 @@
+#ifndef NORCSID
+#define RCS_LIST "$Header$"
+#endif
+
 struct ca_elem {
 	struct ca_elem          *ca_next; /* The link */
 	char                    *ca_cont; /* The contents */

+ 5 - 0
util/ack/main.c

@@ -23,6 +23,11 @@
 #include "data.h"
 #include <signal.h>
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_ack[] = RCS_ACK ;
+#endif
+
 static int sigs[] = { SIGINT, SIGHUP, SIGTERM, 0 } ;
 
 extern  char    *getenv();

+ 4 - 0
util/ack/malloc.c

@@ -29,6 +29,10 @@ char *s;
 #define ASSERT(p)
 #endif
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*      avoid break bug */
 #ifdef pdp11
 #define GRANULE 64

+ 4 - 0
util/ack/mktables.c

@@ -18,6 +18,10 @@
 #include <stdio.h>
 #include <ctype.h>
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 char *fname = 0 ;
 char dname[200] ;
 char *tail ;

+ 5 - 0
util/ack/rmach.c

@@ -24,6 +24,11 @@
 #include "data.h"
 #include <stdio.h>
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_dmach[] = RCS_DMACH ;
+#endif
+
 /************************************************************************/
 /*                                                                      */
 /*           Read machine definitions and transformations               */

+ 4 - 0
util/ack/run.c

@@ -21,6 +21,10 @@
 #include "data.h"
 #include <signal.h>
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 #define ARG_MORE  40            /* The size of args chunks to allocate */
 
 static char      **arglist ;    /* The first argument */

+ 4 - 0
util/ack/scan.c

@@ -20,6 +20,10 @@
 #include "trans.h"
 #include "data.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 enum f_path setpath() { /* Try to find a transformation path */
 
 	start_scan();

+ 4 - 0
util/ack/svars.c

@@ -17,6 +17,10 @@
 
 #include "ack.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*      The processing of string valued variables,
 	this is an almost self contained module.
 

+ 5 - 0
util/ack/trans.c

@@ -21,6 +21,11 @@
 #include "grows.h"
 #include "data.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_trans[] = RCS_TRANS ;
+#endif
+
 /****************************************************************************/
 /*      Routines for transforming from one file type to another             */
 /****************************************************************************/

+ 4 - 0
util/ack/trans.h

@@ -1,3 +1,7 @@
+#ifndef NORCSID
+#define RCS_TRANS "$Header$"
+#endif
+
 /* This structure is the center of all actions */
 /* It contains the description of all phases,
    the suffices they consume and produce and various properties */

+ 4 - 0
util/ack/util.c

@@ -26,6 +26,10 @@
 #include <ctype.h>
 #include <stdio.h>
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 extern  char    *progname ;
 extern  int     w_flag ;
 extern  int     n_error;