(define (invoke METHOD ARGS (FLAGS 0))
(when (regex "((.+):)?((.+)\\.)?([^(]+)\\((.*)\\)$" METHOD 0)
(let ((PATH $2) (INTERFACE $4) (MEMBER $5) (SIGNATURE $6))
(define (invoke METHOD ARGS (FLAGS 0))
(when (regex "((.+):)?((.+)\\.)?([^(]+)\\((.*)\\)$" METHOD 0)
(let ((PATH $2) (INTERFACE $4) (MEMBER $5) (SIGNATURE $6))