Changes for TEXMF.H by Andreas Scherer, April 5, 1995.

@x l.13
#include "cpascal.h"
@y
#include "andycpascal.h"
@z

@x l.15
#ifdef TeX
#define dump_file fmtfile
#define dump_path TEXFORMATPATH
#define write_out writedvi
#define out_file dvifile
#define out_buf dvibuf
#else /* not TeX */
#define dump_file basefile
#define dump_path MFBASEPATH
#define write_out writegf
#define out_file gffile
#define out_buf gfbuf
#endif /* not TeX */
@y
#ifdef TeX
#define dump_file fmtfile
#define dump_path TEXFORMATPATH
#define write_out writedvi
#define out_file dvifile
#define out_buf dvibuf
#elif defined (MF) /* not TeX, MetaFont or MetaPost */
#define dump_file basefile
#define dump_path MFBASEPATH
#define write_out writegf
#define out_file gffile
#define out_buf gfbuf
#else /* not MetaFont, but MetaPost */
#define dump_file memfile
#define dump_path MPMEMPATH
#define write_out writegf
#define out_file gffile
#define out_buf gfbuf
#endif /* MetaPost */
@z

@x l.186
/* Declare routines in texmf.c.  */
extern void get_date_and_time ();
extern void topenin ();
extern void calledit ();
extern boolean extensionirrelevantp ();
extern boolean input_line ();
extern void do_dump ();
extern void do_undump ();
#ifdef TeX
extern boolean maketextex ();
extern boolean maketextfm ();
#else
extern void main_body ();
extern boolean initscreen ();
extern boolean maketexmf ();
extern void updatescreen ();
extern void blankrectangle ();
extern void paintrow ();
#endif /* not TeX */
@y
/* Declare routines in texmf.c.  */
extern void get_date_and_time (integer *, integer *, integer *, integer *);
extern void topenin (void);
extern void calledit (); /* Will be declared in "mfd.h" later */
extern boolean extensionirrelevantp (char *, char *);
extern boolean input_line (FILE *);
extern void do_dump (char *, int, int, FILE *);
extern void do_undump (char *, int, int, FILE *);
#ifdef TeX
extern boolean maketextex (void);
extern boolean maketextfm (void);
#else
extern void main_body (void);
extern boolean initscreen (void);
extern boolean maketexmf (void);
extern void updatescreen (void);
extern void blankrectangle (); /* Will be declared in "mfd.h" later */
extern void paintrow (); /* Will be declared in "mfd.h" later */
#endif /* not TeX */

#ifdef VARMEM

typedef struct {
   char * pname;
   long pval;
   } as_parameter;

extern as_parameter as_param[];

#ifdef TeX

#define as_texstrings 24000

enum {
   AS_MEMMAX,       AS_BUFSIZE,    AS_ERRORLINE, AS_HALFERRORLINE,
   AS_MAXPRINTLINE, AS_STACKSIZE,  AS_MAXINOPEN, AS_FONTMAX,
   AS_FONTMEMSIZE,  AS_PARAMSIZE,  AS_NESTSIZE,  AS_MAXSTRINGS,
   AS_POOLSIZE,     AS_SAVESIZE,   AS_TRIESIZE,  AS_TRIEOPSIZE,
   AS_MAXTRIEOP,    AS_DVIBUFSIZE, AS_MEMTOP,    AS_HASHSIZE,
   AS_HASHPRIME,    AS_HYPHSIZE,   AS_NP
   };

#elif defined (MF) /* Not TeX, Metafont or MetaPost */

#define as_mfstrings 24000

enum {
   AS_MEMMAX,        AS_MAXINTERNAL,  AS_BUFSIZE,     AS_ERRORLINE,
   AS_HALFERRORLINE, AS_MAXPRINTLINE, AS_SCREENWIDTH, AS_SCREENDEPTH,
   AS_STACKSIZE,     AS_MAXSTRINGS,   AS_POOLSIZE,    AS_MOVESIZE,
   AS_MAXWIGGLE,     AS_GFBUFSIZE,    AS_PATHSIZE,    AS_BISTACKSIZE,
   AS_HEADERSIZE,    AS_LIGTABLESIZE, AS_MAXKERNS,    AS_MAXFONTDIMEN,
   AS_MEMTOP,        AS_HASHSIZE,     AS_HASHPRIME,   AS_MAXINOPEN,
   AS_PARAMSIZE,     AS_SCALEFACTOR,  AS_NP
   };

#else /* Not MetaFont, but MetaPost */

#define as_mpstrings 24000

enum {
   AS_MEMMAX,        AS_MAXINTERNAL,  AS_BUFSIZE,             AS_ERRORLINE,
   AS_HALFERRORLINE, AS_MAXPRINTLINE, AS_EMERGENCYLINELENGTH, AS_STACKSIZE,
   AS_MAXREADFILES,  AS_MAXSTRINGS,   AS_STRINGSVACANT,       AS_POOLSIZE,
   AS_FONTMAX,       AS_FONTMEMSIZE,  AS_MEMTOP,              AS_HASHSIZE,
   AS_HASHPRIME,     AS_MAXINOPEN,    AS_PARAMSIZE,           AS_MAXWRITEFILES,
   AS_PATHSIZE,      AS_BISTACKSIZE,  AS_HEADERSIZE,          AS_LIGTABLESIZE,
   AS_MAXKERNS,      AS_MAXFONTDIMEN, AS_NP
   };

#endif /* MetaPost */

#endif /* VARMEM */
@z