DataMuseum.dk

Presents historical artifacts from the history of:

CP/M

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

See our Wiki for more about CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦e8807da78⟧ TextFile

    Length: 768 (0x300)
    Types: TextFile
    Names: »PPGLBLS.PAS«

Derivation

└─⟦02f213fda⟧ Bits:30008919 MT+ SPP 2/3
    └─⟦this⟧ »PPGLBLS.PAS«

TextFile

(*  VERSION 0015 *)

(* PRETTY PRINTER GLOBALS *)

VAR
  ENDFILE,
  CBP,
  BUFSZ,
  LASTLINE:	EXTERNAL INTEGER;	(* FROM SOFTBUS GLOBALS *)
  CURSOR,
  DSTCURSOR: 	INTEGER;

  BUF : 	ABSOLUTE Æ$A000Å ARRAYÆ0..0Å OF CHAR;

  GBL_OOPS: 	BOOLEAN;	(* SET IF CURSORS COLLIDED *)

  RECORDSEEN,
  EXTSEEN,
  COLONSEEN: 	BOOLEAN;
  
  CUR,
  NXT:		CHARINFO;
  
  CURRSYM,
  NEXTSYM: 	SYMBOLINFO;
  
  CRPENDING : 	BOOLEAN;
  
  PPOPTION : 	OPTIONTABLE;
  
  KEYWORD : 	KEYWORDTABLE;
  
  DBLCHARS: 	DBLCHRSET;
  
  DBLCHR : 	DBLCTABLE;
  SGLCHAR : 	SGLCHARTABLE;
  
  STACK   : 	SYMBOLSTACK;
  TOP     : 	INTEGER;
  
  CURLINEPOS,
  CURRMARGIN: 	INTEGER;
  
«eof»