aboutsummaryrefslogtreecommitdiffstats
path: root/src/print.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/print.c')
-rw-r--r--src/print.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/print.c b/src/print.c
index 14b4326bb6f..242bcb5b0d1 100644
--- a/src/print.c
+++ b/src/print.c
@@ -36,6 +36,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
36#include "blockinput.h" 36#include "blockinput.h"
37#include "termhooks.h" /* For struct terminal. */ 37#include "termhooks.h" /* For struct terminal. */
38#include "font.h" 38#include "font.h"
39#include "xwidget.h"
39 40
40Lisp_Object Qstandard_output; 41Lisp_Object Qstandard_output;
41 42
@@ -1755,6 +1756,11 @@ print_object (Lisp_Object obj, register Lisp_Object printcharfun, int escapeflag
1755 strout (XSUBR (obj)->symbol_name, -1, -1, printcharfun); 1756 strout (XSUBR (obj)->symbol_name, -1, -1, printcharfun);
1756 PRINTCHAR ('>'); 1757 PRINTCHAR ('>');
1757 } 1758 }
1759 else if (XXWIDGETP (obj))
1760 {
1761 strout ("#<xwidget ", -1, -1, printcharfun);
1762 PRINTCHAR ('>');
1763 }
1758 else if (WINDOWP (obj)) 1764 else if (WINDOWP (obj))
1759 { 1765 {
1760 strout ("#<window ", -1, -1, printcharfun); 1766 strout ("#<window ", -1, -1, printcharfun);