瀏覽代碼

Fix compilation wtih range check: STD_INPUT_HANDLE must be a DWORD

git-svn-id: trunk@38460 -
pierre 7 年之前
父節點
當前提交
af5d27e083
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/win64/sysinit.pp

+ 1 - 1
rtl/win64/sysinit.pp

@@ -55,7 +55,7 @@ unit sysinit;
     function GetConsoleMode(hConsoleHandle: THandle; var lpMode: DWORD): Boolean; stdcall; external 'kernel32' name 'GetConsoleMode';
 
     const
-      STD_INPUT_HANDLE = qword(-10);
+      STD_INPUT_HANDLE = dword(-10);
       SysInitEntryInformation : TEntryInformation = (
         InitFinalTable : @InitFinalTable;
         ThreadvarTablesTable : @ThreadvarTablesTable;