فهرست منبع

* clarify/ensure intended order of evaluation

git-svn-id: trunk@35138 -
Jonas Maebe 8 سال پیش
والد
کامیت
5bd03651a9
1فایلهای تغییر یافته به همراه2 افزوده شده و 2 حذف شده
  1. 2 2
      compiler/paramgr.pas

+ 2 - 2
compiler/paramgr.pas

@@ -611,8 +611,8 @@ implementation
           is always returned in param.
           Furthermore, any managed type is returned in param, in order to avoid
           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
              (