소스 검색

* fixed handling of currency in int_to_int conversions

git-svn-id: branches/jvmbackend@18741 -
Jonas Maebe 14 년 전
부모
커밋
af489b99de
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      compiler/jvm/njvmcnv.pas

+ 2 - 1
compiler/jvm/njvmcnv.pas

@@ -222,7 +222,8 @@ implementation
 
     function tjvmtypeconvnode.first_int_to_real: tnode;
       begin
-        if not is_64bitint(left.resultdef) then
+        if not is_64bitint(left.resultdef) and
+           not is_currency(left.resultdef) then
           if is_signed(left.resultdef) or
              (left.resultdef.size<4) then
             inserttypeconv(left,s32inttype)