#define SYSVER "      Unix System V Routines V1.0.1 Beta created 14:13 03/19/90"
#define DEFARCNAM ".arc"
#define DEFWRKNAM ".tmp"
#define DEFBAKNAM ".bak"
#define ALLFILES  "*"

#if defined(__STDC__) || defined(__GNUC__)
#define PROTO(x) x
#else
#define PROTO(x) ()
#endif

#include "arcs.h"

#define coreleft() (~(unsigned)0 >> 1)
#define opnarcrd(p) fopen(p, "r")
#define opnarcwr(p) fopen(p, "w")
#define clsarc(f, name, date, time) clsfil(f, name, date, time)
#define opnfilrd(p) fopen(p, image ? "rb" : "r")
#define remove(p) unlink(p)
#define putc_tst(c, t) \
   do { if (t && putc(c,t)==EOF) fatal("Write fail (disk full?)"); } while(0)
#define runarc(num, arg) puts("Error - run not supported on Unix (yet)")

void clsfil PROTO((FILE *, char *, unsigned, unsigned));
void getstamp PROTO((FILE *, unsigned short *, unsigned short *));
void fatal PROTO(());
char *dir PROTO((char *));
void rempath PROTO((int, char **));
char *strupr PROTO((char *));
char *makefnam PROTO((char *, char *, char *));
char *basename PROTO((char *));
FILE *opnfilwr PROTO((char *));
int getfilch PROTO((FILE *));
int putfilch PROTO((int, FILE *));
int readhdr PROTO((struct heads *, FILE *));
void writehdr PROTO((struct heads *, FILE *));
void filecopy PROTO((FILE *, FILE *, long));

int unlink PROTO((const char *));