Unit Threads

Classes

TThreadRecord -

Functions

NewThread - True } { Now OSx NSx Cxx are free again.
Sleep - Re-make the mess for pascal to undo
SwitchThread -
SwitchThreadNow -

Types

PThreadRecord
TThread

Constants

Variables

Count
Current
MasterSerialNumber


Functions


Procedure NewThread(NThread : TThread; StackSize : Word; Slice : longint);

True } { Now OSx NSx Cxx are free again... } { We should have our fake BP on the stack... but as we are a new stack.. } { Make up BP

Procedure Sleep(t : longint);

Re-make the mess for pascal to undo

Procedure SwitchThread;


Procedure SwitchThreadNow;


Types


PThreadRecord = ^TThreadRecord

TThread=Procedure

Constants


Variables

Count : Word

Current : Word

MasterSerialNumber : Word

Renamed from Threads.pas 6/7/1998 Paul Rice to avoid conflict with White Ants' work.