#lang racket
(require (planet jaymccarthy/xml-rpc)
         net/url)
(define adder
  (xml-rpc-server (string->url "http://localhost:8888/servlets/rpc/xmlrpc.rkt")))
(define math.add (adder 'math.add))
(math.add 3 4)