Function: clojure--find-arglist-metadata-start

clojure--find-arglist-metadata-start is a byte-compiled function defined in clojure-mode.el.

Signature

(clojure--find-arglist-metadata-start BRACKET-POS)

Documentation

Return the start of metadata annotations before BRACKET-POS.

If no metadata is found, return BRACKET-POS. Handles ^Type, ^:keyword, ^{:key val}, and chains like ^:private ^String. Relies on ^ having prefix syntax (') in the Clojure syntax table, which makes backward-sexp from [ treat ^String [ as two sexps.

Source Code

;; Defined in ~/.emacs.d/elpa/clojure-mode-20260325.811/clojure-mode.el
(defun clojure--find-arglist-metadata-start (bracket-pos)
  "Return the start of metadata annotations before BRACKET-POS.
If no metadata is found, return BRACKET-POS.
Handles ^Type, ^:keyword, ^{:key val}, and chains like ^:private ^String.
Relies on ^ having prefix syntax (\\=') in the Clojure syntax table,
which makes `backward-sexp' from `[' treat `^String [' as two sexps."
  (save-excursion
    (goto-char bracket-pos)
    (let ((result bracket-pos))
      (ignore-errors
        (while (progn
                 (backward-sexp)
                 (eq (char-after) ?^))
          (setq result (point))))
      result)))