From 4e7f357a26c5fa7662bbedc85e6b6accb69c7638 Mon Sep 17 00:00:00 2001 From: keie Date: Thu, 8 Nov 1984 12:08:31 +0000 Subject: [PATCH] Added rcs identification. --- util/ass/Makefile | 1 + util/ass/ass00.c | 4 ++++ util/ass/ass00.h | 2 ++ util/ass/ass30.c | 5 +++++ util/ass/ass40.c | 5 +++++ util/ass/ass50.c | 4 ++++ util/ass/ass60.c | 4 ++++ util/ass/ass70.c | 5 +++++ util/ass/ass80.c | 4 ++++ util/ass/assci.c | 4 ++++ util/ass/asscm.c | 4 ++++ util/ass/assda.c | 7 +++++++ util/ass/assex.h | 2 ++ util/ass/assrl.c | 4 ++++ util/ass/ip_spec.h | 2 ++ util/ass/maktab.c | 4 ++++ 16 files changed, 61 insertions(+) diff --git a/util/ass/Makefile b/util/ass/Makefile index 3c6f9b153..fafb0710a 100644 --- a/util/ass/Makefile +++ b/util/ass/Makefile @@ -1,3 +1,4 @@ +# $Header$ d=../.. l=$d/lib h=$d/h diff --git a/util/ass/ass00.c b/util/ass/ass00.c index ddaf2579a..80ad65e89 100644 --- a/util/ass/ass00.c +++ b/util/ass/ass00.c @@ -18,6 +18,10 @@ * */ +#ifndef NORCSID +static char rcs_id[] = "$Header$" ; +#endif + /* ** Main routine of EM1-assembler/loader */ diff --git a/util/ass/ass00.h b/util/ass/ass00.h index 5c5de67c7..a9b456e59 100644 --- a/util/ass/ass00.h +++ b/util/ass/ass00.h @@ -5,6 +5,8 @@ #include "../../h/arch.h" #include "../../h/local.h" +#define RCS_ASS "$Header$" + /* * compile time options */ diff --git a/util/ass/ass30.c b/util/ass/ass30.c index ac5d9a7e9..1f6f983d0 100644 --- a/util/ass/ass30.c +++ b/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 diff --git a/util/ass/ass40.c b/util/ass/ass40.c index e561110fa..41cfe6527 100644 --- a/util/ass/ass40.c +++ b/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 diff --git a/util/ass/ass50.c b/util/ass/ass50.c index 9692acdcc..6b3663dcf 100644 --- a/util/ass/ass50.c +++ b/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 diff --git a/util/ass/ass60.c b/util/ass/ass60.c index d3d56953e..2a6e1c154 100644 --- a/util/ass/ass60.c +++ b/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"}; diff --git a/util/ass/ass70.c b/util/ass/ass70.c index ae123b3a9..18fe730e0 100644 --- a/util/ass/ass70.c +++ b/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 */ diff --git a/util/ass/ass80.c b/util/ass/ass80.c index 85c1514ac..e7c04ced5 100644 --- a/util/ass/ass80.c +++ b/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. */ diff --git a/util/ass/assci.c b/util/ass/assci.c index 83e744bbe..06971fcc0 100644 --- a/util/ass/assci.c +++ b/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 */ diff --git a/util/ass/asscm.c b/util/ass/asscm.c index db91b1335..705e10483 100644 --- a/util/ass/asscm.c +++ b/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 ; diff --git a/util/ass/assda.c b/util/ass/assda.c index b15d11083..e872d6f53 100644 --- a/util/ass/assda.c +++ b/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 */ diff --git a/util/ass/assex.h b/util/ass/assex.h index 00612d91c..91d9880b8 100644 --- a/util/ass/assex.h +++ b/util/ass/assex.h @@ -2,6 +2,8 @@ * global data */ +#define RCS_EX "$Header$" + extern int wordsize; extern int ptrsize; extern cons_t maxadr; diff --git a/util/ass/assrl.c b/util/ass/assrl.c index 5ec0f0c62..4fa1aab9a 100644 --- a/util/ass/assrl.c +++ b/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 diff --git a/util/ass/ip_spec.h b/util/ass/ip_spec.h index cf39b9f63..75d14de9a 100644 --- a/util/ass/ip_spec.h +++ b/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 */ diff --git a/util/ass/maktab.c b/util/ass/maktab.c index 31c5bdcfe..48059de14 100644 --- a/util/ass/maktab.c +++ b/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. -- 2.34.1