From 5bd03651a957222c8cc4b7c1c1aec3ce8375bdf8 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Fri, 16 Dec 2016 22:38:04 +0000 Subject: [PATCH] * clarify/ensure intended order of evaluation git-svn-id: trunk@35138 - --- compiler/paramgr.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/paramgr.pas b/compiler/paramgr.pas index cfe6c06ad0..ef69ea4b55 100644 --- a/compiler/paramgr.pas +++ b/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 (