2
0
Эх сурвалжийг харах

* fixed range error

git-svn-id: trunk@35151 -
Jonas Maebe 8 жил өмнө
parent
commit
fe6b662c37
1 өөрчлөгдсөн 1 нэмэгдсэн , 1 устгасан
  1. 1 1
      compiler/ncgrtti.pas

+ 1 - 1
compiler/ncgrtti.pas

@@ -649,7 +649,7 @@ implementation
               otUQWord:
                 begin
                   tcb.emit_ord_const(def.low.uvalue,u64inttype);
-                  tcb.emit_ord_const(def.high.uvalue,u64inttype);
+                  tcb.emit_ord_const(int64(def.high.uvalue),u64inttype);
                 end;
               otSQWord:
                 begin