@x
% This is DVIDOC, a TeX device driver for text files.  It was written
@y
% -*-TeX-*-
% <BEEBE.TEX.DVIDOC>DVIDOC.WEB.3,  6-Oct-86 13:14:29, Edit by BEEBE
% Remove obsolete WEB macro @@, replace code for rounding
% TFM widths to pixels with code from DVITYPE Version 2.8,
% trim trailing blanks, add translations of TeX78 macros to TeX82
% This is DVIDOC, a TeX device driver for text files.  It was written
@z

@x
\def\title{DVIDOC}
@y
\def\title{DVIDOC changes for Tops-20}
%--------------------Redefine some TeX78 macros
\let\setcount=\count
\def\advcount{\advance\count}
\def\lft#1{#1\hfil}
\def\ldotss{\ldots\thinspace}
\let\ctrline=\centerline
%--------------------End of redefinitions
@z

@x Tell WEAVE to print only the changes:
\setcount0=\contentspagenumber \advcount0 by 1
@y
\setcount0=\contentspagenumber \advcount0 by 1
\let\maybe=\iffalse
@z

@x
important (we trust TeX) to produce correct \.{DVI} files), but
@y
important (we trust \TeX) to produce correct \.{DVI} files), but
@z

@x
@d banner=='This is DVIDOC, Version 1' {printed when the program starts}
@y
@d banner=='This is DVIDOC, Version 1.1' {printed when the program starts}
@z

@x
given character |c| in a given font |f|: (1)@@Is |c| a legal character
in@@|f|? (2)@@If so, what is the width of |c|? We also need to know the
@y
given character |c| in a given font |f|: (1) Is |c| a legal character
in |f|? (2) If so, what is the width of |c|? We also need to know the
@z

@x
integer@@|z|, which is known to be less then $2^{27}$. Let $\alpha=16z$.
@y
integer |z|, which is known to be less then $2^{27}$. Let $\alpha=16z$.
@z

@x
including the blank, will be put into the buffer as question mark chracters.
@y
including the blank, will be put into the buffer as question mark characters.
@z

@x
disappear.


@d out_space==if abs(p)>=font_space[cur_font] then
@y
disappear. We allow a larger space in the negative direction than in
the positive one, because \TeX\ makes comparatively
large backspaces when it positions accents.

@d out_space==if (p>=font_space[cur_font])or(p<=-4*font_space[cur_font]) then
@z

@x
counts 0, 1, and@@2, separated by dots. Such numbers can, for example,
@y
counts 0, 1, and 2, separated by dots. Such numbers can, for example,
@z

@x
This module shouldbe replaced, if necessary, by changes to the program
@y
This module should be replaced, if necessary, by changes to the program
@z