Browse Source

Added rcs identification.

keie 40 years ago
parent
commit
4e7f357a26

+ 1 - 0
util/ass/Makefile

@@ -1,3 +1,4 @@
+# $Header$
 d=../..
 l=$d/lib
 h=$d/h

+ 4 - 0
util/ass/ass00.c

@@ -18,6 +18,10 @@
  *
  */
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*
 ** Main routine of EM1-assembler/loader
 */

+ 2 - 0
util/ass/ass00.h

@@ -5,6 +5,8 @@
 #include "../../h/arch.h"
 #include "../../h/local.h"
 
+#define	RCS_ASS	"$Header$"
+
 /*
  * compile time options
  */

+ 5 - 0
util/ass/ass30.c

@@ -19,6 +19,11 @@
 #include        "assex.h"
 #include        "ip_spec.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_ip[] = RCS_IP ;
+#endif
+
 short           opt_line ;      /* max_line_no - # lines removed from end
 				   after perfoming exc's.
 				   Used to estimate the distance in # of

+ 5 - 0
util/ass/ass40.c

@@ -17,6 +17,11 @@
 
 #include        "ass00.h"
 #include        "assex.h"
+
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*
 ** Make scans to do final assignment of instruction sizes & formats
 ** to those not already done. assign final values to labels

+ 4 - 0
util/ass/ass50.c

@@ -19,6 +19,10 @@
 #include        "assex.h"
 #include        "ip_spec.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*
 ** Pass 5 of EM1 assembler/loader
 ** Fix reloc tables

+ 4 - 0
util/ass/ass60.c

@@ -19,6 +19,10 @@
 #include        "assex.h"
 #include        "ip_spec.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 #ifdef DUMP
 static  char    *typestr[] =
      {"missing","const","procname","glosym","locsym","glosym+off","pseudo"};

+ 5 - 0
util/ass/ass70.c

@@ -17,6 +17,11 @@
 
 #include        "ass00.h"
 #include        "assex.h"
+
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*
 ** utilities of EM1-assembler/loader
 */

+ 4 - 0
util/ass/ass80.c

@@ -19,6 +19,10 @@
 #include        "assex.h"
 #include        "../../h/em_path.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*
  * this file contains several library routines.
  */

+ 4 - 0
util/ass/assci.c

@@ -21,6 +21,10 @@
 #include        "../../h/em_pseu.h"
 #include        "../../h/em_ptyp.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /*
  * read compact code and fill in tables
  */

+ 4 - 0
util/ass/asscm.c

@@ -31,6 +31,10 @@
 
 #include "ass00.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 #ifdef MEMUSE
 static unsigned m_used = 0 ;
 static unsigned m_free = 0 ;

+ 7 - 0
util/ass/assda.c

@@ -1,5 +1,12 @@
 #include        "ass00.h"
 #include        "assex.h"
+
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+static char rcs_ass[]= RCS_ASS ;
+static char rcs_ex[] = RCS_EX ;
+#endif
+
 /*
  * global data
  */

+ 2 - 0
util/ass/assex.h

@@ -2,6 +2,8 @@
  * global data
  */
 
+#define	RCS_EX	"$Header$"
+
 extern  int     wordsize;
 extern  int     ptrsize;
 extern  cons_t  maxadr;

+ 4 - 0
util/ass/assrl.c

@@ -18,6 +18,10 @@
 #include        "ass00.h"
 #include        "assex.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 #define COPYFINAL       1
 #define COPYTEMP        0
 

+ 2 - 0
util/ass/ip_spec.h

@@ -1,5 +1,7 @@
 /* Contents of flags used when describing interpreter opcodes */
 
+#define	RCS_IP		"$Header$"
+
 #define OPTYPE  07      /* type field in flag */
 
 #define OPMINI  0       /* m  MINI */

+ 4 - 0
util/ass/maktab.c

@@ -20,6 +20,10 @@
 #include "../../h/em_spec.h"
 #include "../../h/em_flag.h"
 
+#ifndef NORCSID
+static char rcs_id[] = "$Header$" ;
+#endif
+
 /* This program reads the human readable interpreter specification
    and produces a efficient machine representation that can be
    translated by a C-compiler.