瀏覽代碼

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

git-svn-id: trunk@5962 -
yury 18 年之前
父節點
當前提交
3c10856a4f
共有 1 個文件被更改,包括 4 次插入0 次删除
  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}