Przeglądaj źródła

* clarify/ensure intended order of evaluation

git-svn-id: trunk@35138 -
Jonas Maebe 9 lat temu
rodzic
commit
5bd03651a9
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      compiler/paramgr.pas

+ 2 - 2
compiler/paramgr.pas

@@ -611,8 +611,8 @@ implementation
           is always returned in param.
           is always returned in param.
           Furthermore, any managed type is returned in param, in order to avoid
           Furthermore, any managed type is returned in param, in order to avoid
           its finalization on exception at callee side. }
           its finalization on exception at callee side. }
-        if (tf_safecall_exceptions in target_info.flags) and
-           (pd.proccalloption=pocall_safecall) or
+        if ((tf_safecall_exceptions in target_info.flags) and
+            (pd.proccalloption=pocall_safecall)) or
            (
            (
              (pd.proctypeoption=potype_constructor)and
              (pd.proctypeoption=potype_constructor)and
              (
              (