diff -r 12b0ed9910cd -r 01e198990211 hedgewars/uUtils.pas --- a/hedgewars/uUtils.pas Tue Jan 07 01:58:23 2014 +0400 +++ b/hedgewars/uUtils.pas Tue Jan 07 22:08:02 2014 +0400 @@ -351,6 +351,7 @@ procedure AddFileLogRaw(s: pchar); cdecl; begin s:= s; +{$IFNDEF PAS2C} {$IFDEF DEBUGFILE} {$IFDEF USE_VIDEO_RECORDING} EnterCriticalSection(logMutex); @@ -361,6 +362,7 @@ LeaveCriticalSection(logMutex); {$ENDIF} {$ENDIF} +{$ENDIF} end; function CheckCJKFont(s: ansistring; font: THWFont): THWFont; @@ -507,13 +509,16 @@ InitCriticalSection(logMutex); {$ENDIF} {$I-} +{$IFNDEF PAS2C} f:= stderr; // if everything fails, write to stderr +{$ENDIF} if (UserPathPrefix <> '') then begin + {$IFNDEF PAS2C} // create directory if it doesn't exist if not FileExists(UserPathPrefix + '/Logs/') then CreateDir(UserPathPrefix + '/Logs/'); - + {$ENDIF} // if log is locked, write to the next one i:= 0; while(i < 7) do