Added rcs identification.

This commit is contained in:
keie 1984-11-08 12:08:31 +00:00
parent 9f776924d6
commit 4e7f357a26
16 changed files with 61 additions and 0 deletions

View file

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

View file

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

View file

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

View file

@ -19,6 +19,11 @@
#include "assex.h" #include "assex.h"
#include "ip_spec.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 short opt_line ; /* max_line_no - # lines removed from end
after perfoming exc's. after perfoming exc's.
Used to estimate the distance in # of Used to estimate the distance in # of

View file

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

View file

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

View file

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

View file

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

View file

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

View file

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

View file

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

View file

@ -1,5 +1,12 @@
#include "ass00.h" #include "ass00.h"
#include "assex.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 * global data
*/ */

View file

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

View file

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

View file

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

View file

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