<commit_before>;;;===================================================================
;;; This file was generated by Org. Do not edit it directly.
;;; Instead, edit Lodox.org in Emacs and call org-babel-tangle.
;;;===================================================================

(defmacro doto
  "Evaluate all given s-expressions and functions in order,
for their side effects, with the value of `x` as the first argument
and return `x`."
  (`(,x . ,sexps)
   `(progn
      ,@(lists:map
          (match-lambda
            ([`(,f . ,args)] `(,f ,x ,@args))
            ([f]             `(,f ,x)))
          sexps)
      ,x)))

(defmacro iff (test then)
  "Given a `test` that returns a boolean, if `test` is `true`, return `then`,
  otherwise `false`."
  `(if ,test ,then))<commit_msg>Make doto more hygienic<commit_after>;;;===================================================================
;;; This file was generated by Org. Do not edit it directly.
;;; Instead, edit Lodox.org in Emacs and call org-babel-tangle.
;;;===================================================================

(defmacro doto
  "Evaluate all given s-expressions and functions in order,
for their side effects, with the value of `x` as the first argument
and return `x`."
  (`(,x . ,sexps)
   `(let ((,'y ,x))
      ,@(lists:map
          (match-lambda
            ([`(,f . ,args)] `(,f ,'y ,@args))
            ([f]             `(,f ,'y)))
          sexps)
      ,'y)))

(defmacro iff (test then)
  "Given a `test` that returns a boolean, if `test` is `true`, return `then`,
  otherwise `false`."
  `(if ,test ,then))
{'fraction_non_alphanumeric': 0.305, 'fraction_numerical': 0.0, 'mean_word_length': 3.327027027027027, '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': '3481186', 'n_tokens_mistral': 502, 'n_tokens_neox': 472, 'n_words': 170}