paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 14:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Patch from Mattias Gaertner to fix new (a())()

Browse Source 
git-svn-id: trunk@35640 -
This commit is contained in:
michael 2017-03-23 15:01:16 +00:00
parent 406c7caa6f
commit 676b25cc93
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/fcl-js/src/jswriter.pp
View File

@ -784,7 +784,8 @@ begin
if (MExpr is TJSPrimaryExpression) if (MExpr is TJSPrimaryExpression)
or (MExpr is TJSDotMemberExpression) or (MExpr is TJSDotMemberExpression)
or (MExpr is TJSBracketMemberExpression) or (MExpr is TJSBracketMemberExpression)
or (MExpr is TJSCallExpression) // Note: new requires brackets in this case: new (a())()
or ((MExpr is TJSCallExpression) and not (El is TJSNewMemberExpression))
or (MExpr is TJSLiteral) then or (MExpr is TJSLiteral) then
WriteJS(MExpr) WriteJS(MExpr)
else else