(use extras)
(use xml-rpc-client)

(define rtorrent
  (xml-rpc-server "localhost/RPC2"))

(define get-all-supported-methods
  (rtorrent "system.listMethods"))

(pp
 (array->list 
  (get-all-supported-methods)))