Added another safety check for the heck of it.

2010-10-04 17:10:05 +02:00 · 2010-10-04 17:10:05 +02:00 · a7d6cd748b
parent 931084900e
commit a7d6cd748b
1 changed files with 1 additions and 1 deletions
--- a/Units/MMLAddon/mmlpsthread.pas
+++ b/Units/MMLAddon/mmlpsthread.pas
@ -288,7 +288,7 @@ end;

 procedure ps_DebugLn(str : string); extdecl;
 begin
-  if CurrThread.Prop.WriteTimeStamp then
+  if Assigned(CurrThread) and CurrThread.Prop.WriteTimeStamp then
    str := format('[%s]: %s', [TimeToStr(TimeStampToDateTime(MSecsToTimeStamp(GetTickCount - CurrThread.StartTime))), str]);
  mDebugLn(str);
 end;