     rules))
 
 (defn- create-let-body-vec-csv-str-out
-  [rules output]
+  [rules output nesting-level]
   (reduce
     (fn [v rule]
       (let [tmp-v (if (some #{:string} rule)

    rules))

(defn- create-let-body-vec-json-str-out
  [rules output]
  (reduce
    (fn [v rule]
      (let [tmp-k (conj v `(.append "\"") `(.append ~(name (first rule))) `(.append "\":"))

        let-body-vec (condp (fn [^String v ^String s] (.startsWith s v)) output-type
                       "java-map" (create-let-body-vec-java-map-out rules output-sym 0)
                       "clj-map" (create-let-body-vec-clj-map-out rules output-sym 0)
                       "csv-str" (create-let-body-vec-csv-str-out rules output-sym 0)
                       "json-str" (create-let-body-vec-json-str-out rules output-sym 0)
                       (do
                         (println "Unknown output type:" output-type)
                         (println "Defaulting to :java-map as output type.")
