   (insta/parser
     "BTC = (<'=='> SPACE TITLE SPACE <'=='> NEW-LINE FUNCTIONS)*
      FUNCTIONS = (FUNCTION NEW-LINE)*
-     FUNCTION = SYMBOL SPACE ARGS
+     FUNCTION = SYMBOL | (SYMBOL SPACE ARGS)
      ARGS = ((ARG SPACE)* ARG)*
-     ARG = (<'\"'> SYMBOL <'\"'>) | SYMBOL | (<'('> OPTIONAL-SPACE SYMBOL OPTIONAL-SPACE <')'>)
+     <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'*

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




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

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

;;--------------------------------


