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

⟦4fd4927ae⟧ TextFile

    Length: 2953 (0xb89)
    Types: TextFile
    Names: »SYSTEM.DOC«

Derivation

└─⟦505fbc898⟧ Bits:30002732 Turbo Pascal 5.0 for C-DOS Partner
    └─⟦this⟧ »DOC\SYSTEM.DOC« 

TextFile


æ*******************************************************å
æ                                                       å
æ       Turbo Pascal Runtime Library Version 5.0        å
æ       System Unit                                     å
æ                                                       å
æ       Copyright (C) 1987,88 Borland International     å
æ                                                       å
æ*******************************************************å

unit System;

interface

const
  OvrCodeList: Word = 0;        æ Overlay code segment list å
  OvrHeapSize: Word = 0;        æ Initial overlay buffer size å
  OvrDebugPtr: Pointer = nil;   æ Overlay debugger hook å
  OvrHeapOrg: Word = 0;         æ Overlay buffer origin å
  OvrHeapPtr: Word = 0;         æ Overlay buffer pointer å
  OvrHeapEnd: Word = 0;         æ Overlay buffer end å
  OvrLoadList: Word = 0;        æ Loaded overlays list å
  OvrDosHandle: Word = 0;       æ Overlay DOS handle å
  OvrEmsHandle: Word = 0;       æ Overlay EMS handle å
  HeapOrg: Pointer = nil;       æ Heap origin å
  HeapPtr: Pointer = nil;       æ Heap pointer å
  FreePtr: Pointer = nil;       æ Free list pointer å
  FreeMin: Word = 0;            æ Minimum free list size å
  HeapError: Pointer = nil;     æ Heap error function å
  ExitProc: Pointer = nil;      æ Exit procedure å
  ExitCode: Integer = 0;        æ Exit code å
  ErrorAddr: Pointer = nil;     æ Runtime error address å
  PrefixSeg: Word = 0;          æ Program segment prefix å
  StackLimit: Word = 0;         æ Stack pointer low limit å
  InOutRes: Integer = 0;        æ I/O result buffer å
  RandSeed: Longint = 0;        æ Random seed å
  FileMode: Byte = 2;           æ File open mode å
  Test8087: Byte = 0;           æ 8087 test result å

var
  Input: Text;                  æ Input standard file å
  Output: Text;                 æ Output standard file å
  SaveInt00: Pointer;           æ Saved interrupt $00 å
  SaveInt02: Pointer;           æ Saved interrupt $02 å
  SaveInt1B: Pointer;           æ Saved interrupt $1B å
  SaveInt23: Pointer;           æ Saved interrupt $23 å
  SaveInt24: Pointer;           æ Saved interrupt $24 å
  SaveInt34: Pointer;           æ Saved interrupt $34 å
  SaveInt35: Pointer;           æ Saved interrupt $35 å
  SaveInt36: Pointer;           æ Saved interrupt $36 å
  SaveInt37: Pointer;           æ Saved interrupt $37 å
  SaveInt38: Pointer;           æ Saved interrupt $38 å
  SaveInt39: Pointer;           æ Saved interrupt $39 å
  SaveInt3A: Pointer;           æ Saved interrupt $3A å
  SaveInt3B: Pointer;           æ Saved interrupt $3B å
  SaveInt3C: Pointer;           æ Saved interrupt $3C å
  SaveInt3D: Pointer;           æ Saved interrupt $3D å
  SaveInt3E: Pointer;           æ Saved interrupt $3E å
  SaveInt3F: Pointer;           æ Saved interrupt $3F å
  SaveInt75: Pointer;           æ Saved interrupt $75 å
«eof»