#lang racket (require "core.rkt" "base.rkt") (provide (struct-out exn:xml-rpc) (struct-out exn:xml-rpc:fault) xml-rpc-server)