38 lines
1.5 KiB
Plaintext
38 lines
1.5 KiB
Plaintext
{*******************************************************}
|
||
{ }
|
||
{ Turbo Pascal Version 4.0 }
|
||
{ SYSTEM Unit Interface Documentation }
|
||
{ (Only the variables are listed. For a complete }
|
||
{ reference to System functions and procedures, }
|
||
{ refer to the Owner's Handbook) }
|
||
{ }
|
||
{ Copyright (c) 1987 by Borland International, Inc. }
|
||
{ }
|
||
{*******************************************************}
|
||
|
||
unit System;
|
||
|
||
interface
|
||
|
||
var
|
||
Input: Text; { Input standard file }
|
||
Output: Text; { Output standatd file }
|
||
PrefixSeg: Word; { Program segment prefix }
|
||
HeapOrg: Pointer; { Heap origin }
|
||
HeapPtr: Pointer; { Heap pointer }
|
||
FreePtr: Pointer; { Free list pointer }
|
||
FreeMin: Word; { Minimum free list size }
|
||
HeapError: Pointer; { Heap error function }
|
||
ExitProc: Pointer; { Exit procedure }
|
||
ExitCode: Integer; { Exit code }
|
||
ErrorAddr: Pointer; { Runtime error address }
|
||
RandSeed: Longint; { Random seed }
|
||
SaveInt00: Pointer; { Saved interrupt $00 }
|
||
SaveInt02: Pointer; { Saved interrupt $02 }
|
||
SaveInt23: Pointer; { Saved interrupt $23 }
|
||
SaveInt24: Pointer; { Saved interrupt $24 }
|
||
SaveInt75: Pointer; { Saved interrupt $75 }
|
||
FileMode: Byte; { File open mode }
|
||
|
||
implementation
|
||
|