libs/xml-rpc/test.factor

   1 USING: xml-rpc test ;
   2
   3 [ T{ rpc-method f "blah" { 1 H{ { "2" 3 } { "5" "foobar" } } } } ]
   4 [ "blah" { 1 H{ { "2" 3 } { "5" "foobar" } } }
   5     <rpc-method> send-rpc receive-rpc ] unit-test