浏览代码

* correction of previous commit

git-svn-id: branches/fixes_2_0@6731 -
Tomas Hajny 19 年之前
父节点
当前提交
2c4f26259f
共有 1 个文件被更改,包括 3 次插入1 次删除
  1. 3 1
      rtl/os2/system.pas

+ 3 - 1
rtl/os2/system.pas

@@ -133,7 +133,9 @@ const
 (* underlying OS/2 version, can be overridden by user - heap is allocated  *)
 (* underlying OS/2 version, can be overridden by user - heap is allocated  *)
 (* for all threads, so the setting isn't declared as a threadvar and       *)
 (* for all threads, so the setting isn't declared as a threadvar and       *)
 (* should be only changed at the beginning of the main thread if needed.   *)
 (* should be only changed at the beginning of the main thread if needed.   *)
-  UseHighMem: boolean;
+  UseHighMem: boolean = false;
+
+var
   StackTop : PtrUInt;
   StackTop : PtrUInt;