DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T o

⟦d09340c7b⟧ TextFile

    Length: 8668 (0x21dc)
    Types: TextFile
    Names: »orig_mfd.h«

Derivation

└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89
    └─⟦this⟧ »./tex82/cmf/orig_mfd.h«

TextFile

#undef	TRIP
#undef	TRAP
#define	STAT
#undef	DEBUG
#include "mf.h"
/* 1 9998 9999 */ 
#define memmax 60000L 
#define maxinternal 100 
#define bufsize 500 
#define errorline 79 
#define halferrorline 50 
#define maxprintline 79 
#define screenwidth 700 
#define screendepth 700 
#define stacksize 30 
#define maxstrings 2000 
#define stringvacancies 8000 
#define poolsize 32000 
#define movesize 5000 
#define maxwiggle 300 
#define gfbufsize 800 
#define filenamesize 1024 
#define poolname "mf.pool" 
#define memtop 60000L 
#define pathsize 300 
#define bistacksize 785 
#define headersize 100 
#define ligtablesize 300 
#define maxfontdimen 50 
typedef schar ASCIIcode  ; 
typedef unsigned char eightbits  ; 
typedef file_ptr /* of  char */ alphafile  ; 
typedef file_ptr /* of  eightbits */ bytefile  ; 
typedef integer poolpointer  ; 
typedef integer strnumber  ; 
typedef integer scaled  ; 
typedef schar smallnumber  ; 
typedef integer fraction  ; 
typedef integer angle  ; 
typedef unsigned char quarterword  ; 
typedef unsigned short halfword  ; 
typedef schar twochoices  ; 
typedef schar threechoices  ; 
typedef file_ptr /* of  memoryword */ wordfile  ; 
typedef schar commandcode  ; 
typedef integer screenrow  ; 
typedef integer screencol  ; 
typedef screencol transspec [screenwidth + 1] ; 
typedef schar pixelcolor  ; 
typedef schar windownumber  ; 
typedef struct {
    quarterword indexfield ; 
  halfword startfield, locfield, limitfield, namefield ; 
} instaterecord  ; 
typedef integer gfindex  ; 
EXTERN integer bad  ; 
EXTERN ASCIIcode xord[128]  ; 
EXTERN char xchr[128]  ; 
EXTERN char nameoffile[filenamesize + 1], realnameoffile[filenamesize + 1]  ; 
EXTERN integer namelength  ; 
EXTERN ASCIIcode buffer[bufsize + 1]  ; 
EXTERN integer first  ; 
EXTERN integer last  ; 
EXTERN integer maxbufstack  ; 
EXTERN alphafile termin  ; 
EXTERN alphafile termout  ; 
EXTERN ASCIIcode strpool[poolsize + 1]  ; 
EXTERN poolpointer strstart[maxstrings + 1]  ; 
EXTERN poolpointer poolptr  ; 
EXTERN strnumber strptr  ; 
EXTERN poolpointer initpoolptr  ; 
EXTERN strnumber initstrptr  ; 
EXTERN poolpointer maxpoolptr  ; 
EXTERN strnumber maxstrptr  ; 
EXTERN schar strref[maxstrings + 1]  ; 
#ifdef INIMF
EXTERN alphafile poolfile  ; 
#endif /* INIMF */
EXTERN alphafile logfile  ; 
EXTERN schar selector  ; 
EXTERN schar dig[23]  ; 
EXTERN integer tally  ; 
EXTERN integer termoffset  ; 
EXTERN integer fileoffset  ; 
EXTERN ASCIIcode trickbuf[errorline + 1]  ; 
EXTERN integer trickcount  ; 
EXTERN integer firstcount  ; 
EXTERN schar interaction  ; 
EXTERN boolean deletionsallowed  ; 
EXTERN schar history  ; 
EXTERN schar errorcount  ; 
EXTERN strnumber helpline[6]  ; 
EXTERN schar helpptr  ; 
EXTERN boolean useerrhelp  ; 
EXTERN strnumber errhelp  ; 
EXTERN integer interrupt  ; 
EXTERN boolean OKtointerrupt  ; 
EXTERN boolean aritherror  ; 
EXTERN integer twotothe[31]  ; 
EXTERN integer speclog[29]  ; 
EXTERN angle specatan[27]  ; 
EXTERN fraction nsin, ncos  ; 
EXTERN fraction randoms[55]  ; 
EXTERN schar jrandom  ; 
EXTERN memoryword mem[memmax + 1]  ; 
EXTERN halfword lomemmax  ; 
EXTERN halfword himemmin  ; 
EXTERN integer varused, dynused  ; 
EXTERN halfword avail  ; 
EXTERN halfword memend  ; 
EXTERN halfword rover  ; 
#ifdef DEBUG
EXTERN boolean freearr[memmax + 1]  ; 
EXTERN boolean wasfree[memmax + 1]  ; 
EXTERN halfword wasmemend, waslomax, washimin  ; 
EXTERN boolean panicking  ; 
#endif /* DEBUG */
EXTERN scaled internal[maxinternal + 1]  ; 
EXTERN strnumber intname[maxinternal + 1]  ; 
EXTERN integer intptr  ; 
EXTERN schar oldsetting  ; 
EXTERN schar charclass[128]  ; 
EXTERN halfword hashused  ; 
EXTERN integer stcount  ; 
EXTERN twohalves hash[2242]  ; 
EXTERN twohalves eqtb[2242]  ; 
EXTERN halfword gpointer  ; 
EXTERN smallnumber 
#define bignodesize (zzzaa -13)
  zzzaa[2]  ; 
EXTERN halfword saveptr  ; 
EXTERN halfword pathtail  ; 
EXTERN scaled deltax[pathsize + 1], deltay[pathsize + 1], delta[pathsize + 1]  ; 
EXTERN angle psi[pathsize + 1]  ; 
EXTERN angle theta[pathsize + 1]  ; 
EXTERN fraction uu[pathsize + 1]  ; 
EXTERN angle vv[pathsize + 1]  ; 
EXTERN fraction ww[pathsize + 1]  ; 
EXTERN fraction st, ct, sf, cf  ; 
EXTERN integer move[movesize + 1]  ; 
EXTERN integer moveptr  ; 
EXTERN integer bisectstack[bistacksize + 1]  ; 
EXTERN integer bisectptr  ; 
EXTERN halfword curedges  ; 
EXTERN integer curwt  ; 
EXTERN integer tracex  ; 
EXTERN integer tracey  ; 
EXTERN integer traceyy  ; 
EXTERN schar octant  ; 
EXTERN scaled curx, cury  ; 
EXTERN strnumber octantdir[9]  ; 
EXTERN halfword curspec  ; 
EXTERN integer turningnumber  ; 
EXTERN halfword curpen  ; 
EXTERN schar curpathtype  ; 
EXTERN scaled maxallowed  ; 
EXTERN scaled before[maxwiggle + 1], after[maxwiggle + 1]  ; 
EXTERN halfword nodetoround[maxwiggle + 1]  ; 
EXTERN integer curroundingptr  ; 
EXTERN integer maxroundingptr  ; 
EXTERN scaled curgran  ; 
EXTERN schar octantnumber[9]  ; 
EXTERN schar octantcode[9]  ; 
EXTERN boolean revturns  ; 
EXTERN schar ycorr[9], xycorr[9], zcorr[9]  ; 
EXTERN schar xcorr[9]  ; 
EXTERN integer m0, n0, m1, n1  ; 
EXTERN schar d0, d1  ; 
EXTERN integer envmove[movesize + 1]  ; 
EXTERN schar tolstep  ; 
EXTERN integer curt, curtt  ; 
EXTERN integer timetogo  ; 
EXTERN integer maxt  ; 
EXTERN integer delx, dely  ; 
EXTERN integer tol  ; 
EXTERN integer uv, xy  ; 
EXTERN integer threel  ; 
EXTERN integer apprt, apprtt  ; 
EXTERN boolean screenstarted  ; 
EXTERN boolean screenOK  ; 
EXTERN boolean windowopen[16]  ; 
EXTERN screencol leftcol[16]  ; 
EXTERN screencol rightcol[16]  ; 
EXTERN screenrow toprow[16]  ; 
EXTERN screenrow botrow[16]  ; 
EXTERN integer mwindow[16]  ; 
EXTERN integer nwindow[16]  ; 
EXTERN integer windowtime[16]  ; 
EXTERN transspec rowtransition  ; 
EXTERN integer serialno  ; 
EXTERN boolean fixneeded  ; 
EXTERN boolean watchcoefs  ; 
EXTERN halfword depfinal  ; 
EXTERN eightbits curcmd  ; 
EXTERN integer curmod  ; 
EXTERN halfword cursym  ; 
EXTERN instaterecord inputstack[stacksize + 1]  ; 
EXTERN integer inputptr  ; 
EXTERN integer maxinstack  ; 
EXTERN instaterecord curinput  ; 
EXTERN schar inopen  ; 
EXTERN alphafile inputfile[16]  ; 
EXTERN integer line  ; 
EXTERN integer linestack[16]  ; 
EXTERN halfword paramstack[151]  ; 
EXTERN unsigned char paramptr  ; 
EXTERN integer maxparamstack  ; 
EXTERN integer fileptr  ; 
EXTERN schar scannerstatus  ; 
EXTERN integer warninginfo  ; 
EXTERN boolean forceeof  ; 
EXTERN short bgloc, egloc  ; 
EXTERN halfword condptr  ; 
EXTERN schar iflimit  ; 
EXTERN smallnumber curif  ; 
EXTERN integer ifline  ; 
EXTERN halfword loopptr  ; 
EXTERN strnumber curname  ; 
EXTERN strnumber curarea  ; 
EXTERN strnumber curext  ; 
EXTERN poolpointer areadelimiter  ; 
EXTERN poolpointer extdelimiter  ; 
EXTERN char MFbasedefault[11]  ; 
EXTERN strnumber jobname  ; 
EXTERN boolean logopened  ; 
EXTERN strnumber logname  ; 
EXTERN strnumber gfext  ; 
EXTERN bytefile gffile  ; 
EXTERN strnumber outputfilename  ; 
EXTERN smallnumber curtype  ; 
EXTERN integer curexp  ; 
EXTERN integer 
#define maxc (zzzab -17)
  zzzab[2]  ; 
EXTERN halfword 
#define maxptr (zzzac -17)
  zzzac[2]  ; 
EXTERN halfword 
#define maxlink (zzzad -17)
  zzzad[2]  ; 
EXTERN schar varflag  ; 
EXTERN scaled txx, txy, tyx, tyy, tx, ty  ; 
EXTERN halfword startsym  ; 
EXTERN boolean longhelpseen  ; 
EXTERN bytefile tfmfile  ; 
EXTERN strnumber metricfilename  ; 
EXTERN eightbits bc, ec  ; 
EXTERN scaled tfmwidth[256]  ; 
EXTERN scaled tfmheight[256]  ; 
EXTERN scaled tfmdepth[256]  ; 
EXTERN scaled tfmitalcorr[256]  ; 
EXTERN boolean charexists[256]  ; 
EXTERN schar chartag[256]  ; 
EXTERN eightbits charremainder[256]  ; 
EXTERN short headerbyte[headersize + 1]  ; 
EXTERN fourquarters ligkern[ligtablesize + 1]  ; 
EXTERN integer nl  ; 
EXTERN scaled kern[256]  ; 
EXTERN short nk  ; 
EXTERN fourquarters exten[256]  ; 
EXTERN short ne  ; 
EXTERN scaled param[maxfontdimen + 1]  ; 
EXTERN integer np  ; 
EXTERN short nw, nh, nd, ni  ; 
EXTERN scaled perturbation  ; 
EXTERN halfword dimenhead[5]  ; 
EXTERN scaled maxtfmdimen  ; 
EXTERN integer tfmchanged  ; 
EXTERN integer gfminm, gfmaxm, gfminn, gfmaxn  ; 
EXTERN integer gfprevptr  ; 
EXTERN integer totalchars  ; 
EXTERN integer charptr[256]  ; 
EXTERN integer gfdx[256], gfdy[256]  ; 
EXTERN eightbits gfbuf[gfbufsize + 1]  ; 
EXTERN gfindex halfbuf  ; 
EXTERN gfindex gflimit  ; 
EXTERN gfindex gfptr  ; 
EXTERN integer gfoffset  ; 
EXTERN integer bocc, bocp  ; 
EXTERN strnumber baseident  ; 
EXTERN wordfile basefile  ; 
EXTERN integer readyalready  ; 
EXTERN poolpointer editnamestart  ; 
EXTERN integer editnamelength, editline  ; 

#include "coerce.h"