-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
/*
* sys/errno.h - error numbers
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_SYS_ERRNO_H)
#define _SYS_ERRNO_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_SYS_STAT_H)
#define _SYS_STAT_H
-/* $Header$ */
+/* $Id$ */
/* This include file exists so that <sys/types.h> can still safely be
included. On a SUN, this would cause problems because sometimes time_t
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* L E X I C A L A N A L Y Z E R */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* D E F I N I T I O N S F O R T H E L E X I C A L A N A L Y Z E R */
/* A token from the input stream is represented by an integer,
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PARSER ERROR ADMINISTRATION */
#include <alloc.h>
-# $Header$
+# $Id$
# M A K E F I L E F O R A C K C - C O M P I L E R
# Machine and environ dependent definitions
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* A L I G N M E N T D E F I N I T I O N S */
#include "nofloat.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* A R I T H M E T I C C O N V E R S I O N S */
/* This file contains the routines for the various conversions that
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* COMPILER ARITHMETIC */
/* Normally the compiler does its internal arithmetics in longs
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* A S M */
/*ARGSUSED*/
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* A S S E R T I O N M A C R O D E F I N I T I O N */
/* At some points in the program, it must be sure that some condition
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Align To Word boundary Definition */
#include "sizes.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* B L O C K S T O R I N G A N D L O A D I N G */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
Driver for the CEMCOM compiler: works like /bin/cc and accepts
most of the options accepted by /bin/cc and /usr/em/bin/ack.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* S E M A N T I C A N A L Y S I S -- C H A P T E R 7 RM */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* SEMANTIC ANALYSIS (CHAPTER 7RM) -- BINARY OPERATORS */
#include "botch_free.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* SEMANTIC ANALYSIS (CHAPTER 7RM) -- MONADIC OPERATORS */
#include "botch_free.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* U S E O F C H A R A C T E R C L A S S E S */
/* As a starter, chars are divided into classes, according to which
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* C O D E - G E N E R A T I N G R O U T I N E S */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* C O D E - G E N E R A T O R D E F I N I T I O N S */
struct string_cst { /* storing string constants */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* C O N V E R S I O N - C O D E G E N E R A T O R */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* C O N S T A N T E X P R E S S I O N H A N D L I N G */
#include "target_sizes.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* DATAFLOW ANALYSIS ON C PROGRAMS */
/* Compile the C compiler with flag DATAFLOW.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* DECLARATION SYNTAX PARSER */
{
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* DEFINITION OF DECLARATOR DESCRIPTORS */
/* A 'declarator' consists of an idf and a linked list of
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* D E C L A R A T O R M A N I P U L A T I O N */
#include "botch_free.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* D E C L A R A T I O N S P E C I F I E R C H E C K I N G */
#include "nofloat.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* DECLARATION SPECIFIER DEFINITION */
struct decspecs {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* IDENTIFIER DEFINITION DESCRIPTOR */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: CONTROLLINE INTERPRETER */
#include "interface.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* DUMP ROUTINES */
#include "debug.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* E R R O R A N D D I A G N O S T I C R O U T I N E S */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EXPRESSION STACK */
/* Used for global initializations */
struct e_stack {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EXPRESSION-CODE GENERATOR */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EXPRESSION TREE HANDLING */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EXPRESSION DESCRIPTOR */
/* What we want to define is the struct expr, but since it contains
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EXPRESSION SYNTAX PARSER */
{
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* BITFIELD EXPRESSION EVALUATOR */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* FIELD DESCRIPTOR */
struct field { /* for field specifiers */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* F I L E I N F O R M A T I O N S T R U C T U R E */
struct file_info {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* IDENTIFIER FIDDLING & SYMBOL TABLE HANDLING */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* IDENTIFIER DESCRIPTOR */
#include "nopp.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: INITIALIZATION ROUTINES */
#include "nopp.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include "inputtype.h"
#include "file_info.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <inp_pkg.spec>
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* CODE FOR THE INITIALISATION OF GLOBAL VARIABLES */
{
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* To determine the minimum scope of a local variable, all (braced)
scopes are numbered consecutively. Next we maintain an array which
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint class constants */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint-specific comment handling */
#include <ctype.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
extern int LINTLIB; /* file is lint library */
extern int s_NOTREACHED; /* statement not reached */
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
* This file can be considered the em_code.h file of lint.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint evaluation order checking */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint main routines */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* LINT FLAGS */
#define USED 0
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint miscellaneous routines */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint outdef construction */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint output definition */
/* Values for ar_class */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint state stack */
/* These datastructures are used to implement a stack on which the
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Lint status checking */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* L A B E L H A N D L I N G */
#include "Lpars.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* L A B E L D E F I N I T I O N */
#include <em_label.h> /* obtain definition of "label" */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* LEVEL DEFINITIONS */
/* The level of the top-most stack_level is kept in a global variable
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: DEFINITION OF MACRO DESCRIPTOR */
#include "nopp.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* MAIN PROGRAM */
#include "lint.h"
cat <<'--EOT--'
/* Generated by make.tokcase */
-/* $Header$ */
+/* $Id$ */
#include "Lpars.h"
char *
cat <<'--EOT--'
/* Generated by make.tokfile */
-/* $Header: */
+/* $Id: */
--EOT--
sed '
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* MESSAGE ADMINISTRATION */
extern int fp_used; /* code.c */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* U S E R O P T I O N - H A N D L I N G */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PROGRAM PARSER */
/* The presence of typedef declarations renders it impossible to
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make C compiler
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: MACRO-TEXT REPLACEMENT ROUTINES */
#include "nopp.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: SCANNER FOR THE ACTUAL PARAMETERS OF MACROS */
#include "nopp.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* VARIOUS TARGET MACHINE SIZE DESCRIPTORS */
#include "nofloat.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: INPUT SKIP FUNCTIONS */
#include "nopp.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* OCCURANCES OF SPECIAL IDENTIFIERS */
#define SP_SETJMP 1
/* D E B U G G E R S Y M B O L T A B L E */
-/* $Header$ */
+/* $Id$ */
#include "dbsymtab.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* S T A C K / U N S T A C K R O U T I N E S */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* IDENTIFIER STACK DEFINITIONS */
/* The identifier stack is implemented as a stack of sets.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* STATEMENT SYNTAX PARSER */
{
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* library routine for copying structs */
__stb(n, f, t)
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* S T A T E M E N T - B L O C K D E F I N I T I O N S */
struct stmt_block {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* ADMINISTRATION OF STRUCT AND UNION DECLARATIONS */
#include "nobitfield.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* SELECTOR DESCRIPTOR */
struct sdef { /* for selectors */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* S W I T C H - S T A T E M E N T A D M I N I S T R A T I O N */
#include "lint.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* S W I T C H - T A B L E - S T R U C T U R E */
struct switch_hdr {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* TOKEN NAME DEFINITIONS */
#include "idf.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* TOKENNAME DEFINITION */
struct tokenname { /* Used for defining the name of a
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* T Y P E D E F I N I T I O N M E C H A N I S M */
#include "nofloat.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* TYPE DESCRIPTOR */
#include "nofloat.h"
/* M I S C E L L A N E O U S U T I L I T I E S */
-/* $Header$ */
+/* $Id$ */
/* Code for the allocation and de-allocation of temporary variables,
allowing re-use.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* L E X I C A L A N A L Y Z E R */
#include "idfsize.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* D E F I N I T I O N S F O R T H E L E X I C A L A N A L Y Z E R */
/* A token from the input stream is represented by an integer,
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PARSER ERROR ADMINISTRATION */
#include "arith.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* COMPILER ARITHMETIC */
/* Normally the compiler does its internal arithmetics in longs
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include "dobits.h"
#ifdef DOBITS
#define bit0 0x01
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EVALUATION OF BINARY OPERATORS */
#include "Lpars.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* EVALUATION OF MONADIC OPERATORS */
#include "Lpars.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* U S E O F C H A R A C T E R C L A S S E S */
/* As a starter, chars are divided into classes, according to which
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: CONTROLLINE INTERPRETER */
#include "arith.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* E R R O R A N D D I A G N O S T I C R O U T I N E S */
#include <system.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* OPERATOR HANDLING */
#include "Lpars.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* F I L E I N F O R M A T I O N S T R U C T U R E */
struct file_info {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include "idf.h"
#include <idf_pkg.body>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
struct id_usr {
union {
struct macro *idu_macro;
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: INITIALIZATION ROUTINES */
#include <system.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include "file_info.h"
#include "input.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define INP_PUSHBACK 3
#include "inputtype.h"
#include <inp_pkg.spec>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: DEFINITION OF MACRO DESCRIPTOR */
/* The flags of the mc_flag field of the macro structure. Note that
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* MAIN PROGRAM */
#include "debug.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* USER-OPTION HANDLING */
#include <alloc.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR DRIVER */
#include <system.h>
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make ANSI C pre-processor
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* M A C R O R E P L A C E M E N T */
#include "pathlength.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* DEFINITIONS FOR THE MACRO REPLACEMENT ROUTINES */
struct repl {
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* PREPROCESSOR: INPUT SKIP FUNCTIONS */
#include "arith.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* TOKEN NAME DEFINITIONS */
#include "idf.h"
/* Author: E.G. Keizer */
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
main() {
t1() ;
/* Author: E.G. Keizer */
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/* Test a few declaration features */
/* Such as:
/* Author: E.G. Keizer */
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
main() {
/* Author: E.G. Keizer */
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/* This programs is a collection of derived from small tests develloped
for specific bugs/features in the C->EM compiler
*
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/* C-compiler test 1 */
/* This program can be used to test C-compilers */
*
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/*
*
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/* This program can be used to test C-compilers */
*
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/* This program can be used to test C-compilers */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
main() {
none() ;
/* Author: E.G. Keizer */
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
/* Test initialisation of a V7 C-compiler */
/* 1 sept 1980 */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
main(argc,argv,envp) char **argv,**envp ; {
register int rargc ;
*
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
static int level = 0 ;
int procentry(name) char *name ; {
*
*/
-char rcs_id2[] = "$Header$" ;
+char rcs_id2[] = "$Id$" ;
/* Author: E.G. Keizer */
*/
/* Author: E.G. Keizer */
-static char rcs_id[]= "$Header$" ;
+static char rcs_id[]= "$Id$" ;
/* test for structure parameters, assignment and return */
# define ASIZE 26
*/
#include <signal.h>
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
foo()
{
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
main(argc,argv) char **argv ; {
int child, waitchild ;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
/*
* assert.c - diagnostics
*/
-/* $Header$ */
+/* $Id$ */
#include <assert.h>
#include <stdio.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <errno.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
void __bad_assertion(const char *_mess);
/*
* ctype.h - character handling
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_CTYPE_H)
#define _CTYPE_H
Prerequisite: <sys/types.h>
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_DIRENT_H)
#define _DIRENT_H
/*
* errno.h - errors
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_ERRNO_H)
#define _ERRNO_H
/*
* float.h - implementation limits
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_FLOAT_H)
#define _FLOAT_H
-/* $Header$ */
+/* $Id$ */
#if !defined(_GRP_H)
#define _GRP_H
/*
* limits.h - implementation limits
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_LIMITS_H)
#define _LIMITS_H
/*
* locale.h - localization
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_LOCALE_H)
#define _LOCALE_H
/*
* math.h - mathematics
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_MATH_H)
#define _MATH_H
/*
* mathconst.h - mathematic constants
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_MATHCONST_H)
#define _MATHCONST_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_SETJMP_H)
#define _SETJMP_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_SIGNAL_H)
#define _SIGNAL_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_STDARG_H)
#define _STDARG_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_STDDEF_H)
#define _STDDEF_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_STDIO_H)
#define _STDIO_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_STDLIB_H)
#define _STDLIB_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_STRING_H)
#define _STRING_H
prerequisite: <sys/types.h>
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_SYS_DIRENT_H)
#define _SYS_DIRENT_H
/*
* sys/errno.h - error numbers
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_SYS_ERRNO_H)
#define _SYS_ERRNO_H
/*
* time.h - date and time
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_TIME_H)
#define _TIME_H
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
typedef char *va_list;
# define __va_sz(mode) (((sizeof(mode) + sizeof(int) - 1) / sizeof(int)) * sizeof(int))
/*
* localeconv - set components of a struct according to current locale
*/
-/* $Header$ */
+/* $Id$ */
#include <limits.h>
#include <locale.h>
/*
* setlocale - set the programs locale
*/
-/* $Header$ */
+/* $Id$ */
#include <locale.h>
#include <string.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <float.h>
#include <math.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
double
fabs(double x)
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
/* fmod function */
/* Author Robert R. Hall (hall@crach.cts.com) */
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
mes 2,_EM_WSIZE,_EM_PSIZE
exp $frexp
*
* Author: Hans van Eck
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
double
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
/*
* localmath.h - This header is used by the mathematical library.
*/
-/* $Header$ */
+/* $Id$ */
/* some constants (Hart & Cheney) */
#define M_PI 3.14159265358979323846264338327950288
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
mes 2,_EM_WSIZE,_EM_PSIZE
exp $modf
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <float.h>
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <float.h>
#include <math.h>
/*
* environ.c - define the variable environ
*/
-/* $Header$ */
+/* $Id$ */
/*
* This file defines the variable environ and initializes it with a magic
* value. The C run-time start-off routine tests whether the variable
/*
* fdopen - convert a (UNIX) file descriptor into a FILE pointer
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
*
* Author: Patrick van Kleef
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <string.h>
/*
* getopt - parse command-line options
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <string.h>
/*
* getpass - ask for a password
*/
-/* $Header$ */
+/* $Id$ */
#include <signal.h>
#include <string.h>
/*
* getpw - get a password from the password file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* getw - read a word from a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <math.h>
-/* $Header$ */
+/* $Id$ */
double
hypot(double x,double y)
/*
* isatty - check if a file descriptor is associated with a terminal
*/
-/* $Header$ */
+/* $Id$ */
int _isatty(int d);
-/* $Header$ */
+/* $Id$ */
/* mktemp - make a name for a temporary file; only here for backwards compat */
/* no _-protected system-calls? */
/*
* popen - open a pipe
*/
-/* $Header$ */
+/* $Id$ */
#include <errno.h>
#include <stdio.h>
* (c) copyright 1989 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <string.h>
/*
* putw - write an word on a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* sleep - suspend current process for a number of seconds
*/
-/* $Header$ */
+/* $Id$ */
#include <signal.h>
#include <setjmp.h>
* - does not check termcap entry sizes
* - not fully tested
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
-# $Header$
+# $Id$
#PARAMS do not remove this line!
/*
* sigmisc.c - used to get a signal mask
*/
-/* $Header$ */
+/* $Id$ */
#if defined(_POSIX_SOURCE)
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if defined(_POSIX_SOURCE)
#include <sys/types.h>
/*
* clearerr.c - clear error and end-of-file indicators of a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* data.c - this is the initialization for the standard streams
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* doprnt.c - print formatted output
*/
-/* $Header$ */
+/* $Id$ */
#include <ctype.h>
#include <stdio.h>
/*
* doscan.c - scan formatted input
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
/*
* fclose.c - flush a stream and close the file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
/*
* feof.c - test if eof on a stream occurred
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* ferror .c - test if an error on a stream occurred
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fflush.c - flush stream(s)
*/
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <stdio.h>
/*
* fgetc - get an unsigned character and return it as an int
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fgetpos.c - get the position in the file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fgets.c - get a string from a file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fileno .c - map a stream to a file descriptor
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fillbuf.c - fill a buffer
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
/*
* fltpr.c - print floating point numbers
*/
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
#include <string.h>
/*
* flushbuf.c - flush a buffer
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
/*
* fopen.c - open a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
/*
* fprintf - write output on a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* fputc.c - print an unsigned character
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fputs - print a string
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fread.c - read a number of members into an array
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* freopen.c - open a file and associate a stream with it
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
/*
* fscanf.c - read formatted input from stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* fseek.c - perform an fseek
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fsetpos.c - set the position in the file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* ftell.c - obtain the value of the file-position indicator of a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* fwrite.c - write a number of array elements on a file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* getc.c - read an unsigned character
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* getchar.c - read a character from the standard input stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* gets.c - read a line from a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* icompute.c - compute an integer
*/
-/* $Header$ */
+/* $Id$ */
#include "loc_incl.h"
/*
* _isatty - check if a file descriptor is associated with a terminal
*/
-/* $Header$ */
+/* $Id$ */
int _gtty(int d, char *buf);
/*
* loc_incl.h - local include file for stdio library
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* perror.c - print an error message on the standard error output
*/
-/* $Header$ */
+/* $Id$ */
#include <errno.h>
#include <stdio.h>
/*
* printf - write on the standard output stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* putc.c - print (or buffer) one character
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* putchar.c - print (or buffer) a character on the standard output stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* puts.c - print a string onto the standard output stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* remove.c - remove a file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
/*
* rename.c - rename a file
*/
-/* $Header$ */
+/* $Id$ */
#if !defined(_POSIX_SOURCE)
#include <stdio.h>
/*
* rewind.c - set the file position indicator of a stream to the start
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include "loc_incl.h"
/*
* scanf.c - read formatted input from the standard input stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* setbuf.c - control buffering of a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include "loc_incl.h"
/*
* setbuf.c - control buffering of a stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
/*
* sprintf - print formatted output on an array
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* sscanf - read formatted output from a string
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* tmpfile.c - create and open a temporary file
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <string.h>
/*
* tmpnam.c - create a unique filename
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <string.h>
/*
* ungetc.c - push a character back onto an input stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include "loc_incl.h"
/*
* vfprintf - formatted output without ellipsis
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* vprintf - formatted output without ellipsis to the standard output stream
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
/*
* vsprintf - print formatted output without ellipsis on an array
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdarg.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if defined(_POSIX_SOURCE)
#include <sys/types.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <errno.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <ctype.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <ctype.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* extended precision arithmetic for the strtod() and cvt() routines */
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
Modified by Ceriel Jacobs, Free University, Amsterdam,
to make it faster
VERSION
- $Header$
+ $Id$
DESCRIPTION
This is an independent rewrite of the malloc/free package; it is
fast and efficient. Free blocks are kept in doubly linked lists,
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <limits.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <limits.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include "ext_fmt.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <ctype.h>
#include <errno.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#if defined(_POSIX_SOURCE)
#include <sys/types.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <locale.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <stdlib.h>
#include <limits.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
#include <locale.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
/*
* asctime - print a date
*/
-/* $Header$ */
+/* $Id$ */
#include <string.h>
#include <time.h>
/*
* clock - determine the processor time used
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
/*
* ctime - convers the calendar time to a string
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
/*
* difftime - compute the difference between two calendar times
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
/*
* gmtime - convert the calendar time into broken down time
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
#include <limits.h>
/*
* loc_time.h - some local definitions
*/
-/* $Header$ */
+/* $Id$ */
#define YEAR0 1900 /* the first year */
#define EPOCH_YR 1970 /* EPOCH = Jan 1 1970 00:00:00 */
/*
* localtime - convert a calendar time into broken down time
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
#include "loc_time.h"
/*
* misc - data and miscellaneous routines
*/
-/* $Header$ */
+/* $Id$ */
#include <ctype.h>
#include <time.h>
/*
* mktime - convert local time into calendar time
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
#include <limits.h>
/*
* strftime - convert a structure to a string, controlled by an argument
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
#include "loc_time.h"
/*
* time - return the current calendar time (seconds since jan 1, 1970)
*/
-/* $Header$ */
+/* $Id$ */
#if defined(__BSD4_2)
#include <time.h>
/*
* tzset - set timezone information
*/
-/* $Header$ */
+/* $Id$ */
/* This function is present for System V && POSIX */
-/* $Header$ */
+/* $Id$ */
/* File : _c2type.c
Author : Richard A. O'Keefe.
Updated: 23 April 1984
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
-/* $Header$ */
+/* $Id$ */
#include <time.h>
#define DATE_STR "??? ??? ?? ??:??:?? ????\n"
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
extern double strtod();
-/* $Header$ */
+/* $Id$ */
atoi(s)
register char *s;
{
-/* $Header$ */
+/* $Id$ */
long atol(s)
register char *s;
{
-/* $Header$ */
+/* $Id$ */
int
bcmp(b1, b2, n)
register char *b1, *b2;
-/* $Header$ */
+/* $Id$ */
bcopy(old, new, n)
register char *old, *new;
register int n;
-/* $Header$ */
+/* $Id$ */
bfill(dst, len, fill)
register char *dst;
register int len;
-/* $Header$ */
+/* $Id$ */
bmove(dst, src, len)
char *dst, *src;
int len;
-/* $Header$ */
+/* $Id$ */
bzero(b, l)
register char *b;
{
-/* $Header$ */
+/* $Id$ */
#define ALIGN(sz) ((((sz) + (sizeof(long) - 1)) / sizeof(long)) * sizeof(long))
char *
calloc(nelem, elsize)
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/dir.h>
-/* $Header$ */
+/* $Id$ */
/* From Andy Tanenbaum's book "Computer Networks",
rewritten in C
*/
-/* $Header$ */
+/* $Id$ */
#include <time.h>
extern struct tm *localtime();
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
-/* $Header$ */
+/* $Id$ */
char *getenv();
char *index();
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* extended precision arithmetic for the strtod() and cvt() routines */
-/* $Header$ */
+/* $Id$ */
ffc(i)
register int i;
{
-/* $Header$ */
+/* $Id$ */
ffs(i)
register int i;
{
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
extern char *ecvt();
-/* $Header$ */
+/* $Id$ */
char *getenv(name)
register char *name;
{
-/* $Header$ */
+/* $Id$ */
#define UTMPFILE "/etc/utmp"
#ifdef __USG
-/* $Header$ */
+/* $Id$ */
#include <time.h>
static int monthsize[] = { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
-/* $Header$ */
+/* $Id$ */
char *index(s, c)
register char *s, c;
{
-/* $Header$ */
+/* $Id$ */
isatty(f)
{
char buf[128];
-/* $Header$ */
+/* $Id$ */
ltol3(cp, lp, n)
register char *cp;
register long *lp;
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
extern double frexp();
-/* $Header$ */
+/* $Id$ */
#include <time.h>
#define LEAPYEAR(year) (!((year) % 4) && (((year) % 100) || !((year) % 400)))
-/* $Header$ */
+/* $Id$ */
char *
memccpy(dst, src, c, n)
register char *dst, *src;
-/* $Header$ */
+/* $Id$ */
char *
memchr(s, c, n)
char *s;
-/* $Header$ */
+/* $Id$ */
int
memcmp(s1, s2, n)
register char *s1, *s2;
-/* $Header$ */
+/* $Id$ */
char *
memcpy(s1, s2, n)
register char *s1, *s2;
-/* $Header$ */
+/* $Id$ */
char *
memset(s, c, n)
char *s;
-/* $Header$ */
+/* $Id$ */
/* mktemp - make a name for a temporary file */
char *mktemp(template)
-/* $Header$ */
+/* $Id$ */
static int bs;
static char *bp;
static char *bufp;
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/dir.h>
-/* $Header$ */
+/* $Id$ */
/* perror(s) print the current error message. */
extern int errno;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
static qsort1();
static int (*qcompar)();
static qexchange();
-/* $Header$ */
+/* $Id$ */
static long seed = 1L;
int rand()
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/dir.h>
-/* $Header$ */
+/* $Id$ */
char *rindex(s, c)
register char *s, c;
{
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/dir.h>
-/* $Header$ */
+/* $Id$ */
#include <signal.h>
#include <setjmp.h>
-/* $Header$ */
+/* $Id$ */
/* library routine for copying structs */
__stb(n, f, t)
-/* $Header$ */
+/* $Id$ */
char *strcat(s1, s2)
register char *s1, *s2;
{
-/* $Header$ */
+/* $Id$ */
char *strchr(s, c)
register char *s, c;
{
-/* $Header$ */
+/* $Id$ */
int
strcmp(s, t)
register char *s, *t;
-/* $Header$ */
+/* $Id$ */
char *strcpy(s1, s2)
register char *s1, *s2;
{
-/* $Header$ */
+/* $Id$ */
int
strcspn(string, notin)
char *string;
-/* $Header$ */
+/* $Id$ */
int
strlen(s)
char *s;
-/* $Header$ */
+/* $Id$ */
char *strncat(s1, s2, n)
register char *s1, *s2;
int n;
-/* $Header$ */
+/* $Id$ */
int
strncmp(s, t, n)
register char *s, *t;
-/* $Header$ */
+/* $Id$ */
char
*strncpy(s1, s2, n)
register char *s1, *s2;
-/* $Header$ */
+/* $Id$ */
char *
strpbrk(string, brk)
register char *string, *brk;
-/* $Header$ */
+/* $Id$ */
char *strrchr(s, c)
register char *s, c;
{
-/* $Header$ */
+/* $Id$ */
int
strspn(string, in)
char *string;
-/* $Header$ */
+/* $Id$ */
/* find first occurrence of wanted in s */
char *
strstr(s, wanted)
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
struct mantissa {
-/* $Header$ */
+/* $Id$ */
extern char *strpbrk();
char *
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <ctype.h>
-/* $Header$ */
+/* $Id$ */
swab(from, to, nbytes)
register char *from, *to;
{
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/dir.h>
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/dir.h>
-/* $Header$ */
+/* $Id$ */
#ifdef __USG
/* system V, so no /etc/ttys file. In this case, scan the
/etc/utmp file
-/* $Header$ */
+/* $Id$ */
#ifdef __BSD4_2
struct timeval {
long tv_sec, tv_usec;
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
double
ceil(x)
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
double
fabs(x)
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
double
floor(x)
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
double
hypot(x,y)
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#include <math.h>
#include <errno.h>
-/* $Header$ */
+/* $Id$ */
#include <sgtty.h>
int
_gtty(fildes,argp) int fildes ; struct sgttyb *argp ; {
-/* $Header$ */
+/* $Id$ */
#include <sgtty.h>
int
_stty(fildes,argp) int fildes ; struct sgttyb *argp ; {
-/* $Header$ */
+/* $Id$ */
_cleanup(){}
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
-/* $Header$ */
+/* $Id$ */
#include <sgtty.h>
int
gtty(fildes,argp) int fildes ; struct sgttyb *argp ; {
-/* $Header$ */
+/* $Id$ */
#include <signal.h>
typedef void (*callvec)() ;
-/* $Header$ */
+/* $Id$ */
#include <sgtty.h>
int
stty(fildes,argp) int fildes ; struct sgttyb *argp ; {
-/* $Header$ */
+/* $Id$ */
/*
* return offset in file.
*/
-/* $Header$ */
+/* $Id$ */
#include <sys/types.h>
#include <sys/timeb.h>
time_t
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
struct _io_buf _stdin = {
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <ctype.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
fclose(fp)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
FILE *fdopen(fd,mode)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
fgetc(f)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
char *fgets(str, n, file)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
char *malloc();
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
extern char *fcvt();
extern char *ecvt();
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
int
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#define PMODE 0666
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
fputc(c, iop)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
fputs(s,file)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
fread(ptr, size, count, file)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#define PMODE 0666
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
fwrite(ptr, size, count, file)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#undef getchar
-/* $Header$ */
+/* $Id$ */
/*
* get entry from group file
*
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#define ERR(s, c) if(opterr){\
fputs(argv[0], stderr);\
-/* $Header$ */
+/* $Id$ */
#include <signal.h>
#include <sgtty.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
getpw(uid, buf)
-/* $Header$ */
+/* $Id$ */
/*
* get entry from password file
*
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
char *gets(str)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
int getw(iop)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <signal.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#undef putchar
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
puts(s)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
int
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
rewind(iop)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
setbuf(iop, buffer)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <signal.h>
system(str)
-/* $Header$ */
+/* $Id$ */
#ifndef __USG
static struct zonetable {
int offset;
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
ungetc(ch, iop)
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
-/* $Header$ */
+/* $Id$ */
#include <stdio.h>
#include <varargs.h>
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
This directory contains part of the sources of the program lint, which is
based on the cem compiler of ACK, and some more programs which will be
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
EMHOME = /usr/em
LINT = /usr/dick/lint/lpass2/lint
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
This directory contains the standard lint libraries. Normally, nothing
needs to be done here. The standard library c.llb contains all entries
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* File containing definitions of the UNIX system calls and some other
* functions.
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make ANSI C compiler
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make C compiler
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
# M A K E F I L E F O R L P A S S 2
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/******** A R G U M E N T T Y P E C H E C K I N G ********/
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include "l_class.h"
#include "class.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* Bit patterns to allow fast answers to set questions about classes.
The classes in the inpdef are given as single letters; the array
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define NAMESIZE 100
#define FNAMESIZE 100
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* A C K P R I N T M O D U L E D E F I N T I O N S */
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
# L I N T D R I V E R
.\" (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
.\" See the copyright notice in the ACK home directory, in the file "Copyright".
.\"
-.\" $Header$
+.\" $Id$
.TH LINT 1 "$Revision$"
.SH NAME
lint \- a C program checker
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <alloc.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define PRIVATE static /* or empty, for adb and profile */
# (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
# See the copyright notice in the ACK home directory, in the file "Copyright".
#
-# $Header$
+# $Id$
# M A K E F I L E F O R L P A S S 2
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include "l_class.h"
#include "class.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <varargs.h>
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
# Makefile for f2c, a Fortran 77 to C converter
/* L E X I C A L A N A L Y S E R F O R M O D U L A - 2 */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
#include "idfsize.h"
/* T O K E N D E S C R I P T O R D E F I N I T I O N */
-/* $Header$ */
+/* $Id$ */
#include "real.h"
/* S Y N T A X E R R O R R E P O R T I N G */
-/* $Header$ */
+/* $Id$ */
/* Defines the LLmessage routine. LLgen-generated parsers require the
existence of a routine of that name.
/* S Y S T E M M O D U L E T E X T */
-/* $Header$ */
+/* $Id$ */
/* Text of SYSTEM module, for as far as it can be expressed in Modula-2 */
/* C A S E S T A T E M E N T C O D E G E N E R A T I O N */
-/* $Header$ */
+/* $Id$ */
/* Generation of case statements is done by first creating a
description structure for the statement, build a list of the
% character tables for mod2 compiler
-% $Header$
+% $Id$
%S129
%F %s,
%
/* E X P R E S S I O N C H E C K I N G */
-/* $Header$ */
+/* $Id$ */
/* Check expressions, and try to evaluate them as far as possible.
*/
/* E X P R E S S I O N C H E C K I N G */
-/* $Header$ */
+/* $Id$ */
extern int (*ExprChkTable[])(); /* table of expression checking
functions, indexed by node class
/* U S E O F C H A R A C T E R C L A S S E S */
-/* $Header$ */
+/* $Id$ */
/* As a starter, chars are divided into classes, according to which
token they can be the start of.
/* C O D E G E N E R A T I O N R O U T I N E S */
-/* $Header$ */
+/* $Id$ */
/* Code generation for expressions and coercions
*/
/* C O N S T A N T E X P R E S S I O N H A N D L I N G */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
#include "target_sizes.h"
/* D E B U G G I N G M A C R O */
-/* $Header$ */
+/* $Id$ */
#include "debugcst.h"
/* D E C L A R A T I O N S */
-/* $Header$ */
+/* $Id$ */
{
#include "debug.h"
/* I D E N T I F I E R D E S C R I P T O R S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
struct module {
struct node *mo_priority;/* priority of a module */
/* D E F I N I T I O N M E C H A N I S M */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* D E F I N I T I O N M O D U L E S */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* D E S I G N A T O R E V A L U A T I O N */
-/* $Header$ */
+/* $Id$ */
/* Code generation for designators.
This file contains some routines that generate code common to address
/* D E S I G N A T O R D E S C R I P T I O N S */
-/* $Header$ */
+/* $Id$ */
/* Generating code for designators is not particularly easy, especially if
you don't know wether you want the address or the value.
/* H I G H L E V E L S Y M B O L E N T R Y */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* E R R O R A N D D I A G N O S T I C R O U T I N E S */
-/* $Header$ */
+/* $Id$ */
/* This file contains the (non-portable) error-message and diagnostic
giving functions. Be aware that they are called with a variable
/* E X P R E S S I O N S */
-/* $Header$ */
+/* $Id$ */
{
#include "debug.h"
/* F I L E D E S C R I P T O R S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
struct f_info {
unsigned short f_lineno;
/* I N S T A N T I A T I O N O F I D F P A C K A G E */
-/* $Header$ */
+/* $Id$ */
#include "idf.h"
#include <idf_pkg.body>
/* U S E R D E C L A R E D P A R T O F I D F */
-/* $Header$ */
+/* $Id$ */
struct id_u {
int id_res;
/* I N S T A N T I A T I O N O F I N P U T P A C K A G E */
-/* $Header$ */
+/* $Id$ */
#include "f_info.h"
struct f_info file_info;
/* I N S T A N T I A T I O N O F I N P U T M O D U L E */
-/* $Header$ */
+/* $Id$ */
#include "inputtype.h"
/* L O O K U P R O U T I N E S */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* M A I N P R O G R A M */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* S O M E G L O B A L V A R I A B L E S */
-/* $Header$ */
+/* $Id$ */
extern char options[]; /* indicating which options were given */
cat <<'--EOT--'
/* Generated by make.tokcase */
-/* $Header$ */
+/* $Id$ */
#include "Lpars.h"
char *
/* M I S C E L L A N E O U S R O U T I N E S */
-/* $Header$ */
+/* $Id$ */
#include <alloc.h>
#include <em_arith.h>
/* M I S C E L L A N E O U S */
-/* $Header$ */
+/* $Id$ */
#define is_anon_idf(x) ((x)->id_text[0] == '#')
#define id_not_declared(x) (not_declared("identifier", (x), ""))
/* N O D E O F A N A B S T R A C T P A R S E T R E E */
-/* $Header$ */
+/* $Id$ */
struct node {
char nd_class; /* kind of node */
/* N O D E O F A N A B S T R A C T P A R S E T R E E */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* U S E R O P T I O N - H A N D L I N G */
-/* $Header$ */
+/* $Id$ */
#include "idfsize.h"
/* O V E R A L L S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
{
#include "debug.h"
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make Modula-2 compiler
/* R E A L C O N S T A N T D E S C R I P T O R D E F I N I T I O N */
-/* $Header$ */
+/* $Id$ */
#include <flt_arith.h>
/* S C O P E M E C H A N I S M */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* S C O P E M E C H A N I S M */
-/* $Header$ */
+/* $Id$ */
#define OPENSCOPE 0 /* Indicating an open scope */
#define CLOSEDSCOPE 1 /* Indicating a closed scope (module) */
/* D E B U G G E R S Y M B O L T A B L E */
-/* $Header$ */
+/* $Id$ */
#include "dbsymtab.h"
/* S T A N D A R D P R O C E D U R E S A N D F U N C T I O N S */
-/* $Header$ */
+/* $Id$ */
#define S_ABS 1
#define S_CAP 2
/* S T A T E M E N T S */
-/* $Header$ */
+/* $Id$ */
{
#include <assert.h>
/* T E M P O R A R Y V A R I A B L E S */
-/* $Header$ */
+/* $Id$ */
/* Code for the allocation and de-allocation of temporary variables,
allowing re-use.
/* T O K E N D E F I N I T I O N S */
-/* $Header$ */
+/* $Id$ */
#include "tokenname.h"
#include "Lpars.h"
/* T O K E N N A M E S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
struct tokenname { /* Used for defining the name of a
token as identified by its symbol
/* T Y P E D E S C R I P T O R S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
#include "dbsymtab.h"
/* T Y P E D E F I N I T I O N M E C H A N I S M */
-/* $Header$ */
+/* $Id$ */
#include "debug.h"
/* T Y P E E Q U I V A L E N C E */
-/* $Header$ */
+/* $Id$ */
/* Routines for testing type equivalence, type compatibility, and
assignment compatibility
/* P A R S E T R E E W A L K E R */
-/* $Header$ */
+/* $Id$ */
/* Routines to walk through parts of the parse tree, and generate
code for these parts.
/* P A R S E T R E E W A L K E R */
-/* $Header$ */
+/* $Id$ */
/* Definition of WalkNode macro
*/
/* W A R N I N G C L A S S E S */
-/* $Header$ */
+/* $Id$ */
/* Warning classes, at the moment three of them:
Strict (R)
(*
Module: Mnemonics for ASCII control characters
From: ???
- Version: $Header$
+ Version: $Id$
*)
CONST
/*
Module: Access to program arguments and environment
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
extern char **argv, **environ;
(*
Module: Access to program arguments and environment
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
VAR Argc: CARDINAL; (* Number of program arguments, including the program
(*
Module: Array sorting module
Author: Ceriel J.H. Jacobs
- Date: $Header$
+ Date: $Id$
Interface is like the qsort() interface in C, so that an array of values
can be sorted. This does not mean that it has to be an ARRAY, but it does
(*
Module: Array sorting module.
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM SYSTEM IMPORT ADDRESS, BYTE; (* no generics in Modula-2, sorry *)
From: "A Modula-2 Implementation of CSP",
M. Collado, R. Morales, J.J. Moreno,
SIGPlan Notices, Volume 22, Number 6, June 1987.
- Version: $Header$
+ Version: $Id$
See this article for an explanation of the use of this module.
*)
M. Collado, R. Morales, J.J. Moreno,
SIGPlan Notices, Volume 22, Number 6, June 1987.
Some modifications by Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
See this article for an explanation of the use of this module.
*)
(*
Module: Numeric-to-string conversions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
PROCEDURE ConvertOctal(num, len: CARDINAL; VAR str: ARRAY OF CHAR);
(*
Module: numeric-to-string conversions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
PROCEDURE ConvertNum(num, len, base: CARDINAL;
(*
Module: Interface to some EM instructions and data
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM SYSTEM IMPORT ADDRESS;
;
; Module: Interface to some EM instructions and data
; Author: Ceriel J.H. Jacobs
-; Version: $Header$
+; Version: $Id$
;
mes 2,EM_WSIZE,EM_PSIZE
Module: install module termination procedures to be called at
program termination
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
MODULA-2 offers a facility for the initialization of modules, but there
is no mechanism to have some code executed when the program finishes.
(*
Module: Wirth's Input/Output module
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
*)
CONST EOL = 12C;
(*
Module: Wirth's Input/Output module
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
IMPORT Streams;
;
; Module: Compute non-constant set displays
; Author: Ceriel J.H. Jacobs
-; Version: $Header$
+; Version: $Id$
;
mes 2,EM_WSIZE,EM_PSIZE
(*
Module: Some mathematical functions
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
Exists for compatibility.
A more elaborate math lib can be found in Mathlib.def
(*
Module: Some mathematical functions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
IMPORT Mathlib;
(*
Module: Mathematical functions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
(* Some mathematical constants: *)
(*
Module: Mathematical functions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM EM IMPORT FIF, FEF;
(*
Module: Pascal-like Input/Output
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
This module provides for I/O that is essentially equivalent to the I/O
provided by Pascal with "text", or "file of char".
(*
Module: Pascal-like Input/Output
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM Conversions IMPORT
(*
Module: Processes
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
*)
(*
As discussed in "Unfair Process Scheduling in Modula-2", by
(*
Module: Processes
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
*)
FROM SYSTEM IMPORT ADDRESS, TSIZE, NEWPROCESS, TRANSFER;
(*
Module: string-to-real and real-to-string conversions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
PROCEDURE StringToReal(str: ARRAY OF CHAR; VAR r: REAL; VAR ok: BOOLEAN);
(*
Module: string-to-real and real-to-string conversions
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
(*
Module: InOut for REAL numbers
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
*)
VAR Done: BOOLEAN;
(*
Module: InOut for REAL numbers
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM InOut IMPORT ReadString, WriteString, WriteOct;
/*
Module: SYSTEM
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
/*
(*
Module: Processes with semaphores
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
On systems using quasi-concurrency, the only opportunities for process-
switches are calls to Down and Up.
(*
Module: Processes with semaphores
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
Quasi-concurrency implementation
*)
(*
Module: Dynamic storage allocation
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
*)
(*
Module: Dynamic Storage Allocation
Author: Ceriel J.H. Jacobs
Adapted from a version in C by Hans Tebra
- Version: $Header$
+ Version: $Id$
*)
(* This storage manager maintains an array of lists of objects with the
same size. Commonly used sizes have their own bucket. The larger ones
Module: assign string to character array, with possible 0-byte
extension
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
StringAssign(dstsiz, srcsiz, dstaddr, srcaddr)
register char *dstaddr, *srcaddr;
(*
Module: Stream Input/Output
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
* This module provides sequential IO through streams.
* A stream is either a text stream or a binary stream, and is either in
(*
Module: Stream Input/Output
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
Implementation for Unix
*)
(*
Module: String manipulations
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
(* Note: truncation of strings may occur if the user does not provide
large enough variables to contain the result of the operation.
(*
Module: String manipulations
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
PROCEDURE Assign(source: ARRAY OF CHAR; VAR dest: ARRAY OF CHAR);
(*
Module: interface to some Unix systemcalls
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
This is a stripped down version of Unix.def, needed to compile some of
the modules on small machines
(*
Module: Interface to termcap database
From: Unix manual chapter 3
- Version: $Header$
+ Version: $Id$
*)
(*
(*
Module: Interface to termcap database
From: Unix manual chapter 3
- Version: $Header$
+ Version: $Id$
*)
(*$R-*)
(*
Module: Input/Output to/from terminals
From: "Programming in Modula-2", 3rd, corrected edition, by N. Wirth
- Version: $Header$
+ Version: $Id$
*)
PROCEDURE Read(VAR ch : CHAR);
(*
Module: Input/Output to/from terminals
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
Implementation for Unix.
*)
(*
Module: Facility for handling traps
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
IMPORT EM;
(*
Module: Facility for handling traps
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM EM IMPORT SIG, LINO, FILN, TRP;
(*
Module: interface to some Unix systemcalls
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM SYSTEM IMPORT WORD, ADDRESS;
(*
Module: Interface to termcap database
From: Unix manual chapter 3
- Version: $Header$
+ Version: $Id$
*)
(*$Foreign*)
/*
Module: double abs function
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#ifndef NOFLOAT
double
;
; Module: REAL abs function
; Author: Ceriel J.H. Jacobs
-; Version: $Header$
+; Version: $Id$
;
mes 2,EM_WSIZE,EM_PSIZE
exp $absf
/*
Module: integer abs function
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
absi(i)
/*
Module: longint abs function
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
long
absl(i)
/*
Module: block moves
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#if _EM_WSIZE==_EM_PSIZE
/*
Module: cap; implementation of CAP
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
cap(u)
/*
Module: default modula-2 trap handler
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#include <em_abs.h>
#include <m2_traps.h>
/*
Module: runtime support for conformant arrays
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#include <m2_traps.h>
/*
Module: implementation of DIV and MOD
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
Reason: We cannot use DVI and RMI, because DVI rounds towards 0
and Modula-2 requires truncation
*/
/*
Module: program termination routines
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#define MAXPROCS 32
;
; Module: Modula-2 runtime startoff
; Author: Ceriel J.H. Jacobs
-; Version: $Header$
+; Version: $Id$
;
mes 2,EM_WSIZE,EM_PSIZE
/*
Module: initialization and some global vars
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#include <signal.h>
/*
Module: get value on stack, byte by byte
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#include <m2_traps.h>
;
; Module: coroutine primitives
; Author: Kees Bot, Edwin Scheffer, Ceriel Jacobs
-; Version: $Header$
+; Version: $Id$
;
mes 2,EM_WSIZE,EM_PSIZE
-# $Header$
+# $Id$
#PARAMS do not remove this line!
(*
Module: random numbers
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
PROCEDURE Random(): CARDINAL;
(*
Module: random numbers
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*)
FROM Unix IMPORT getpid, time;
*
* Module: range checks for INTEGER, now for array indexing
* Author: Ceriel J.H. Jacobs
- * Version: $Header$
+ * Version: $Id$
*/
#include <em_abs.h>
*
* Module: range checks for INTEGER
* Author: Ceriel J.H. Jacobs
- * Version: $Header$
+ * Version: $Id$
*/
#include <em_abs.h>
*
* Module: range checks for LONGINT
* Author: Ceriel J.H. Jacobs
- * Version: $Header$
+ * Version: $Id$
*/
#include <em_abs.h>
*
* Module: range checks for CARDINAL
* Author: Ceriel J.H. Jacobs
- * Version: $Header$
+ * Version: $Id$
*/
#include <em_abs.h>
*
* Module: range checks for LONGCARD
* Author: Ceriel J.H. Jacobs
- * Version: $Header$
+ * Version: $Id$
*/
#include <em_abs.h>
Module: Mapping of Unix signals to EM traps
(only when not using the MON instruction)
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#if !defined(__em22) && !defined(__em24) && !defined(__em44)
/*
Module: Dummy priority routines
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
static unsigned prio = 0;
/*
Module: store values from stack, byte by byte
Author: Ceriel J.H. Jacobs
- Version: $Header$
+ Version: $Id$
*/
#include <m2_traps.h>
*
* Module: CARDINAL operations with overflow checking
* Author: Ceriel J.H. Jacobs
- * Version: $Header$
+ * Version: $Id$
*/
#ifndef EM_WSIZE
/* L E X I C A L A N A L Y S E R F O R M O D U L A - 2 */
-/* $Header$ */
+/* $Id$ */
#include <alloc.h>
#include "idfsize.h"
/* stripped down version of the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
/* Token structure. Keep it small, as it is part of a parse-tree node
*/
/* stripped down version from the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
/* Defines the LLmessage routine. LLgen-generated parsers require the
existence of a routine of that name.
% character tables for mod2 compiler
-% $Header$
+% $Id$
%S129
%F %s,
%
/* U S E O F C H A R A C T E R C L A S S E S */
-/* $Header$ */
+/* $Id$ */
/* As a starter, chars are divided into classes, according to which
token they can be the start of.
/* stripped down version of the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
ProcedureHeading :
PROCEDURE IDENT
/* E R R O R A N D D I A G N O S T I C R O U T I N E S */
/* stripped down version from the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
/* This file contains the error-message and diagnostic
giving functions. Be aware that they are called with a variable
/* stripped down version of the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
qualident :
IDENT
/* F I L E D E S C R I P T O R S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
struct f_info {
unsigned short f_lineno;
/* I N S T A N T I A T I O N O F I D F P A C K A G E */
-/* $Header$ */
+/* $Id$ */
#include "idf.h"
#include <idf_pkg.body>
/* U S E R D E C L A R E D P A R T O F I D F */
-/* $Header$ */
+/* $Id$ */
#include "file_list.h"
/* I N S T A N T I A T I O N O F I N P U T P A C K A G E */
-/* $Header$ */
+/* $Id$ */
#include "f_info.h"
struct f_info file_info;
/* I N S T A N T I A T I O N O F I N P U T M O D U L E */
-/* $Header$ */
+/* $Id$ */
#include "inputtype.h"
/* L I B R A R Y */
-/* $Header$ */
+/* $Id$ */
#include <em_path.h>
#include <alloc.h>
/* stripped down version from the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
#include <alloc.h>
/* S O M E G L O B A L V A R I A B L E S */
-/* $Header$ */
+/* $Id$ */
extern char **DEFPATH; /* search path for DEFINITION MODULE's */
extern int mDEF, nDEF;
cat <<'--EOT--'
/* Generated by make.tokcase */
-/* $Header$ */
+/* $Id$ */
#include "Lpars.h"
char *
/* stripped version from the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
#include "f_info.h"
#include "idf.h"
/* stripped down version from the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
#include <alloc.h>
#include "main.h"
/* stripped down version of the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
/*
The grammar as given by Wirth is already almost LL(1); the
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make Modula-2 makefile generator
/* stripped down version from the one in the Modula-2 compiler */
-/* $Header$ */
+/* $Id$ */
{
#include "idf.h"
/* T O K E N D E F I N I T I O N S */
-/* $Header$ */
+/* $Id$ */
#include "tokenname.h"
#include "Lpars.h"
/* T O K E N N A M E S T R U C T U R E */
-/* $Header$ */
+/* $Id$ */
struct tokenname { /* Used for defining the name of a
token as identified by its symbol
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
%{
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make occam compiler
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/* chan_struct.c - channel routines for more structured objects */
#include "ocm_chan.h"
-/* $Header$ */
+/* $Id$ */
/* channel.c - basic channel handling routines */
#include <errno.h>
#ifndef __BSD4_2
-/* $Header$ */
+/* $Id$ */
/* co.c - Routines to handle coroutines */
#include "ocm_proc.h"
-/* $Header$ */
+/* $Id$ */
long now()
{
extern int deadlock;
-/* $Header$ */
+/* $Id$ */
/* ocrt.c - Occam runtime support */
#include "ocm_chan.h"
-/* $Header$ */
+/* $Id$ */
/* par.c - Routines to simulate parallelism */
#include "ocm_proc.h"
-/* $Header$ */
+/* $Id$ */
/* parco.c - Common routines for simulating parallelism or coroutines on
* machines with downward growing stacks
*/
cat <<'--EOT--'
/* Generated by make.tokcase */
-/* $Header$ */
+/* $Id$ */
#include "Lpars.h"
char *
-# $Header$
+# $Id$
# C compilation part. Not to be called directly.
# Instead, it is to be called by the Makefile.
-# $Header$
+# $Id$
# make Pascal compiler
/* D E B U G G E R S Y M B O L T A B L E */
-/* $Header$ */
+/* $Id$ */
#include "dbsymtab.h"
-# $Header$
+# $Id$
head:
echo This Makefile needs arguments
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#define __NO_DEFS
#include <math.h>
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
#
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
#ifndef NOFLOAT
#if __STDC__
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
#
-; $Header$
+; $Id$
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
; This product is part of the Amsterdam Compiler Kit.
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#define __NO_DEFS
#include <math.h>
#include <pc_err.h>
#
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
#
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
#
-; $Header$
+; $Id$
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
; This product is part of the Amsterdam Compiler Kit.
#
-; $Header$
+; $Id$
mes 2,EM_WSIZE,EM_PSIZE
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
#
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#define __NO_DEFS
#include <math.h>
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
#
-; $Header$
+; $Id$
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
; This product is part of the Amsterdam Compiler Kit.
#define PROC 0
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#define __NO_DEFS
#include <math.h>
* Author: Ceriel J.H. Jacobs
*/
-/* $Header$ */
+/* $Id$ */
#define __NO_DEFS
#include <math.h>
#include <pc_err.h>
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
#
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
#
-; $Header$
+; $Id$
;
; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
-# $Header$
+# $Id$
FLOATS=
# for machines without floating point:
#
program callc(input,output) ;
var success: integer ;
-procedure rcsid ; begin writeln('$Header$') end ;
+procedure rcsid ; begin writeln('$Id$') end ;
function kwad(val:integer) : integer ; extern ;
procedure cmain ; extern ;
procedure incs ; begin success:=success+1 end ;
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
#include <stdio.h>
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
typedef struct {
int (*p_func)() ;
-{ $Header$ }
+{ $Id$ }
procedure machar (var ibeta , it , irnd , ngrd , machep , negep , iexp,
minexp , maxexp : integer ; var eps , epsneg , xmin , xmax : real ) ;
{ This program can be used to test out PASCAL compilers }
const
- rcsversion='$Header$';
+ rcsversion='$Id$';
ONE=1; TWO=2; TEN=10; FIFTY=50; MINONE=-1;
#ifndef NOFLOAT
RR1=1.0; RR1H=1.5; RR2=2.0; RR3=3.0; RR4=4.0; RRMINONE=-1.0;
{ This program can be used to test out PASCAL compilers }
const
- rcsversion='$Header$';
+ rcsversion='$Id$';
kew='q';
#ifndef NOFLOAT
eps = 2.0e-7; { This constant is machine dependent }
{ The Berkeley and EM-1 compilers both can handle this program }
-const rcsversion='$Header$';
+const rcsversion='$Id$';
type wavelength = (red,blue,yellow,q1,q2,q3,q4,q5,q6,q7,q8,q9,q10,q11,
pink,green,orange);
spectrum= set of wavelength;
program t4(input,output);
{ Tests for the EM-1 compiler }
-const rcsversion='$Header$';
+const rcsversion='$Id$';
type vec = array[1..1000] of integer;
spectrum = set of (red,blue,yellow);
#ifndef NOFLOAT
{$i1000}
program test(output);
-const rcsversion='$Header$';
+const rcsversion='$Id$';
var b:false..true;
i:integer;
s:set of 0..999;
}
program tstenc(output);
-const rcsversion='$Header$';
+const rcsversion='$Id$';
trapno=150;
var level:integer;
beenhere:boolean;
# (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
-# $Header$
+# $Id$
#
# Don't generate line updating code by default (i.e.: -L flag provided to cem).
# To put it on again: use -NL
-# $Header$
+# $Id$
var w=2
var p=4
var s=2
-# $Header$
+# $Id$
var w=4
var p=4
var s=2
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Mostek 6500 options.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Mostek 6500 dependent C declarations.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Mostek 6500 tokens.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Mostek 6500 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* Mostek 6500 special routines.
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define ex_ap(y) fprintf(codefile,".extern %s\n",y)
#define in_ap(y) /* nothing */
-"$Header$"
+"$Id$"
#define em_bsize 2 /* must be equal to EM_BSIZE */
#define ND !defined($1)
#define D defined($1)
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Motorola 6800 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Motorola 6800 C declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Motorola 6800 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Motorola 6800 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* Motorola 6800 special routines
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Motorola 6805 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Motorola 6805 C declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Motorola 6805 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Motorola 6805 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* Motorola 6805 special routines
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Motorola 6809 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Motorola 6809 C declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Motorola 6809 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Motorola 6809 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* Motorola 6809 special routines
-/* $Header: mach2.c, V1.4 15-Mar-89 AJM */
+/* $Id: mach2.c, V1.4 15-Mar-89 AJM */
%token <y_word> COND
%token <y_word> LINK
%token <y_word> BRANCH
-/* $Header: mach3.c, v2.0 23-Feb-89 AJM */
+/* $Id: mach3.c, v2.0 23-Feb-89 AJM */
0, COND, 0x00000000, ".EQ",
0, COND, 0x10000000, ".NE",
-/* $Header: mach4.c, v1.9 15-Mar-89 AJM */
+/* $Id: mach4.c, v1.9 15-Mar-89 AJM */
operation : BRANCH optlink expr
{branch($1, $2, $3.val);}
-/* $Header: mach5.c, v3.3 25-Apr-89 AJM */
+/* $Id: mach5.c, v3.3 25-Apr-89 AJM */
branch(brtyp, link, val)
word_t brtyp;
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#define MAXBYTE 24
#include <stdio.h>
#include <out.h>
-# $Header$
+# $Id$
#PARAMS do not remove this line!
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
#define CODE_GENERATOR for code generator
-# $Header$
+# $Id$
#PARAMS do not remove this line!
#include <out.h>
#ifndef NORCSID
-static char rcs_id[] = "$Header$" ;
+static char rcs_id[] = "$Id$" ;
#endif
#define ENTRY 0x0L /* entry point */
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.define ___Get_PC, ___Set_PC, ___u_LiB
.sect .text; .sect .rom; .sect .data
-! $Header$
+! $Id$
! This is the machine-dependant part of the ACK debugger support.
! ___Get_PC takes a frame pointer (local base) argument and returns the
.define .cmf4, .cmf8
.sect .text; .sect .rom; .sect .data; .sect .bss
-! $Header$
+! $Id$
! Implement interface to floating point package for Intel 8087
*/
#ifndef NORCSID
-static char rcs_m[]= "$Header$" ;
+static char rcs_m[]= "$Id$" ;
static char rcs_mh[]= ID_MH ;
#endif
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
#ifndef NORCSID
-#define ID_MH "$Header$"
+#define ID_MH "$Id$"
#endif
#define ex_ap(y) fprintf(codefile,".extern %s\n",y)
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-rscid = "$Header$"
+rscid = "$Id$"
/*
* Back end tables for Intel 80386
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Intel 8080 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Intel 8080 register names
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Intel 8080 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Intel 8080 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
*/
#ifndef NORCSID
-static char rcsid[]= "$Header$" ;
+static char rcsid[]= "$Id$" ;
#endif
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define ex_ap(y) fprintf(codefile,".extern %s\n",y)
#define in_ap(y) /* nothing */
/************************************************************/
-rcsid = "$Header$"
+rcsid = "$Id$"
EM_WSIZE = 2
EM_PSIZE = 2
-# $Header$
+# $Id$
#PARAMS do not remove this line!
#include <out.h>
#ifndef NORCSID
-static char rcs_id[] = "$Header$" ;
+static char rcs_id[] = "$Id$" ;
#endif
#define ENTRY 0x0 /* entry point */
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.define .cmf4, .cmf8
.sect .text; .sect .rom; .sect .data; .sect .bss
-! $Header$
+! $Id$
! Implement interface to floating point package for Intel 8087
*/
#ifndef NORCSID
-static char rcs_m[]= "$Header$" ;
+static char rcs_m[]= "$Id$" ;
static char rcs_mh[]= ID_MH ;
#endif
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
#ifndef NORCSID
-#define ID_MH "$Header$"
+#define ID_MH "$Id$"
#endif
#define ex_ap(y) fprintf(codefile,".extern %s\n",y)
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-rscid = "$Header$"
+rscid = "$Id$"
/*
* Back end tables for Intel 8086, 80286
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.define ___Get_PC, ___Set_PC, ___u_LiB
.sect .text; .sect .rom; .sect .data
-! $Header$
+! $Id$
! This is the machine-dependant part of the ACK debugger support.
! ___Get_PC takes a frame pointer (local base) argument and returns the
.sect .data
.sect .bss
-! $Header$
+! $Id$
! Implement interface to floating point package for M68881
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-rscid = "$Header$"
+rscid = "$Id$"
/********************************
* *
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
#include "out.h"
#ifndef NORCSID
-static char rcs_id[] = "$Header$" ;
+static char rcs_id[] = "$Id$" ;
#endif
/* BUG:
#include "out.h"
#ifndef NORCSID
-static char rcs_id[] = "$Header$" ;
+static char rcs_id[] = "$Id$" ;
#endif
#define ASSERT(x) switch (2) { case 0: case (x): ; }
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
/*
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#define MAXBYTE 24
#include <stdio.h>
#include <out.h>
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.sect .data
.sect .bss
-! $Header$
+! $Id$
! Implement interface to floating point package for M68881
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-rscid = "$Header$"
+rscid = "$Id$"
/********************************
* *
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
.sect .data
.sect .bss
-! $Header$
+! $Id$
! Implement interface to floating point package for M68881
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-rscid = "$Header$"
+rscid = "$Id$"
/********************************
* *
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-.\" $Header$
+.\" $Id$
.TH EM 1 "$Revision$"
.ad
.SH NAME
#include <em_path.h>
#include <local.h>
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
#define MAGIC 07255
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-rscid = "$Header$"
+rscid = "$Id$"
/********************************
* *
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* NS 16032 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* NS 16032 C declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* NS 16032 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* NS 16032 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* NS 16032 special routines
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .strhp
- ! $Header$
+ ! $Id$
.strhp:
*/
#ifndef NORCSID
-static char rcsid[] = "$Header$" ;
+static char rcsid[] = "$Id$" ;
#endif
con_part(sz, w)
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define ex_ap(y) fprintf(codefile,".extern %s\n",y)
#define in_ap(y) /* nothing */
-rcsid = "$Header$"
+rcsid = "$Id$"
/*****************************************************************
* *
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* PDP 11 machine dependent options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
#
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* PDP 11 machine dependent yacc declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*,
* PDP 11 keywords,
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/* The next define switches between codegeneration for an ACK assembler
* or for the standard UNIX V7 assembler.
-"$Header$"
+"$Id$"
/********************************************************
* Back end tables for pdp 11 *
* Authors : Ceriel J.H. Jacobs,Hans van Staveren *
#include <out.h>
#ifndef NORCSID
-static char rcs_id[] = "$Header$" ;
+static char rcs_id[] = "$Id$" ;
#endif
#define ENTRY 0x0 /* entry point */
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-.\" $Header$
+.\" $Id$
.TH EM 1 "$Revision$"
.ad
.SH NAME
#include <em_path.h>
#include <local.h>
-char rcs_id[] = "$Header$" ;
+char rcs_id[] = "$Id$" ;
#define MAGIC 07255
-.\" $Header$
+.\" $Id$
.tr ~
.TH EMINFORM 1 "$Revision$"
.ad
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.define PRr2,PR2r2,PR4r2,PR6r2
.define PRr2r4,PR2r2r4,PR4r2r4,PR6r2r4
.define RT,RTr2,RTr2r4
-! $Header$
+! $Id$
PR6r2: mov $6,r0;br PRr2
PR4r2: mov $4,r0;br PRr2
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define aar~
-! $Header$
+! $Id$
!r0 : descriptor address
!r1 : element number
.sect .text
.define adf~
.extern setfloat~
-! $Header$
+! $Id$
!size in r0
adf~:
.sect .text
.define adi~
.extern unknown~
-! $Header$
+! $Id$
!size in r0
adi~:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define and~
-! $Header$
+! $Id$
! size in r0
and~:
.sect .text
.define cff~
.extern setfloat~
-! $Header$
+! $Id$
cff~:
mov (sp)+,r1
.sect .text
.define cfi~
.extern setfloat~,setint~
-! $Header$
+! $Id$
cfi~:
mov (sp)+,r1
.sect .text
.define cif~,cuf~
.extern setint~,setfloat~
-! $Header$
+! $Id$
cif~:
mov (sp)+,r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define cii~
-! $Header$
+! $Id$
!convert int to int
! 1 byte -> ? : sign extension
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define cuu~
-! $Header$
+! $Id$
cuu~:
mov (sp)+,r1
.sect .text
.define cmf~
.extern setfloat~
-! $Header$
+! $Id$
cmf~:
jsr pc,setfloat~
.sect .text
.define cmi~
.extern cmi4~,unknown~
-! $Header$
+! $Id$
! Size in r0
cmi~:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define cmi4~
-! $Header$
+! $Id$
cmi4~:
mov (sp)+,r1
.sect .text
.define cms~
.extern save~,retu~
-! $Header$
+! $Id$
cms~:
jsr pc,save~
.sect .text
.define cmu~
.extern unknown~,cmu4~
-! $Header$
+! $Id$
cmu~:
cmp r0,$02
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define cmu4~
-! $Header$
+! $Id$
cmu4~:
mov (sp)+,r1
clr r0
.sect .text
.define csa~
.extern fat~
-! $Header$
+! $Id$
ECASE = 024
.sect .text
.define csb~
.extern fat~
-! $Header$
+! $Id$
ECASE = 024
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define dup~
-! $Header$
+! $Id$
dup~:
mov (sp)+,r3
.sect .text
.define dvf~
.extern setfloat~
-! $Header$
+! $Id$
dvf~:
mov (sp)+,r1
.sect .text
.define dvi~
.extern unknown~,dvi4~
-! $Header$
+! $Id$
dvi~:
mov (sp)+,r3
.sect .text
.define dvi4~
.extern save~,retu~
-! $Header$
+! $Id$
dvi4~:
jsr pc,save~
.sect .text
.define dvu~
.extern unknown~,dvu4~,dvu2~
-! $Header$
+! $Id$
dvu~:
mov (sp)+,r3
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define dvu2~
-! $Header$
+! $Id$
dvu2~:
clr r0
mov 04(sp),r1
.sect .text
.define dvu4~
.extern save~,retu~
-! $Header$
+! $Id$
dvu4~:
jsr pc,save~
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define eret
-! $Header$
+! $Id$
eret:
mov r5,sp
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define exg~
-! $Header$
+! $Id$
exg~: jsr pc,save~
mov sp,r4
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define fef~
.extern setfloat~
-! $Header$
+! $Id$
fef~:
mov (sp)+,r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define fif~
.extern setfloat~
-! $Header$
+! $Id$
fif~:
mov (sp)+,r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define gto~
-! $Header$
+! $Id$
gto~:
mov (sp)+,r4
.sect .text
.define iaar~
.extern aar~,trp~
-! $Header$
+! $Id$
EILLINS = 022
.sect .text
.define ilar~
.extern lar~,trp~
-! $Header$
+! $Id$
EILLINS = 022
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define inn~
-! $Header$
+! $Id$
inn~:
mov r0,-(sp)
.sect .text
.define isar~
.extern sar~,trp~
-! $Header$
+! $Id$
EILLINS = 022
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define lar~
-! $Header$
+! $Id$
lar~:
mov (sp)+,r3
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define los2~
-! $Header$
+! $Id$
los2~:
mov (sp)+,r3
.sect .text
.define mlf~
.extern setfloat~
-! $Header$
+! $Id$
mlf~:
mov (sp)+,r1
.sect .text
.define mli~
.extern unknown~,mli4~
-! $Header$
+! $Id$
mli~:
cmp r0,$04
.sect .text
.define mli4~
.extern save~,retu~
-! $Header$
+! $Id$
mli4~:
jsr pc,save~
.sect .text
.define mlu~
.extern unknown~,mlu4~
-! $Header$
+! $Id$
mlu~:
cmp r0,$04
.sect .text
.define mlu4~
.extern save~,retu~
-! $Header$
+! $Id$
mlu4~:
jsr pc,save~
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
-! $Header$
+! $Id$
.sect .text
.define mon~
.sect .text
.define ngf~
.extern setfloat~
-! $Header$
+! $Id$
ngf~:
jsr pc,setfloat~
.sect .text
.define ngi~
.extern unknown~
-! $Header$
+! $Id$
ngi~:
mov (sp)+,r1
.sect .text
.define nop~
.extern hol0,prf~
-! $Header$
+! $Id$
nop~:
mov hol0,-(sp)
.sect .text
.define prf~
.extern save~,retu~,hol0,printf~
-! $Header$
+! $Id$
prf~:
jsr pc,save~
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define printf~
-! $Header$
+! $Id$
printf~:
mov r2,-(sp)
.sect .text
.define rck~
.extern trp~
-! $Header$
+! $Id$
ERANGE = 1
.sect .text
.define ret~,lfr~
.extern unknown~, retar
-! $Header$
+! $Id$
! Size in r0
ret~:
.sect .text
.define rmi~
.extern unknown~,rmi4~
-! $Header$
+! $Id$
rmi~:
mov (sp)+,r3
.sect .text
.define rmi4~
.extern save~,retu~
-! $Header$
+! $Id$
rmi4~:
jsr pc,save~
.sect .text
.define rmu~
.extern rmu2~,rmu4~,unknown~
-! $Header$
+! $Id$
rmu~:
mov (sp)+,r3
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define rmu2~
-! $Header$
+! $Id$
rmu2~:
mov 04(sp),r1
.sect .text
.define rmu4~
.extern save~,retu~
-! $Header$
+! $Id$
rmu4~:
jsr pc,save~
.sect .text
.define rol~
.extern save~,retu~
-! $Header$
+! $Id$
rol~:
jsr pc,save~
.sect .text
.define ror~
.extern save~,retu~
-! $Header$
+! $Id$
ror~:
asr r0
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define sar~
-! $Header$
+! $Id$
sar~:
mov (sp)+,r3
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define save~,retu~,savearea
-! $Header$
+! $Id$
save~:
mov r5,savearea
.sect .text
.define sbf~
.extern setfloat~
-! $Header$
+! $Id$
sbf~:
mov (sp)+,r1
.sect .text
.define sbi~
.extern unknown~
-! $Header$
+! $Id$
sbi~:
mov (sp)+,r1
.sect .text
.define set~
.extern save~,retu~,trp~
-! $Header$
+! $Id$
ESET = 2
.sect .text
.define setfloat~,setint~
.extern unknown~
-! $Header$
+! $Id$
setfloat~:
cmp r0,$8
.sect .text
.define sim~
.extern trpim~
-! $Header$
+! $Id$
#define float
.sect .text
.define sli~
.extern unknown~
-! $Header$
+! $Id$
sli~:
mov (sp)+,r3
.sect .text
.define sri~
.extern unknown~
-! $Header$
+! $Id$
! Size in r0
sri~:
.sect .text
.define sru~
.extern unknown~
-! $Header$
+! $Id$
sru~:
neg 2(sp)
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define sto2~
-! $Header$
+! $Id$
sto2~:
mov (sp)+,r3
.sect .text
.define strhp~
.extern trp~,reghp~
-! $Header$
+! $Id$
EHEAP = 021
.sect .text
.define trp~,fat~
.extern trppc~,trpim~,savearea,retar
-! $Header$
+! $Id$
fat~:
jsr pc,trp~
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define unknown~
-! $Header$
+! $Id$
.extern fat~
EILLSIZ = 023
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define xor~
.extern save~,retu~
-! $Header$
+! $Id$
xor~:
jsr pc,save~
.define ERANGE,ESET,EHEAP,EILLINS,ECASE
.define hol0,trppc~,trpim~,reghp~,.limhp
.define EXIT,WRITE,BRK
-! $Header$
+! $Id$
#define float 1
#define hardfp 1
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#ifndef NDEBUG
#define assert(x) if(!(x)) badassertion("x",__FILE__,__LINE__)
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
typedef struct {
int t_token; /* kind of token, -1 for register */
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define MAXCREG 4
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
extern int maxply; /* amount of lookahead allowed */
extern int stackheight; /* # of tokens on fakestack */
#ifndef NORCSID
-static char rcsid2[] = "$Header$";
+static char rcsid2[] = "$Id$";
#endif
#include <stdio.h>
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "param.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
typedef struct glosym {
struct glosym *gl_next;
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "param.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include <em_spec.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define BMASK 0377
#define BSHIFT 8
-# $Header$
+# $Id$
#PARAMS do not remove this line!
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifdef REGVARS
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "types.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
struct regvar {
struct regvar *rv_next;
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
struct result {
int e_typ; /* EV_INT,EV_REG,EV_STR */
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define STONSTACK /* if defined state is saved in stackframe */
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#ifndef TEM_WSIZE
TEM_WSIZE should be defined at this point
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "param.h"
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
include file for floating point package
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
include file for floating point package
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
include file for floating point package
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/********************************************************/
/*
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
ADD TWO EXTENDED FORMAT NUMBERS
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
* these are the routines the routines to do 32 and 64-bit addition
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
ADD TWO FLOATS - SINGLE (ADF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
ADD TWO FLOATS - DOUBLE (ADF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT DOUBLE TO SINGLE (CFF 8 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT SINGLE TO DOUBLE (CFF 4 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT FLOAT TO SIGNED (CFI m n)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT FLOAT TO UNSIGNED (CFU m n)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT INTEGER TO SINGLE (CIF n 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT INTEGER TO FLOAT (CIF n 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
COMPARE SINGLES (CMF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
COMPARE DOUBLES (CMF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
COMPACT EXTEND FORMAT INTO FLOAT OF PROPER SIZE
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT INTEGER TO SINGLE (CUF n 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERT INTEGER TO FLOAT (CUF n 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
DIVIDE EXTENDED FORMAT
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
DIVIDE TWO SINGLES - SINGLE Precision (dvf 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
DIVIDE TWO FLOATS - DOUBLE Precision (DVF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
CONVERTS FLOATING POINT TO EXTENDED FORMAT
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
SEPERATE INTO EXPONENT AND FRACTION (FEF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
SEPERATE DOUBLE INTO EXPONENT AND FRACTION (FEF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
MULTIPLY AND DISMEMBER PARTS (FIF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
MULTIPLY AND DISMEMBER PARTS (FIF 8)
; See the copyright notice in the ACK home directory, in the file "Copyright".
;
-; $Header$
+; $Id$
mes 2,EM_WSIZE,EM_PSIZE
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#include <byte_order.h>
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
* Multiply Single Precesion Float (MLF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
* Multiply Double Precision Float (MLF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
ROUTINE TO MULTIPLY TWO EXTENDED FORMAT NUMBERS
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
NEGATE A FLOATING POINT (NGF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
NEGATE A FLOATING POINT (NGF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/********************************************************/
/*
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
SUBTRACT TWO FLOATS - SINGLE Precision (SBF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
SUBTRACT TWO FLOATS - DOUBLE Precision (SBF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
SHIFT TWO EXTENDED NUMBERS INTO PROPER
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
# include "FP_types.h"
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
SUBTRACT 2 EXTENDED FORMAT NUMBERS
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
return a zero float (ZRF 4)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
return a zero double (ZRF 8)
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
/*
ZERO and return EXTEND FORMAT FLOAT
-$Header$
+$Id$
The machine-dependant part of the ACK debugger support requires three
routines:
-/* $Header$ */
+/* $Id$ */
#define DEBUGGEE
#include "message.h"
#
-; $Header$
+; $Id$
mes 2, EM_WSIZE, EM_PSIZE
;
; Module: coroutine primitives
; Author: Kees Bot, Edwin Scheffer, Ceriel Jacobs
-; Version: $Header$
+; Version: $Id$
;
; This has been taken from the ACK Modula-2 runtime system and adapted.
;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#ifndef NDEBUG
#define assert(x) if(!(x)) badassertion("x",__FILE__,__LINE__)
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
typedef struct cost {
short ct_space;
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define MAXCREG 4
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
extern int maxply; /* amount of lookahead allowed */
extern int stackheight; /* # of tokens on fakestack */
#ifndef NORCSID
-static char rcsid2[] = "$Header$";
+static char rcsid2[] = "$Id$";
#endif
#include <stdio.h>
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "param.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
typedef struct glosym {
struct glosym *gl_next;
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "param.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include <em_spec.h>
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define BMASK 0377
#define BSHIFT 8
-# $Header$
+# $Id$
#PARAMS do not remove this line!
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifdef REGVARS
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "types.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
struct regvar {
struct regvar *rv_next;
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
struct result {
int e_typ; /* EV_INT,EV_REG,EV_STR */
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
typedef struct state {
struct state *st_next; /* for linked list */
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "assert.h"
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#ifndef TEM_WSIZE
TEM_WSIZE should be defined at this point
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
#include "param.h"
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Signetics 2650 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Signetics 2650 register names
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Signetics 2650 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Signetics 2650 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* Signetics 2650 special routines
-# $Header$
+# $Id$
# requires a definition for TARGET_HOME, SRC_DIR, COPTIONS, CC
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
#ifndef NORCSID
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif
/* This program converts either human-readable or compact EM
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.globl ___Get_PC, ___Set_PC
-! $Header$
+! $Id$
! This is the machine-dependant part of the ACK debugger support.
! ___Get_PC takes a frame pointer (local base) argument and returns the
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.globl $__Get_PC, $__Set_PC
-! $Header$
+! $Id$
! This is the machine-dependant part of the ACK debugger support.
! $__Get_PC takes a frame pointer (local base) argument and returns the
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
# requires a definition for TARGET_HOME, SRC_DIR, CFLAGS, CC
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* VAX-11 machine dependent options
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* VAX-11 Machine dependent C declarations
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* VAX-11 machine dependent yacc declarations
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* VAX-11 keywords
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* VAX-11 machine dependent yacc syntax rules
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* VAX-11 Machine dependent C declarations
-# $Header$
+# $Id$
# requires a definition for TARGET_HOME, SRC_DIR, CFLAGS, CC
-# $Header$
+# $Id$
#PARAMS do not remove this line!
---------- $Header$ --------
+--------- $Id$ --------
The file "table" is too large. The "cgg" program cannot generate
"tables.h" and "tables.c" on a PDP 11/44.
Therefore the distribution includes two files "tables1.c" and "tables1.h",
#include <stb.h>
#ifndef lint
-static char rcsid[] = "$Header$";
+static char rcsid[] = "$Id$";
#endif /* lint */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-/* $Header$ */
+/* $Id$ */
#define ex_ap(x) fprintf(codefile,".extern\t%s\n",x)
#define in_ap(x) /* nothing */
-"$Header$"
+"$Id$"
#define LOCLABS /* define if target assembler recognizes local labels */
#define REGVARS /* define for register variables */
#define DORCK /* define if you want RCK */
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
- ! $Header$
+ ! $Id$
.define hol0
.define .reghp
#include "em_abs.h"
#include "syscall.h"
- ! $Header$
+ ! $Id$
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define hol0
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
.define ___Get_PC, ___Set_PC, ___u_LiB
.sect .text; .sect .rom; .sect .data
-! $Header$
+! $Id$
! This is the machine-dependant part of the ACK debugger support.
! ___Get_PC takes a frame pointer (local base) argument and returns the
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .aar4
- ! $Header$
+ ! $Id$
.aar4:
movl (sp)+,r2
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .adf
- ! $Header$
+ ! $Id$
.adf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .adi
- ! $Header$
+ ! $Id$
.adi:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .and
- ! $Header$
+ ! $Id$
! bytes in r0
.and:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .ass
- ! $Header$
+ ! $Id$
.ass:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .bls
- ! $Header$
+ ! $Id$
.bls:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cff
- ! $Header$
+ ! $Id$
.cff:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cfi
- ! $Header$
+ ! $Id$
.cfi:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cfu
- ! $Header$
+ ! $Id$
.cfu:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cif
- ! $Header$
+ ! $Id$
.cif:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cii
- ! $Header$
+ ! $Id$
.cii:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cmand
- ! $Header$
+ ! $Id$
! bytes in r0
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cmf
- ! $Header$
+ ! $Id$
.cmf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cmi
- ! $Header$
+ ! $Id$
.cmi:
movl (sp)+,r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cms
- ! $Header$
+ ! $Id$
! bytes in r0
.cms:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cmu
- ! $Header$
+ ! $Id$
.cmu:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .com
- ! $Header$
+ ! $Id$
! bytes in r0
.com:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .csa4
- ! $Header$
+ ! $Id$
.csa4:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .csb4
- ! $Header$
+ ! $Id$
.csb4:
.define .csa
.define .csb
- ! $Header$
+ ! $Id$
.csa:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cuf
- ! $Header$
+ ! $Id$
.cuf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cui
- ! $Header$
+ ! $Id$
.cui:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cuu
- ! $Header$
+ ! $Id$
.cuu:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .dus
- ! $Header$
+ ! $Id$
.dus:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .dvf
- ! $Header$
+ ! $Id$
.dvf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .dvi
- ! $Header$
+ ! $Id$
.dvi:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .dvu
- ! $Header$
+ ! $Id$
.dvu:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .dvu4
- ! $Header$
+ ! $Id$
.dvu4:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .exg
- ! $Header$
+ ! $Id$
! bytes in r0
.exg:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .fat
- ! $Header$
+ ! $Id$
.fat:
pushl (sp)
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .fef
- ! $Header$
+ ! $Id$
.fef:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .fif
- ! $Header$
+ ! $Id$
.sect .rom
Ione: .data1 0200, 077, 00, 00, 00, 00, 00, 00
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .gto
- ! $Header$
+ ! $Id$
.extern .strlb
! Nonlocal goto.
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .inn
- ! $Header$
+ ! $Id$
! bytes in r0
.inn:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .ior
- ! $Header$
+ ! $Id$
! bytes in r0
.ior:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .lar4
- ! $Header$
+ ! $Id$
.lar4:
movl (sp)+,r2
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .los
- ! $Header$
+ ! $Id$
.los:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .lpb
- ! $Header$
+ ! $Id$
! special version to work with A68S, by CHL
! compute AB, given LB
.lpb:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .lxa
- ! $Header$
+ ! $Id$
.lxa:
jsb .lxl ! Find local base
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .lxl
- ! $Header$
+ ! $Id$
! nlevels in r0 (>=2)
.lxl:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .mlf
- ! $Header$
+ ! $Id$
.mlf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .mli
- ! $Header$
+ ! $Id$
.mli:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .mon
- ! $Header$
+ ! $Id$
.mon:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .ngf
- ! $Header$
+ ! $Id$
.ngf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .ngi
- ! $Header$
+ ! $Id$
.ngi:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .nop
- ! $Header$
+ ! $Id$
.nop:
.define printd
.define printc
- ! $Header$
+ ! $Id$
printd:
clrl r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rck
- ! $Header$
+ ! $Id$
.rck:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rck4
- ! $Header$
+ ! $Id$
.rck4:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rmi
- ! $Header$
+ ! $Id$
.rmi:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rmu
- ! $Header$
+ ! $Id$
.rmu:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rmu4
- ! $Header$
+ ! $Id$
.rmu4:
movl (sp)+,r3
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rol
- ! $Header$
+ ! $Id$
.rol:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .ror
- ! $Header$
+ ! $Id$
.ror:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sar4
- ! $Header$
+ ! $Id$
.sar4:
movl (sp)+,r2
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sbf
- ! $Header$
+ ! $Id$
.sbf:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sbi
- ! $Header$
+ ! $Id$
.sbi:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sbs
- ! $Header$
+ ! $Id$
.sbs:
movl (sp)+,r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .setx
- ! $Header$
+ ! $Id$
! bytes in r0
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sig
- ! $Header$
+ ! $Id$
.sig:
movl (sp)+,r1
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sim
- ! $Header$
+ ! $Id$
.sim:
movl (sp)+,r0
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sli
- ! $Header$
+ ! $Id$
.sli:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sri
- ! $Header$
+ ! $Id$
.sri:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sru
- ! $Header$
+ ! $Id$
.sru:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .strhp
- ! $Header$
+ ! $Id$
.strhp:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .strlb
- ! $Header$
+ ! $Id$
! revised version by CHL
! Store the value that is on the stack in fp.
! Compute ap.
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .sts
- ! $Header$
+ ! $Id$
.sts:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .trp
- ! $Header$
+ ! $Id$
.trp:
pushl r0
.define .sar
.define .aar
- ! $Header$
+ ! $Id$
.lar:
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .xor
- ! $Header$
+ ! $Id$
! bytes in r0
.xor:
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
- ! $Header$
+ ! $Id$
.define hol0
.define .reghp
#include <out.h>
#ifndef NORCSID
-static char rcs_id[] = "$Header$" ;
+static char rcs_id[] = "$Id$" ;
#endif
#define ENTRY 0x0L /* entry point */
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
* Zilog Z80 options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
* Zilog Z80 dependent C declarations.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
* Zilog Z80 tokens
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
* Zilog Z80 keywords
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
/*
* Zilog Z80 special routines
*/
#ifndef NORCSID
-static char rcs_mach[] = "$Header$" ;
+static char rcs_mach[] = "$Id$" ;
static char rcs_h[] = RCS_H ;
#endif
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
#ifndef NORCSID
-#define RCS_H "$Header$"
+#define RCS_H "$Id$"
#endif
#define ex_ap(y) fprintf(codefile,".extern %s\n",y)
-"$Header$"
+"$Id$"
/********************************************************************
**** ****
**** Z 8 0 B A C K E N D T A B L E S ****
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-# $Header$
+# $Id$
#PARAMS do not remove this line!
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID0 "$Header$"
+#define RCSID0 "$Id$"
/*
** Zilog z8000 machine dependent options
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID1 "$Header$"
+#define RCSID1 "$Id$"
/*
** Zilog z8000 machine dependent C declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID2 "$Header$"
+#define RCSID2 "$Id$"
/*
** Zilog z8000 machine dependent yacc declarations
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID3 "$Header$"
+#define RCSID3 "$Id$"
/*
** Zilog z8000 keywords
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID4 "$Header$"
+#define RCSID4 "$Id$"
/*
** Zilog z8000 yacc parsing rules
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
-#define RCSID5 "$Header$"
+#define RCSID5 "$Id$"
settype( type )
int type;
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-/* $Header$ */
+/* $Id$ */
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
-"$Header$"
+"$Id$"
#define SL 6
#define SSL "6"
/* savsize is 6 because size of LB is 2 and size of z8000-PC is 4 */
-.\" $Header$
+.\" $Id$
.TH 6500_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH 6800_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH 6805_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH 6809_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH 8080_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH EM_CG 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH EM_NCG 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH I386_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH I86_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH LIBMON 7 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH LIBPC 7 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH M68K2_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH NS_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH PC_PRLIB 7 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH PDP_AS 6 "$Revision$"
.ad
.SH NAME
-# $Header$
+# $Id$
#PARAMS do not remove this line!
-.\" $Header$
+.\" $Id$
.TH UNI_ASS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH Z8000_AS 6 "$Revision$"
.ad
.SH NAME
-.\" $Header$
+.\" $Id$
.TH Z80_AS 6 "$Revision$"
.ad
.SH NAME