#define get1(f) ((unsigned long) fgetc(f))
#define sget1(f) ((long) ((char) fgetc(f)))

extern char *outfname, *infname, *user, *host, *pgmnam, efn[256];
extern FILE *ef;
extern int olderrfd,debugging;

/*VARARGS1*/
extern debug();
/* debug(fmt,a,b,c,d,e)
 *     char *fmt;
 *     long a,b,c,d,e;
 */

/*VARARGS1*/
extern croak();
/* croak(fmt,a,b,c,d,e)
 *     char *fmt;
 *     long a,b,c,d,e;
 */

extern swallow();
/* swallow(nchars,f)
 *     long nchars;
 *     FILE *f;
 */

extern unsigned long get2();
/* unsigned long get2(f)
 *     FILE *f;
 */

extern unsigned long get3();
/* unsigned long get3(f)
 *     FILE *f;
 */

extern unsigned long get4();
/* unsigned long get4(f)
 *     FILE *f;
 */

extern long sget2();
/* long sget2(f)
 *     FILE *f;
 */

extern long sget3();
/* long sget3(f)
 *     FILE *f;
 */

extern long sget4();
/* long sget4(f)
 *     FILE *f;
 */

extern put4();
/* put4(l,f)
 *     unsigned long l;
 *     FILE *f;
 */

extern put2();
/* put2(s,f)
 *     unsigned short s;
 *     FILE *f;
 */