Function: eca-api--json-read-buffer

eca-api--json-read-buffer is a macro defined in eca-api.el.

Signature

(eca-api--json-read-buffer)

Documentation

Read json from the current buffer.

Source Code

;; Defined in /nix/store/jklqzw6pzz6j4jrbv8wy0iwgi7jlrbld-emacs-packages-deps/share/emacs/site-lisp/elpa/eca-20260928.1827/eca-api.el
(defmacro eca-api--json-read-buffer ()
  "Read json from the current buffer."
  ;; copy-tree: expanding to a constant form would return the same shared
  ;; literal on every expansion, which the byte-compiler may mutate in place
  ;; (e.g. Emacs 31's `macroexp--posify-form-1'), breaking later runtime
  ;; expansions with `invalid-function' (#284).
  (if (fboundp 'json-parse-buffer)
      (copy-tree '(json-parse-buffer :object-type 'plist
                   :null-object nil
                   :false-object nil))
    (copy-tree '(let ((json-array-type 'vector)
                      (json-object-type 'plist)
                      (json-false nil))
                  (json-read)))))