diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-05-03 12:14:10 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-05-03 12:14:10 +0000 |
commit | ad4c54706eaab157d975f832aecc836adbef827c (patch) | |
tree | 408b927e10eeed11c819d958f4ca538284141721 /Game/Code/Classes/UPlatformWindows.pas | |
parent | 4bc80aa3bf2395e9f9954848b74d0033ce982f6b (diff) | |
download | usdx-ad4c54706eaab157d975f832aecc836adbef827c.tar.gz usdx-ad4c54706eaab157d975f832aecc836adbef827c.tar.xz usdx-ad4c54706eaab157d975f832aecc836adbef827c.zip |
- fixed recursive calling of TPlatform.Halt.
- removed oldlinux stuff
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1059 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Classes/UPlatformWindows.pas')
-rw-r--r-- | Game/Code/Classes/UPlatformWindows.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Game/Code/Classes/UPlatformWindows.pas b/Game/Code/Classes/UPlatformWindows.pas index a0192b57..18cbebcb 100644 --- a/Game/Code/Classes/UPlatformWindows.pas +++ b/Game/Code/Classes/UPlatformWindows.pas @@ -20,7 +20,7 @@ type function GetGamePath: WideString;
function FindSongFile(Dir, Mask: widestring): widestring;
- procedure halt;
+ procedure Halt;
function GetLogPath : WideString;
function GetGameSharedPath : WideString;
@@ -191,9 +191,9 @@ begin Result := ExtractFilePath(ParamStr(0));
end;
-procedure TPlatformWindows.halt;
+procedure TPlatformWindows.Halt;
begin
- halt(); // Application.terminate does NOT do the same thing..
+ System.Halt; // Application.terminate does NOT do the same thing..
end;
function TPlatformWindows.GetLogPath : WideString;
|