소스 검색

* properly force the result type after r45217

git-svn-id: trunk@45220 -
florian 5 년 전
부모
커밋
de805fddcd
1개의 변경된 파일3개의 추가작업 그리고 0개의 파일을 삭제
  1. 3 0
      compiler/nbas.pas

+ 3 - 0
compiler/nbas.pas

@@ -757,6 +757,9 @@ implementation
           begin
             result:=tassignmentnode(a[1].left).right;
             tassignmentnode(a[1].left).right:=nil;
+            { ensure the node is first passed, so the resultdef does not get changed if the
+              the type conv. below is merged }
+            firstpass(result);
             result:=ctypeconvnode.create_internal(result,ttemprefnode(a[3].left).resultdef);
             firstpass(result);
             exit;