Explorar o código

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

git-svn-id: trunk@5962 -
yury %!s(int64=19) %!d(string=hai) anos
pai
achega
3c10856a4f
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      rtl/inc/heap.inc

+ 4 - 0
rtl/inc/heap.inc

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