<commit_before>(ns midje.util.thread-safe-var-nesting)

(defn push-safely [the-var some-sequence]
  (alter-var-root the-var (partial cons some-sequence)))

(defn pop-safely [the-var]
  (alter-var-root the-var rest))<commit_msg>Starting to centralize weird variable-like functions.<commit_after>(ns midje.util.thread-safe-var-nesting)

(defn push-safely [the-var some-sequence]
  (alter-var-root the-var (partial cons some-sequence)))

(defn pop-safely [the-var]
  (alter-var-root the-var rest))

(defn set-namespace-pseudovariable [key-name newval] 
  (alter-meta! *ns* merge {key-name newval}))
{'fraction_non_alphanumeric': 0.15126050420168066, 'fraction_numerical': 0.0, 'mean_word_length': 4.730769230769231, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, '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': '4928154', 'n_tokens_mistral': 226, 'n_tokens_neox': 219, 'n_words': 47}