diff options
| author | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-01-26 23:27:06 +0000 |
|---|---|---|
| committer | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-01-26 23:27:06 +0000 |
| commit | 0347f275d25ed260925dbe4092023dd07cedf268 (patch) | |
| tree | f311e4c1283bf69b8c5f7e5abe12e1df60ffbf4f /src/macosx/PseudoThread.pas | |
| parent | ff3521c449570fe165e98fd696560566509674af (diff) | |
| download | usdx-0347f275d25ed260925dbe4092023dd07cedf268.tar.gz usdx-0347f275d25ed260925dbe4092023dd07cedf268.tar.xz usdx-0347f275d25ed260925dbe4092023dd07cedf268.zip | |
Small editing changes. no Code change.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1577 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
| -rw-r--r-- | src/macosx/PseudoThread.pas | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/macosx/PseudoThread.pas b/src/macosx/PseudoThread.pas index 5764395d..d74285f7 100644 --- a/src/macosx/PseudoThread.pas +++ b/src/macosx/PseudoThread.pas @@ -37,23 +37,24 @@ 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; + FreeOnTerminate: boolean; procedure Execute; virtual; abstract; procedure Resume; procedure Suspend; public - constructor Create(const suspended : Boolean); + constructor Create(const suspended : boolean); end; implementation { TPseudoThread } -constructor TPseudoThread.Create(const suspended : Boolean); +constructor TPseudoThread.Create(const suspended: boolean); begin if not suspended then begin |