Browse Source

* fixed range check errors

git-svn-id: trunk@5432 -
Jonas Maebe 18 years ago
parent
commit
c54e49d428
1 changed files with 2 additions and 2 deletions
  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