diff options
| author | Lars Ingebrigtsen | 2022-07-28 12:23:53 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2022-07-28 12:24:03 +0200 |
| commit | 4895ca16f76aa0ec044212a2b96ef8646cf4d0ed (patch) | |
| tree | 31eb004564adcdaaa0df8ee912a323444b456e18 /test/src | |
| parent | 22a5f022344af8c0c0a9eddc2ac5ad36392d0cef (diff) | |
| download | emacs-4895ca16f76aa0ec044212a2b96ef8646cf4d0ed.tar.gz emacs-4895ca16f76aa0ec044212a2b96ef8646cf4d0ed.zip | |
Ensure that we don't call print-unreadable-function from " prin1"
* src/print.c (PRINTPREPARE): Bind the current buffer so that we
can retrieve it later.
(print_vectorlike): Use it (bug#56773).
(syms_of_print): New internal `print--unreadable-callback-buffer'
variable.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/print-tests.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/test/src/print-tests.el b/test/src/print-tests.el index f818b4d4715..91187d9f45c 100644 --- a/test/src/print-tests.el +++ b/test/src/print-tests.el | |||
| @@ -529,6 +529,5 @@ otherwise, use a different charset." | |||
| 529 | (should (equal (% (- (length numbers) loopback-index) loop) | 529 | (should (equal (% (- (length numbers) loopback-index) loop) |
| 530 | 0))))))))))) | 530 | 0))))))))))) |
| 531 | 531 | ||
| 532 | |||
| 533 | (provide 'print-tests) | 532 | (provide 'print-tests) |
| 534 | ;;; print-tests.el ends here | 533 | ;;; print-tests.el ends here |