let-array clojure macro used to destructure a Java array.

gistfile2.clj

(defn -initialize [this params]
  (let-array [
    {:keys [is-starting-node connections-on-spawn starting-nodes]
     :or {is-starting-node false}
     :as options} params]
    (dosync (alter (.state this) merge options))
    true))

let-array.clj

(defmacro let-array [[{keys :keys defaults :or options :as} params] & body]
  `(let [{:keys ~keys :or ~defaults :as ~options}
          (apply hash-map (interleave (map keyword '~keys) ~params))]
    ~@body))