procedure Error(Code: ErrorSpan; Position: TextPosition);
  extern;

procedure StartError(Position: TextPosition);
  extern;

procedure WarningError(Code: Scalar);
  extern;

procedure PragmaticError(Code: Scalar);
  extern;

procedure SystemError(Code: Scalar);
  extern;

procedure FatalError(Code: Scalar);
  extern;

procedure ReportId(Id, BlockId: IdEntry);
  extern;

procedure MapId(Id: IdEntry);
  extern;

procedure NextCh;
  extern;

function LineEnded: Boolean;
  extern;

function ImportingSource: Boolean;
  extern;

procedure InitListing;
  extern;

procedure EndListing;
  extern;