Mercurial > hg > xemacs-beta

comparison src/lisp.h @ 4394:cacc942c0d0f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Avoid clearing print-gensym-alist inappropriately when printing hash tables. 2008-01-15 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el (thing): Check that printing a hash table literal doesn't clear print-gensym-alist. 2008-01-15 Aidan Kehoe <kehoea@parhasard.net> * print.c (prin1_to_string): New. The guts of Fprin1_to_string, without resetting Vprint_gensym_alist. (Fprin1_to_string): Call prin1_to_string, wrapped with RESET_PRINT_GENSYM calls. * doprnt.c (emacs_doprnt_1): Call prin1_to_string, not Fprin1_to_string (dos veces). Avoids an inappropriate reset of print-gensym-alist.
author Aidan Kehoe <kehoea@parhasard.net>
date Tue, 15 Jan 2008 21:35:01 +0100
parents a2af1ff1761f
children d402d7b18bd8
comparison
equal deleted inserted replaced
4391:cbf129b005df 4394:cacc942c0d0f
4930 EXFUN (Fprin1, 2); 4930 EXFUN (Fprin1, 2);
4931 EXFUN (Fprin1_to_string, 2); 4931 EXFUN (Fprin1_to_string, 2);
4932 EXFUN (Fprinc, 2); 4932 EXFUN (Fprinc, 2);
4933 EXFUN (Fprint, 2); 4933 EXFUN (Fprint, 2);
4934 4934
4935 Lisp_Object prin1_to_string (Lisp_Object, int);
4935 4936
4936 /* Lower-level ways to output data: */ 4937 /* Lower-level ways to output data: */
4937 void default_object_printer (Lisp_Object, Lisp_Object, int); 4938 void default_object_printer (Lisp_Object, Lisp_Object, int);
4938 void print_internal (Lisp_Object, Lisp_Object, int); 4939 void print_internal (Lisp_Object, Lisp_Object, int);
4939 void debug_print (Lisp_Object); 4940 void debug_print (Lisp_Object);