 (def-rpc-opt listsinceblock 0 blockhash target_confirmations include_watchonly)
 (def-rpc-opt listtransactions 0 account count skip include_watchonly)
 (def-rpc-opt listunspent 0 minconf maxconf  addresses include_unsafe)
-;lockunspent unlock ([{"txid":"txid","vout":n},...])
+(def-rpc-opt lockunspent 0 unlock todo)
 (def-rpc-opt move 3 fromaccount toaccount amount minconf comment)
 (def-rpc removeprunedfunds txid)
 (def-rpc-opt sendfrom 3 fromaccount toaddress amount  minconf comment comment_to)

(def-rpc-opt gettransaction 1 txid include_watchonly)
(def-rpc getunconfirmedbalance)
(def-rpc getwalletinfo)
;importaddress "address" ( "label" rescan p2sh )
(def-rpc importmulti requests options)
;importprivkey "bitcoinprivkey" ( "label" ) ( rescan )
(def-rpc importprunedfunds)
;importpubkey "pubkey" ( "label" rescan )
(def-rpc importwallet filename)
(def-rpc-opt keypoolrefill 0 newsize)
(def-rpc-opt listaccounts 0 minconf include_watchonly)

  `(let [x# ~body]
     (println "dbg:" '~body "=" x#)
     x#))

(defmacro def-rpc-opt [name n & args]
  `(defn ~name ~(get-description name) 
