<commit_before> ;;; red-jonprl-mode.el --- Red-Jonprl major mode

(defvar red-jonprl-map
  (let ((map (make-sparse-keymap)))
    map)
  "Keymap for `red-jonprl-mode'.")

(defvar red-jonprl-syntax-table
  (let ((table (make-syntax-table)))
    ; C++-style comment start
    (modify-syntax-entry ?\/ ". 12b" table)
    ; end comment on line-break
    (modify-syntax-entry ?\n "> b" table)
    table)
  "Syntax table for `red-jonprl-mode'.")

(defvar red-jonprl-vernacular-keywords-regexp
  (regexp-opt
   '("Def" "Thm" "Sym" "Tac")
   'words))

(defvar red-jonprl-builtin-constants-regexp
  (regexp-opt
   '("Base" "lbase" "lsuc" "Ax" "Univ" "member" "Squash" "Ensemble" "extract")
   'words))<commit_msg>[emacs] highlight Atom<commit_after> ;;; red-jonprl-mode.el --- Red-Jonprl major mode

(defvar red-jonprl-map
  (let ((map (make-sparse-keymap)))
    map)
  "Keymap for `red-jonprl-mode'.")

(defvar red-jonprl-syntax-table
  (let ((table (make-syntax-table)))
    ; C++-style comment start
    (modify-syntax-entry ?\/ ". 12b" table)
    ; end comment on line-break
    (modify-syntax-entry ?\n "> b" table)
    table)
  "Syntax table for `red-jonprl-mode'.")

(defvar red-jonprl-vernacular-keywords-regexp
  (regexp-opt
   '("Def" "Thm" "Sym" "Tac")
   'words))

(defvar red-jonprl-builtin-constants-regexp
  (regexp-opt
   '("Base" "lbase" "lsuc" "Ax" "Univ" "member" "Squash" "Ensemble" "extract" "Atom")
   'words))
{'fraction_non_alphanumeric': 0.189873417721519, 'fraction_numerical': 0.0028129395218002813, 'mean_word_length': 3.419254658385093, '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': '2192920', 'n_tokens_mistral': 605, 'n_tokens_neox': 585, 'n_words': 120}