Browse Source

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

git-svn-id: trunk@5962 -
yury 18 years ago
parent
commit
3c10856a4f
1 changed files with 4 additions and 0 deletions
  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}