diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-07-16 10:08:28 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-07-16 10:08:28 +0000 |
commit | 18a3ef60ba3c2ef8bd3f842c5b7e70cdf5a9c5c3 (patch) | |
tree | 8cb70a3a29cf3541cea58ba923e3c6ebb10cdcde /Game/Code/MacOSX/Wrapper/PseudoThread.pas | |
parent | 4dd9427bd27321e5ac8e9bff9a677f527294ac97 (diff) | |
download | usdx-18a3ef60ba3c2ef8bd3f842c5b7e70cdf5a9c5c3.tar.gz usdx-18a3ef60ba3c2ef8bd3f842c5b7e70cdf5a9c5c3.tar.xz usdx-18a3ef60ba3c2ef8bd3f842c5b7e70cdf5a9c5c3.zip |
removed outdated files
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1202 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r-- | Game/Code/MacOSX/Wrapper/PseudoThread.pas | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/Game/Code/MacOSX/Wrapper/PseudoThread.pas b/Game/Code/MacOSX/Wrapper/PseudoThread.pas index d81a5cfe..16157646 100644 --- a/Game/Code/MacOSX/Wrapper/PseudoThread.pas +++ b/Game/Code/MacOSX/Wrapper/PseudoThread.pas @@ -10,19 +10,19 @@ interface type - // Debugging threads with XCode doesn't seem to work. - // We use PseudoThread in Debug mode to get proper debugging. - TPseudoThread = class(TObject) - private - protected - Terminated, - FreeOnTerminate : Boolean; - procedure Execute; virtual; abstract; - procedure Resume; - procedure Suspend; - public - constructor Create(const suspended : Boolean); - end; +// Debugging threads with XCode doesn't seem to work. +// We use PseudoThread in Debug mode to get proper debugging. +TPseudoThread = class(TObject) + private + protected + Terminated, + FreeOnTerminate : Boolean; + procedure Execute; virtual; abstract; + procedure Resume; + procedure Suspend; + public + constructor Create(const suspended : Boolean); +end; implementation @@ -30,14 +30,14 @@ implementation constructor TPseudoThread.Create(const suspended : Boolean); begin - if not suspended then begin - Execute; - end; + if not suspended then begin + Execute; + end; end; procedure TPseudoThread.Resume; begin - Execute; + Execute; end; procedure TPseudoThread.Suspend; |