 (def-rpc settxfee amount)
 (def-rpc signmessage address message)
 
-
 ;;--------------------------------
 
 

     <OPTIONAL-SPACE> = <#'[ \t\n]*'>
"))




(defn repl-init []
  (sock-repl/repl-init)

  (insta/parser
    "BTC = (<'=='> SPACE TITLE SPACE <'=='> NEW-LINE FUNCTIONS)*
     FUNCTIONS = (FUNCTION NEW-LINE)*
     FUNCTION = SYMBOL | (SYMBOL SPACE ARGS)
     ARGS = ((ARG SPACE)* ARG)*
     <ARG> = MAP-ARG | LIST-ARG | STRING-SYMBOL | SYMBOL | OPTIONAL-ARG
     OPTIONAL-ARG = (<'('> OPTIONAL-SPACE ARG OPTIONAL-SPACE <')'>)
     LIST-ARG = <'['> ARGS <',...'> <']'>
     MAP-ARG = (<'{'>) ((KEY-VALUE <','>)* KEY-VALUE) (<'}'>)
     KEY-VALUE = ARG <':'> ARG
     OPEN-KEY-VALUE = (KEY-VALUE <',...'>)
     STRING-SYMBOL = ('\"' SYMBOL '\"')
     
     <TITLE> = SYMBOL
     NEW-LINE = '\n' | Epsilon
     SYMBOL = #'[a-zA-Z_]'  #'\\w'*
