Merge from origin/emacs-28
34ca4ff9a5
Fix Edebug specification for inline functions (Bug#53068).3c06c37a8b
Remove mention of removed `gnus-treat-play-sounds' variabl...
This commit is contained in:
commit
b9fecb0dae
3 changed files with 11 additions and 4 deletions
|
@ -12223,7 +12223,6 @@ controlling variable is a predicate list, as described above.
|
|||
@vindex gnus-treat-highlight-citation
|
||||
@vindex gnus-treat-highlight-headers
|
||||
@vindex gnus-treat-highlight-signature
|
||||
@vindex gnus-treat-play-sounds
|
||||
@vindex gnus-treat-x-pgp-sig
|
||||
@vindex gnus-treat-unfold-headers
|
||||
@vindex gnus-treat-fold-headers
|
||||
|
@ -12359,8 +12358,6 @@ is controlled by @code{gnus-body-boundary-delimiter}.
|
|||
|
||||
@xref{Article Highlighting}.
|
||||
|
||||
@vindex gnus-treat-play-sounds
|
||||
@item gnus-treat-play-sounds
|
||||
@item gnus-treat-ansi-sequences (t)
|
||||
@vindex gnus-treat-x-pgp-sig
|
||||
@item gnus-treat-x-pgp-sig (head)
|
||||
|
|
|
@ -71,7 +71,7 @@
|
|||
|
||||
(defmacro inline-quote (_exp)
|
||||
"Similar to backquote, but quotes code and only accepts , and not ,@."
|
||||
(declare (debug backquote-form))
|
||||
(declare (debug (backquote-form)))
|
||||
(error "inline-quote can only be used within define-inline"))
|
||||
|
||||
(defmacro inline-const-p (_exp)
|
||||
|
|
|
@ -1094,5 +1094,15 @@ This avoids potential duplicate definitions (Bug#41988)."
|
|||
(edebug-new-definition name))))
|
||||
(should-error (eval-buffer) :type 'invalid-read-syntax))))
|
||||
|
||||
(ert-deftest edebug-tests-inline ()
|
||||
"Check that Edebug can instrument inline functions (Bug#53068)."
|
||||
(with-temp-buffer
|
||||
(print '(define-inline edebug-tests-inline (arg)
|
||||
(inline-quote ,arg))
|
||||
(current-buffer))
|
||||
(let ((edebug-all-defs t)
|
||||
(edebug-initial-mode 'Go-nonstop))
|
||||
(eval-buffer))))
|
||||
|
||||
(provide 'edebug-tests)
|
||||
;;; edebug-tests.el ends here
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue