You've already forked lazarus-ccr
46 lines
1.1 KiB
ObjectPascal
46 lines
1.1 KiB
ObjectPascal
![]() |
{
|
||
|
This file is part of the Web Service Toolkit
|
||
|
Copyright (c) 2006 by Inoussa OUEDRAOGO
|
||
|
|
||
|
This file is provide under modified LGPL licence
|
||
|
( the files COPYING.modifiedLGPL and COPYING.LGPL).
|
||
|
|
||
|
|
||
|
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.
|
||
|
}
|
||
|
library lib_server;
|
||
|
|
||
|
{$mode objfpc}{$H+}
|
||
|
|
||
|
uses
|
||
|
SysUtils, Classes,
|
||
|
|
||
|
base_service_intf,
|
||
|
server_service_intf,
|
||
|
server_service_soap, server_binary_formatter,
|
||
|
metadata_repository, metadata_wsdl,
|
||
|
metadata_service, metadata_service_binder, metadata_service_imp,
|
||
|
library_base_intf, library_server_intf,
|
||
|
|
||
|
calculator_binder, calculator_imp;
|
||
|
|
||
|
|
||
|
|
||
|
exports
|
||
|
wstHandleRequest name WST_LIB_HANDLER;
|
||
|
|
||
|
begin
|
||
|
RegisterStdTypes();
|
||
|
Server_service_RegisterBinaryFormat();
|
||
|
Server_service_RegisterSoapFormat();
|
||
|
|
||
|
RegisterCalculatorImplementationFactory();
|
||
|
Server_service_RegisterCalculatorService();
|
||
|
|
||
|
Server_service_RegisterWSTMetadataServiceService();
|
||
|
RegisterWSTMetadataServiceImplementationFactory();
|
||
|
end.
|
||
|
|