<commit_before>(ns midje.util.debugging)

(defn nopret [val] val)
(defn pret [val]
  (println val)
  val)

<commit_msg>printing with nested indentation.<commit_after>(ns midje.util.debugging
  (:require [clojure.contrib.string :as str]))

(def indent-count (atom 0))
(def indent (atom ""))

(defn p [& tags]
  (apply (partial println @indent) tags))

(defn p+ [& tags]
  (swap! indent-count inc)
  (swap! indent #(str (str/butlast 1 %) @indent-count ">"))
  (apply p tags))

(defn nopret [val] val)
(defn pret [val]
  (p val)
  (swap! indent-count dec)
  (swap! indent #(str (str/butlast 2 %) ">"))
  val)


{'fraction_non_alphanumeric': 0.17792421746293247, 'fraction_numerical': 0.004942339373970346, 'mean_word_length': 4.109243697478991, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 5, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '3685419', 'n_tokens_mistral': 249, 'n_tokens_neox': 239, 'n_words': 69}