Explorar el Código

* fix range error

git-svn-id: trunk@1974 -
peter hace 19 años
padre
commit
5942d23b1b
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      compiler/i386/n386mat.pas

+ 1 - 1
compiler/i386/n386mat.pas

@@ -170,7 +170,7 @@ implementation
                 else
                 else
                   a:=0;
                   a:=0;
                 cg.getcpuregister(exprasmlist,NR_EAX);
                 cg.getcpuregister(exprasmlist,NR_EAX);
-                emit_const_reg(A_MOV,S_L,m,NR_EAX);
+                emit_const_reg(A_MOV,S_L,aint(m),NR_EAX);
                 cg.getcpuregister(exprasmlist,NR_EDX);
                 cg.getcpuregister(exprasmlist,NR_EDX);
                 emit_reg(A_IMUL,S_L,hreg1);
                 emit_reg(A_IMUL,S_L,hreg1);
                 emit_reg_reg(A_MOV,S_L,hreg1,NR_EAX);
                 emit_reg_reg(A_MOV,S_L,hreg1,NR_EAX);