mirror of
https://github.com/moparisthebest/Simba
synced 2025-01-11 05:38:00 -05:00
Fix for linux.
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@137 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
parent
85bb6c6e1d
commit
3220330c90
@ -79,6 +79,7 @@ threadvar
|
||||
|
||||
{Some General PS Functions here}
|
||||
procedure psWriteln(str : string);
|
||||
{$IFDEF WINDOWS}
|
||||
var
|
||||
CriticalSec : TRTLCriticalSection;
|
||||
begin
|
||||
@ -94,6 +95,12 @@ begin
|
||||
System.LeaveCriticalSection(CriticalSec);
|
||||
end;
|
||||
end;
|
||||
{$ELSE}
|
||||
begin
|
||||
writeln(str);
|
||||
end;
|
||||
{$ENDIF}
|
||||
|
||||
|
||||
function ThreadSafeCall(ProcName: string; var V: TVariantArray): Variant;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user