(module mzrpc mzscheme
        (require "rpc-marshal.scm")
        (require "rpc-function-definer.scm")
        (require "rpc-server.scm")
        (require "rpc-client.scm")
        (require "rpc-log.scm")
        
        (spod-module-def)
        (spod-module-add (s= "mzrpc - Yet another RPC for mzscheme"))
        (spod-module-add (sp "mzrpc makes it possible to do RPC over TCP/IP using mzscheme. "
                             "It allows to define server side functions using " (s% "rpc-define") " and "
                             "client side equivalents using " (s% "rpc-client-define") "."))
        (spod-module-add (sitems 
                          (s- (slink "rpc-client" "Client API."))
                          (s- (slink "rpc-server" "Server API.")))
                         )

        (define %module-doc (spod-module-doc))
        (define (mzrpc-documentation)
          %module-doc)
        
        (provide mzrpc-documentation
                 (all-from "rpc-marshal.scm")
                 (all-from "rpc-function-definer.scm")
                 (all-from "rpc-server.scm")
                 (all-from "rpc-client.scm")
                 (all-from "rpc-log.scm"))
        
        );;;; module-end