Переглянути джерело

* fix compilation with -Cr

git-svn-id: trunk@36276 -
florian 8 роки тому
батько
коміт
ddfaf59626
1 змінених файлів з 2 додано та 2 видалено
  1. 2 2
      compiler/i386/cgcpu.pas

+ 2 - 2
compiler/i386/cgcpu.pas

@@ -1006,9 +1006,9 @@ unit cgcpu;
         case op of
           OP_AND,OP_OR,OP_XOR:
             begin
-              cg.a_op_const_ref(list,op,OS_32,tcgint(lo(value)),tempref);
+              cg.a_op_const_ref(list,op,OS_32,aint(lo(value)),tempref);
               inc(tempref.offset,4);
-              cg.a_op_const_ref(list,op,OS_32,tcgint(hi(value)),tempref);
+              cg.a_op_const_ref(list,op,OS_32,aint(hi(value)),tempref);
             end;
           OP_ADD, OP_SUB:
             begin