0.1.0-SNAPSHOT permalink Arrow_down_16x16

group-container-args

clj-swing.core

  • (group-container-args args)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source clj_swing/core.clj:13 top

(defn group-container-args [args]
  (reduce 
   (fn [{options :options kw :kw state :state :as r} arg]
     (cond
      (= state :forms)
      (update-in r [:forms] conj arg)
      kw
      (assoc r :options (assoc options kw arg) :kw nil)
      (keyword? arg)
      (assoc r :kw arg)
      (vector? arg)
      (assoc r :bindings arg :state :forms)))
   {:options {} :kw nil :state :options :forms []} args))
Vars in clj-swing.core/group-container-args: = assoc cond conj defn fn keyword? reduce update-in vector?
Used in 0 other vars

Comments top

No comments for group-container-args. Log in to add a comment.