home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Turbo Toolbox
/
Turbo_Toolbox.iso
/
turbo5
/
doc
/
system.doc
< prev
next >
Wrap
Text File
|
1988-10-09
|
4KB
|
80 lines
{*******************************************************}
{ }
{ Turbo Pascal Version 5.0 }
{ Interface-Dokumentation zu SYSTEM }
{ }
{ Copyright (C) 1987,88 Borland International }
{ }
{*******************************************************}
{ Hier sind nur die Variablen und Konstanten aufgelistet - für die
Beschreibung der Routinen verweisen wir auf das Referenzhandbuch. }
unit System;
interface
const
{ Overlay-Verwaltung }
OvrCodeList: Word = 0; { Codesegment-Liste der Overlay-Verwaltung }
OvrHeapSize: Word = 0; { Standard-Größe des Overlay-Puffers }
OvrDebugPtr: Pointer = nil; { »Einhängepunkt« für den Debugger }
OvrHeapOrg: Word = 0; { Startadresse des Overlay-Puffers }
OvrHeapPtr: Word = 0; { momentane Spitze des Puffers }
OvrHeapEnd: Word = 0; { Obergrenze des Puffers }
OvrLoadList: Word = 0; { Liste der geladenen Segmente }
OvrDosHandle: Word = 0; { DOS-Handle für die Overlay-Datei }
OvrEmsHandle: Word = 0; { dito für OvrInitEMS }
{ Heap und Dynamisches }
HeapOrg: Pointer = nil; { Start des reuglären Heaps }
HeapPtr: Pointer = nil; { momentane Spitze des Heaps }
FreePtr: Pointer = nil; { Start der Fragmentliste }
FreeMin: Word = 0; { minimale Größe der Fragmentliste }
HeapError: Pointer = nil; { zeigt auf die Behandlungsroutine für Fehler
bei der dynamischen Speicherverwaltung }
{ Programmende }
ExitProc: Pointer = nil; { zeigt auf die zuletzt eingesetzte Exit-Proc. }
ExitCode: Integer = 0; { speichert den Exitcode des Programms }
ErrorAddr: Pointer = nil; { speichert die Adresse eines Laufzeitfehlers }
PrefixSeg: Word = 0; { Programmsegment-Präfix }
StackLimit: Word = 0; { Untergrenze des Stacks }
InOutRes: Integer = 0; { Status/nächstes Erg. von IOResult }
RandSeed: LongInt = 0; { Startwert des »Zufallszahlen«-Generators }
FileMode: Byte = 2; { Standardmodus für das Öffnen von Dateien }
Test8087: Byte = 0; { Ergebnis der Prüfung auf »Coprozessor« }
var
Input: Text; { Standard-Eingabedatei (Tastatur) }
Output: Text; { Standard-Ausgabedatei (Bildschirm) }
SaveInt00: Pointer; { Gespeicherter Interrupt $00 des Systems
- Division durch 0 }
SaveInt02: Pointer; { Gespeicherter Interrupt $02 des Systems
- Coprozessor-Fehler }
SaveInt1B: Pointer; { Gespeicherter Interrupt $1B des Systems
- Ctrl-Break (Tastatur) }
SaveInt23: Pointer; { Gespeicherter Interrupt $23 des Systems
- Ctrl-Break (DOS) }
SaveInt24: Pointer; { Gespeicherter Interrupt $24 des Systems
- »Critical Error« }
{ 8087-Emulation }
SaveInt34: Pointer; { Gespeicherter Interrupt $34 des Systems }
SaveInt35: Pointer; { Gespeicherter Interrupt $35 des Systems }
SaveInt36: Pointer; { Gespeicherter Interrupt $36 des Systems }
SaveInt37: Pointer; { Gespeicherter Interrupt $37 des Systems }
SaveInt38: Pointer; { Gespeicherter Interrupt $38 des Systems }
SaveInt39: Pointer; { Gespeicherter Interrupt $39 des Systems }
SaveInt3A: Pointer; { Gespeicherter Interrupt $3A des Systems }
SaveInt3B: Pointer; { Gespeicherter Interrupt $3B des Systems }
SaveInt3C: Pointer; { Gespeicherter Interrupt $3C des Systems }
SaveInt3D: Pointer; { Gespeicherter Interrupt $3D des Systems }
SaveInt3E: Pointer; { Gespeicherter Interrupt $3E des Systems }
SaveInt3F: Pointer; { Gespeicherter Interrupt $3F des Systems }
SaveInt75: Pointer; { Gespeicherter Interrupt $75 des Systems - Fließkomma-Ausnahmezustand }