aboutsummaryrefslogtreecommitdiffstats
path: root/src/macosx0/Wrapper/PseudoThread.pas
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-08-27 15:04:56 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-08-27 15:04:56 +0000
commit50d173a828e75d2b8bc439c8b65bc8bb1127fe48 (patch)
tree2a8b1b9a0b14e2cbd94f379dc27e21d7c6aa8fb3 /src/macosx0/Wrapper/PseudoThread.pas
parent53987e26a9a9cff05259fa2c9c21da10d650bc27 (diff)
downloadusdx-50d173a828e75d2b8bc439c8b65bc8bb1127fe48.tar.gz
usdx-50d173a828e75d2b8bc439c8b65bc8bb1127fe48.tar.xz
usdx-50d173a828e75d2b8bc439c8b65bc8bb1127fe48.zip
rename MacOSX part2
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1313 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/macosx0/Wrapper/PseudoThread.pas')
-rw-r--r--src/macosx0/Wrapper/PseudoThread.pas48
1 files changed, 0 insertions, 48 deletions
diff --git a/src/macosx0/Wrapper/PseudoThread.pas b/src/macosx0/Wrapper/PseudoThread.pas
deleted file mode 100644
index 16157646..00000000
--- a/src/macosx0/Wrapper/PseudoThread.pas
+++ /dev/null
@@ -1,48 +0,0 @@
-unit PseudoThread;
-
-{$IFDEF FPC}
- {$MODE Delphi}
-{$ENDIF}
-
-{$I switches.inc}
-
-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;
-
-implementation
-
-{ TPseudoThread }
-
-constructor TPseudoThread.Create(const suspended : Boolean);
-begin
- if not suspended then begin
- Execute;
- end;
-end;
-
-procedure TPseudoThread.Resume;
-begin
- Execute;
-end;
-
-procedure TPseudoThread.Suspend;
-begin
-end;
-
-end.
-