paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-06 10:37:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

pastojs: fixed shortrefglobals for proc without args, issue 38043

Browse Source
This commit is contained in:
mattias 2020-11-07 11:05:09 +00:00
parent e760b9bd79
commit d497f63429
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/packages/pastojs/src/fppas2js.pp
View File

@ -9828,6 +9828,8 @@ var
CreateProcedureCall(Call,nil,ProcType,AContext);
if ApplyParam<>nil then
begin
if Call.Args=nil then
Call.Args:=TJSArguments(CreateElement(TJSArguments,ProcType));
Call.InsertArg(0,ApplyParam);
ApplyParam:=nil;
if AContext is TDotContext then