-- file: TexDvi.mesa
-- Pascal-to-Mesa translator output, translated at September 27, 1985 10:21:36 am PDT


DIRECTORY
  PascalBasic,
  PascalWizardFiles,
  TexTypes;

TexDvi: DEFINITIONS IMPORTS  =
BEGIN OPEN PascalBasic, PascalWizardFiles, TexTypes;
DviBuf: LONG POINTER TO ARRAY DviIndex OF  EightBits;

HalfBuf: DviIndex;

DviLimit: DviIndex;

DviPtr: DviIndex;

DviOffset: PascalInteger;

DviGone: PascalInteger;

DownPtr: Halfword;

RightPtr: Halfword;

DviH: Scaled;

DviV: Scaled;

CurH: Scaled;

CurV: Scaled;

DviF: InternalFontNumber;

--:597----598:
 DviSwap: PROCEDURE
;

 DviFour: PROCEDURE[X: PascalInteger]
;

 DviPop: PROCEDURE[L: PascalInteger]
;

 DviFontDef: PROCEDURE[F: InternalFontNumber];

 Movement: PROCEDURE[W: Scaled,O: EightBits];

 PruneMovements: PROCEDURE[L: PascalInteger]
;

 HlistOut: PROCEDURE
;

--618:-- VlistOut: PROCEDURE;

 HlistPressOut: PROCEDURE;


 VlistPressOut: PROCEDURE;

 ShipOut: PROCEDURE[P: Halfword];

END.