mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

Merge from origin/emacs-29

Browse Source 
16f3a09e8d ; * lisp/simple.el (kill-new): Fix a typo.  (Bug#64423)
d78e670237 ; * src/lisp.h: Improve commentary for XIL, XLI, XLP (bug...
This commit is contained in:
Eli Zaretskii 2023-07-15 15:11:43 -04:00
commit c5fa58cbc4
2 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/simple.el
View File

@ -5657,7 +5657,7 @@ argument should still be a \"useful\" string for such uses."
;; interrupt this. If they interrupt it, we want to continue
;; so we become selection owner, so this doesn't stay slow.
(if (eq (window-system) 'x)
(ignore-error 'quit (funcall interprogram-paste-function))
(ignore-error quit (funcall interprogram-paste-function))
(funcall interprogram-paste-function)))))
(when interprogram-paste
(setq interprogram-paste

9
src/lisp.h
View File

@ -332,7 +332,14 @@ typedef EMACS_INT Lisp_Word;
see these functions for commentary. */
/* Convert among the various Lisp-related types: I for EMACS_INT, L
for Lisp_Object, P for void *. */
for Lisp_Object, P for void *.
These use the following mnemonics:
XLI: Lisp_Object to Integer;
XIL: Integer to Lisp_Object;
XLP: Lisp_Object to Pointer. */
#if !CHECK_LISP_OBJECT_TYPE
# if LISP_WORDS_ARE_POINTERS
# define lisp_h_XLI(o) ((EMACS_INT) (o))