paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-05 18:17:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Add T(G|JS)Generator and Proxy classes. Closes !47

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-12-13 15:38:40 +01:00
parent eb8e63aa30
commit 1f74abd200
1 changed files with 22 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
packages/rtl/src/js.pas
View File

@ -973,6 +973,28 @@ type
Property Encoding : string Read FEncoding;
end;
generic TGGenerator<T> = class external name 'Generator' (TJSObject)
private type
TGGeneratorValue = class external name 'Generator' (TJSObject)
public
done: Boolean;
value: T;
end;
public
function next: TGGeneratorValue; overload;
function next(Value: T): TGGeneratorValue; overload;
function return: TGGeneratorValue; overload;
function return(Value: T): TGGeneratorValue; overload;
function throw(Error: TJSError): TGGeneratorValue;
end;
TJSGenerator = specialize TGGenerator<JSValue>;
TJSProxy = class external name 'Proxy' (TJSObject)
public
constructor New(Target, Handler: TJSObject);
end;
var
// JSArguments can be used in procedures/functions to provide access to the 'arguments' array.