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

rtl: fixed SetMethodProp normal function

Browse Source
This commit is contained in:
mattias 2019-10-22 11:39:31 +00:00
parent c79684f8d9
commit 07c76c5111
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
packages/rtl/typinfo.pas
View File

@ -1447,7 +1447,10 @@ begin
end
else if isString(TJSObject(Code)['fn']) then
// named callback, different scope
cb:=createCallbackStr(Value.Data,string(TJSObject(Code)['fn']));
cb:=createCallbackStr(Value.Data,string(TJSObject(Code)['fn']))
else
// normal function
cb:=createCallbackPtr(Value.Data,Code);
end
else
// not a valid value -> for compatibility set it anyway