                         nil #_(or (= (nth (last style-vec) 2) :comment)
                             (= (nth (last style-vec) 2) :comment-inline)))
 			    ; i132
-                  (do #_(println "******************") 1)
+                  (do (println "******************") 1)
                   0)
                 #_0 ;newline-count
                 )))))))

            comment? (if respect-nl? nil
	    (or (= last-what :comment) (= last-what :comment-inline)))] ; i132
        #_(prn "precede-w-nl: element:" element
               "comment?:" comment?)
        (recur (next coll)
               ; Move along ind-seq until we reach the last one, then just
               ; keep using the last one.

          r-str-vec (rstr-vec options (+ indent ind) zloc r-str)]
      (if (empty? pair-seq)
        (concat-no-nil l-str-vec r-str-vec)
        (let [_ (dbg-pr options
                     "fzprint-map*:" (zstring zloc)
                     "ind:" ind
                     "comma?" comma?
