Module XmlRpcServer

module XmlRpcServer: sig .. end

Example:

    let server = new XmlRpcServer.cgi () in
    server#register "demo.sayHello"
      (fun _ -> `String "Hello!");
    server#run () 

By inheriting from XmlRpcServer.base, all servers provide the following introspection functions by default: system.listMethods, system.getCapabilities. To prevent their use, use server#unregister.

Additionally, the methods system.methodHelp and system.methodSignature will be made available if at least one method help or method signature is provided.

type param_type = [ `Array
       | `Binary
       | `Boolean
       | `DateTime
       | `Double
       | `Int
       | `String
       | `Struct
       | `Undefined ] 

Base classes

class virtual base : object .. end

class type server = object .. end

Server implementations

class cgi : unit -> server

class netplex : ?parallelizer:Netplex_types.parallelizer -> ?handler:string -> unit -> server

Utility functions

val invalid_method : string -> 'a

val invalid_params : unit -> 'a