소스 검색

* fixed range check errors

git-svn-id: trunk@5432 -
Jonas Maebe 19 년 전
부모
커밋
c54e49d428
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      compiler/dbgdwarf.pas

+ 2 - 2
compiler/dbgdwarf.pas

@@ -1961,7 +1961,7 @@ implementation
         current_asmdata.getlabel(lbl,alt_dbgfile);
         if use_64bit_headers then
           begin
-            linelist.concat(tai_const.create_32bit($FFFFFFFF));
+            linelist.concat(tai_const.create_32bit(longint($FFFFFFFF)));
             linelist.concat(tai_const.create_rel_sym(aitconst_64bit,
               lbl,current_asmdata.RefAsmSymbol('.Ledebug_line0')));
           end
@@ -2146,7 +2146,7 @@ implementation
         { size }
         if use_64bit_headers then
           begin
-            current_asmdata.asmlists[al_dwarf_info].concat(tai_const.create_32bit($FFFFFFFF));
+            current_asmdata.asmlists[al_dwarf_info].concat(tai_const.create_32bit(longint($FFFFFFFF)));
             current_asmdata.asmlists[al_dwarf_info].concat(tai_const.create_rel_sym(aitconst_64bit,
               lenstartlabel,current_asmdata.RefAsmSymbol('.Ledebug_info0')));
           end