فهرست منبع

* don't check type size equality for conversions to formaldef either

git-svn-id: trunk@33987 -
Jonas Maebe 9 سال پیش
والد
کامیت
8c006f04e2
1فایلهای تغییر یافته به همراه1 افزوده شده و 0 حذف شده
  1. 1 0
      compiler/llvm/nllvmcnv.pas

+ 1 - 0
compiler/llvm/nllvmcnv.pas

@@ -233,6 +233,7 @@ procedure tllvmtypeconvnode.second_nothing;
         if not is_void(left.resultdef) and
         if not is_void(left.resultdef) and
            not(nf_absolute in flags) and
            not(nf_absolute in flags) and
            (left.resultdef.typ<>formaldef) and
            (left.resultdef.typ<>formaldef) and
+           (resultdef.typ<>formaldef) and
            not is_open_array(resultdef) and
            not is_open_array(resultdef) and
            not is_open_array(left.resultdef) and
            not is_open_array(left.resultdef) and
           (left.resultdef.size<>resultdef.size) then
           (left.resultdef.size<>resultdef.size) then