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

* fixed type in second_class_to_intf if the class was in a LOC_REGISTER

git-svn-id: trunk@32422 -
Jonas Maebe 9 жил өмнө
parent
commit
a55e9a8b0a

+ 4 - 1
compiler/ncgcnv.pas

@@ -699,7 +699,10 @@ interface
                  hlcg.a_load_reg_reg(current_asmdata.CurrAsmList,left.resultdef,resultdef,left.location.register,location.register);
                  hlcg.a_load_reg_reg(current_asmdata.CurrAsmList,left.resultdef,resultdef,left.location.register,location.register);
               end;
               end;
             LOC_REGISTER:
             LOC_REGISTER:
-              location.register:=left.location.register;
+              begin
+                location.register:=left.location.register;
+                hlcg.g_ptrtypecast_reg(current_asmdata.CurrAsmList,left.resultdef,resultdef,location.register);
+              end
             else
             else
               internalerror(121120001);
               internalerror(121120001);
          end;
          end;