소스 검색

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

git-svn-id: trunk@32422 -
Jonas Maebe 9 년 전
부모
커밋
a55e9a8b0a
1개의 변경된 파일4개의 추가작업 그리고 1개의 파일을 삭제
  1. 4 1
      compiler/ncgcnv.pas

+ 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);
               end;
             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
               internalerror(121120001);
          end;