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

pastojs: fixed create pascal class descendent from a pascal class descendent of a JS function

Browse Source 
git-svn-id: trunk@46807 -
This commit is contained in:
Mattias Gaertner 2020-09-09 11:24:56 +00:00
parent 9d3daca70c
commit 342771c0c7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
utils/pas2js/dist/rtl.js vendored
View File

@ -353,6 +353,7 @@ var rtl = {
if (isFunc){ if (isFunc){
// create pascal class descendent from JS function // create pascal class descendent from JS function
c = Object.create(ancestor.prototype); c = Object.create(ancestor.prototype);
c.$ancestorfunc = ancestor;
} else if (ancestor.$func){ } else if (ancestor.$func){
// create pascal class descendent from a pascal class descendent of a JS function // create pascal class descendent from a pascal class descendent of a JS function
isFunc = true; isFunc = true;
@ -397,7 +398,6 @@ var rtl = {
function f(){} function f(){}
f.prototype = c; f.prototype = c;
c.$func = f; c.$func = f;
c.$ancestorfunc = ancestor;
} }
}, },