1.2.0 permalink Arrow_down_16x16



  • (pprint-binding-form binding-vec)

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 clojure/contrib/pprint/dispatch.clj:199 top

(defn pprint-binding-form [binding-vec]
  (pprint-logical-block :prefix "[" :suffix "]"
    (loop [binding binding-vec]
      (when (seq binding)
        (pprint-logical-block binding
          (write-out (first binding))
          (when (next binding)
            (.write ^java.io.Writer *out* " ")
            (pprint-newline :miser)
            (write-out (second binding))))
        (when (next (rest binding))
          (.write ^java.io.Writer *out* " ")
          (pprint-newline :linear)
          (recur (next (rest binding))))))))
Vars in clojure.contrib.pprint/pprint-binding-form: pprint-logical-block pprint-newline write-out *out* binding defn first loop next rest second seq when
Used in 1 other vars pprint-let

Comments top

No comments for pprint-binding-form. Log in to add a comment.