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

rtl: using async function modifier

Browse Source
This commit is contained in:
mattias 2020-05-28 07:16:42 +00:00
parent efd8b125a2
commit bed2ddb8f2
2 changed files with 17 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl/js.pas
View File

@ -1,6 +1,6 @@
{ {
This file is part of the Pas2JS run time library. This file is part of the Pas2JS run time library.
Copyright (c) 2017 by Mattias Gaertner Copyright (c) 2017-2020 by the Pas2JS development team.
See the file COPYING.FPC, included in this distribution, See the file COPYING.FPC, included in this distribution,
for details about the copyright. for details about the copyright.

25
packages/rtl/web.pas
View File

@ -1,6 +1,6 @@
{ {
This file is part of the Pas2JS run time library. This file is part of the Pas2JS run time library.
Copyright (c) 2017-2019 by the Pas2JS development team. Copyright (c) 2017-2020 by the Pas2JS development team.
See the file COPYING.FPC, included in this distribution, See the file COPYING.FPC, included in this distribution,
for details about the copyright. for details about the copyright.
@ -1845,9 +1845,13 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property width: Integer read Fwidth; property width: Integer read Fwidth;
end; end;
TJSBlob = class;
TJSURL = class external name 'URL' (TJSObject)
public
class function createObjectURL(const v: JSValue): string; overload;
end;
TJSURL = class external name 'URL' (TJSObject);
TJSCSSStyleDeclaration = class; // forward TJSCSSStyleDeclaration = class; // forward
TJSTimerCallBack = reference to procedure; safecall; TJSTimerCallBack = reference to procedure; safecall;
@ -1862,8 +1866,8 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
function entries : TJSIterator; function entries : TJSIterator;
Function get(aName: String): string; Function get(aName: String): string;
Function has(aName: String): Boolean; Function has(aName: String): Boolean;
function keys : TJSIterator; function keys : TJSIterator; reintroduce;
function values : TJSIterator; function values : TJSIterator; reintroduce;
procedure set_(aName, aValue : String); procedure set_(aName, aValue : String);
Property Headers[aName : string] : string Read Get Write Set_; Property Headers[aName : string] : string Read Get Write Set_;
end; end;
@ -1905,9 +1909,11 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property body: TJSReadableStream read fbody; property body: TJSReadableStream read fbody;
property bodyUsed: Boolean read fbodyUsed; property bodyUsed: Boolean read fbodyUsed;
function arrayBuffer(): TJSPromise; // resolves to TJSArrayBuffer function arrayBuffer(): TJSPromise; // resolves to TJSArrayBuffer
function blob(): TJSPromise; // resolves to TJSBlob //function blob(): TJSPromise; // resolves to TJSBlob
function blob: TJSBlob; async;
function json(): TJSPromise; // resolves to JSON / TJSValue function json(): TJSPromise; // resolves to JSON / TJSValue
function text(): TJSPromise; // resolves to USVString, always decoded using UTF-8 //function text(): TJSPromise; // resolves to USVString, always decoded using UTF-8
function text(): string; async;
end; end;
TJSResponse = class external name 'Response' (TJSBody) TJSResponse = class external name 'Response' (TJSBody)
@ -2052,7 +2058,8 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
Procedure close; Procedure close;
Function confirm(Const aMsg : String) : boolean; Function confirm(Const aMsg : String) : boolean;
function fetch(resource: String; init: TJSObject): TJSPromise; overload; external name 'fetch'; function fetch(resource: String; init: TJSObject): TJSPromise; overload; external name 'fetch';
function fetch(resource: String): TJSPromise; overload; external name 'fetch'; //function fetch(resource: String): TJSPromise; overload; external name 'fetch';
function fetch(resource: String): TJSResponse; async; overload; external name 'fetch';
function fetch(resource: TJSObject; init: TJSObject): TJSPromise; overload; external name 'fetch'; function fetch(resource: TJSObject; init: TJSObject): TJSPromise; overload; external name 'fetch';
function fetch(resource: TJSObject): TJSPromise; overload; external name 'fetch'; function fetch(resource: TJSObject): TJSPromise; overload; external name 'fetch';
procedure focus; procedure focus;
@ -3678,7 +3685,7 @@ var
document : TJSDocument; external name 'document'; document : TJSDocument; external name 'document';
window : TJSWindow; external name 'window'; window : TJSWindow; external name 'window';
console : TJSConsole; external name 'window.console'; console : TJSConsole; external name 'window.console';
implementation implementation
end. end.