'XML-RPC client'
'This example Funk2 code was downloaded from http://funk2.org/example/xmlrpc_client.fu2'

'Copyright (c) 2007-2011 Bo Morgan.
 All rights reserved.
 
 Author: Bo Morgan
 
 Permission to use, copy, modify and distribute this software and its
 documentation is hereby granted, provided that both the copyright
 notice and this permission notice appear in all copies of the
 software, derivative works or modified versions, and any portions
 thereof, and that both notices appear in supporting documentation.
 
 BO MORGAN ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" CONDITION.
 BO MORGAN DISCLAIMS ANY LIABILITY OF ANY KIND FOR ANY DAMAGES
 WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
 
 Bo Morgan requests users of this software to return to bo@mit.edu any
 improvements or extensions that they make and grant Bo Morgan the
 rights to redistribute these changes.'


[defunk xmlrpc-test []
  
  'First, we require the xmlrpc package, which defines the xmlrpc_client
object.'
  
  [require xmlrpc]
  
  
  'Next, we create the xmlrpc_client object with the specified URL for
the xmlrpc server that we want to use.'
  
  [globalize client [new xmlrpc_client 'http://localhost:2222/RPC2']]
  
  
  'Finally, we call a sample function on the server.'
  
  [have client call `sample.add 1 2]
  
  ]