mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-08-14 00:50:25 +02:00
* fcl-rpc namespaced
This commit is contained in:
parent
8b9c9cd5d6
commit
2026290a99
3
packages/fcl-rpc/namespaced/FpRPC.Client.pas
Normal file
3
packages/fcl-rpc/namespaced/FpRPC.Client.pas
Normal file
@ -0,0 +1,3 @@
|
|||||||
|
{$DEFINE FPC_DOTTEDUNITS}
|
||||||
|
unit FpRPC.Client;
|
||||||
|
{$include ../src/fprpcclient.pp}
|
3
packages/fcl-rpc/namespaced/FpRPC.CodeGen.pas
Normal file
3
packages/fcl-rpc/namespaced/FpRPC.CodeGen.pas
Normal file
@ -0,0 +1,3 @@
|
|||||||
|
{$DEFINE FPC_DOTTEDUNITS}
|
||||||
|
unit FpRPC.CodeGen;
|
||||||
|
{$include ../src/fprpccodegen.pp}
|
@ -1,4 +1,20 @@
|
|||||||
|
{
|
||||||
|
This file is part of the Pas2JS run time library.
|
||||||
|
Copyright (c) 2023 by Michael Van Canneyt
|
||||||
|
|
||||||
|
JSON-RPC Client
|
||||||
|
|
||||||
|
See the file COPYING.FPC, included in this distribution,
|
||||||
|
for details about the copyright.
|
||||||
|
|
||||||
|
This program is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||||
|
|
||||||
|
**********************************************************************}
|
||||||
|
{$IFNDEF FPC_DOTTEDUNITS}
|
||||||
unit fprpcclient;
|
unit fprpcclient;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$mode ObjFPC}
|
{$mode ObjFPC}
|
||||||
{$modeswitch advancedrecords}
|
{$modeswitch advancedrecords}
|
||||||
@ -6,7 +22,11 @@ unit fprpcclient;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
|
{$IFDEF FPC_DOTTEDUNITS}
|
||||||
|
System.Classes, System.SysUtils, JSApi.JS;
|
||||||
|
{$ELSE}
|
||||||
Classes, SysUtils, JS;
|
Classes, SysUtils, JS;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
Const
|
Const
|
||||||
DefaultJSONRPCversion = '2.0';
|
DefaultJSONRPCversion = '2.0';
|
||||||
@ -228,7 +248,12 @@ Type
|
|||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses web;
|
uses
|
||||||
|
{$IFDEF FPC_DOTTEDUNITS}
|
||||||
|
BrowserApi.Web;
|
||||||
|
{$ELSE}
|
||||||
|
web;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{ TRPCCustomService }
|
{ TRPCCustomService }
|
||||||
|
|
@ -1,12 +1,32 @@
|
|||||||
|
{
|
||||||
|
This file is part of the Pas2JS run time library.
|
||||||
|
Copyright (c) 2023 by Michael Van Canneyt
|
||||||
|
|
||||||
|
JSON-RPC Client code generation
|
||||||
|
|
||||||
|
See the file COPYING.FPC, included in this distribution,
|
||||||
|
for details about the copyright.
|
||||||
|
|
||||||
|
This program is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||||
|
|
||||||
|
**********************************************************************}
|
||||||
|
{$IFNDEF FPC_DOTTEDUNITS}
|
||||||
unit fprpccodegen;
|
unit fprpccodegen;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$mode ObjFPC}
|
{$mode ObjFPC}
|
||||||
{$h+}
|
{$h+}
|
||||||
|
|
||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
|
{$IFDEF FPC_DOTTEDUNITS}
|
||||||
|
System.Classes, System.SysUtils, FpJson.Data, Pascal.CodeGenerator;
|
||||||
|
{$ELSE}
|
||||||
Classes, SysUtils, fpjson, pascodegen;
|
Classes, SysUtils, fpjson, pascodegen;
|
||||||
|
{$ENDIF}
|
||||||
type
|
type
|
||||||
|
|
||||||
{ TAPIClientCodeGen }
|
{ TAPIClientCodeGen }
|
Loading…
Reference in New Issue
Block a user