소스 검색

* if an invokable that isn't a function reference is followed by a point in a mode that doesn't use TP/Delphi style calling without parameters then don't call it like is done with normal procvars

Sven/Sarah Barth 3 년 전
부모
커밋
f2305d1cee
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      compiler/pexpr.pas

+ 1 - 1
compiler/pexpr.pas

@@ -2317,7 +2317,7 @@ implementation
                  end;
                { procvar.<something> can never mean anything so always
                  try to call it in case it returns a record/object/... }
-               maybe_call_procvar(p1,false);
+               maybe_call_procvar(p1,is_invokable(p1.resultdef) and not is_funcref(p1.resultdef));
 
                if (p1.nodetype=ordconstn) and
                    not is_boolean(p1.resultdef) and