Bläddra i källkod

* Dont throw runerrors in default MemoryMutexManager if HAS_MT_MEMORYMANAGER is defined.

git-svn-id: trunk@5962 -
yury 18 år sedan
förälder
incheckning
3c10856a4f
1 ändrade filer med 4 tillägg och 0 borttagningar
  1. 4 0
      rtl/inc/heap.inc

+ 4 - 0
rtl/inc/heap.inc

@@ -1260,16 +1260,20 @@ end;
 
 
 procedure SysHeapMutexLock;
 procedure SysHeapMutexLock;
 begin
 begin
+{$ifndef HAS_MT_MEMORYMANAGER}
   { give an runtime error. the program is running multithreaded without
   { give an runtime error. the program is running multithreaded without
     any heap protection. this will result in unpredictable errors so
     any heap protection. this will result in unpredictable errors so
     stopping here with an error is more safe (PFV) }
     stopping here with an error is more safe (PFV) }
   runerror(244);
   runerror(244);
+{$endif}
 end;
 end;
 
 
 procedure SysHeapMutexUnLock;
 procedure SysHeapMutexUnLock;
 begin
 begin
+{$ifndef HAS_MT_MEMORYMANAGER}
   { see SysHeapMutexLock for comment }
   { see SysHeapMutexLock for comment }
   runerror(244);
   runerror(244);
+{$endif}
 end;
 end;
 
 
 {$ifndef HAS_MEMORYMANAGER}
 {$ifndef HAS_MEMORYMANAGER}