|
|
BSD 4.3reno
/*
* Copyright (c) 1983 The Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that: (1) source distributions retain this entire copyright
* notice and comment, and (2) distributions including binaries display
* the following acknowledgement: ``This product includes software
* developed by the University of California, Berkeley and its contributors''
* in the documentation or other materials provided with the distribution
* and in all advertising materials mentioning features or use of this
* software. Neither the name of the University nor the names of its
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
*
* @(#)defs.h 5.4 (Berkeley) 6/1/90
*/
/*
* Public definitions, common to all.
*/
#include <stdio.h>
#ifdef sgi
# define double long float
# define atof _latof
# define IRIS
# define mc68000
#endif
#define new(type) ((type) malloc(sizeof(struct type)))
#define newarr(type, n) ((type *) malloc((unsigned) (n) * sizeof(type)))
#define dispose(ptr) { free((char *) ptr); ptr = 0; }
#define public
#define private static
#define ord(enumcon) ((unsigned int) enumcon)
#define nil 0
#define and &&
#define or ||
#define not !
#define div /
#define mod %
#define max(a, b) ((a) > (b) ? (a) : (b))
#define min(a, b) ((a) < (b) ? (a) : (b))
#define assert(b) { \
if (not(b)) { \
panic("assertion failed at line %d in file %s", __LINE__, __FILE__); \
} \
}
#define badcaseval(v) { \
panic("unexpected value %d at line %d in file %s", v, __LINE__, __FILE__); \
}
#define checkref(p) { \
if (p == nil) { \
panic("reference through nil pointer at line %d in file %s", \
__LINE__, __FILE__); \
} \
}
typedef int Integer;
typedef int integer;
typedef char Char;
typedef double Real;
typedef double real;
typedef enum { false, true } Boolean;
typedef Boolean boolean;
typedef char *String;
#define strdup(s) strcpy(malloc((unsigned) strlen(s) + 1), s)
#define streq(s1, s2) (strcmp(s1, s2) == 0)
typedef FILE *File;
typedef int Fileid;
typedef String Filename;
#define get(f, var) fread((char *) &(var), sizeof(var), 1, f)
#define put(f, var) fwrite((char *) &(var), sizeof(var), 1, f)
#undef FILE
extern long atol();
extern double atof();
extern char *malloc();
extern String strcpy(), index(), rindex();
extern int strlen();
extern String cmdname;
extern String errfilename;
extern short errlineno;
extern int debug_flag[];
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.