[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/print.c
From: |
Ken Raeburn |
Subject: |
[Emacs-diffs] Changes to emacs/src/print.c |
Date: |
Mon, 20 May 2002 04:06:27 -0400 |
Index: emacs/src/print.c
diff -c emacs/src/print.c:1.174 emacs/src/print.c:1.175
*** emacs/src/print.c:1.174 Sat Mar 16 01:53:35 2002
--- emacs/src/print.c Mon May 20 04:06:27 2002
***************
*** 970,976 ****
*Messages*. */
if (!NILP (Vsignaling_function) && SYMBOLP (Vsignaling_function))
{
! char *name = XSYMBOL (Vsignaling_function)->name->data;
message_dolog (name, strlen (name), 0, 0);
message_dolog (": ", 2, 0, 0);
Vsignaling_function = Qnil;
--- 970,976 ----
*Messages*. */
if (!NILP (Vsignaling_function) && SYMBOLP (Vsignaling_function))
{
! char *name = XSTRING (SYMBOL_NAME (Vsignaling_function))->data;
message_dolog (name, strlen (name), 0, 0);
message_dolog (": ", 2, 0, 0);
Vsignaling_function = Qnil;
***************
*** 1490,1502 ****
case Lisp_Symbol:
{
register int confusing;
! register unsigned char *p = XSYMBOL (obj)->name->data;
! register unsigned char *end = p + STRING_BYTES (XSYMBOL (obj)->name);
register int c;
int i, i_byte, size_byte;
Lisp_Object name;
! XSETSTRING (name, XSYMBOL (obj)->name);
if (p != end && (*p == '-' || *p == '+')) p++;
if (p == end)
--- 1490,1502 ----
case Lisp_Symbol:
{
register int confusing;
! register unsigned char *p = XSTRING (SYMBOL_NAME (obj))->data;
! register unsigned char *end = p + STRING_BYTES (XSTRING (SYMBOL_NAME
(obj)));
register int c;
int i, i_byte, size_byte;
Lisp_Object name;
! name = SYMBOL_NAME (obj);
if (p != end && (*p == '-' || *p == '+')) p++;
if (p == end)
***************
*** 1744,1752 ****
{
PRINTCHAR (' ');
PRINTCHAR ('\'');
! strout (XSYMBOL (h->test)->name->data, -1, -1, printcharfun, 0);
PRINTCHAR (' ');
! strout (XSYMBOL (h->weak)->name->data, -1, -1, printcharfun, 0);
PRINTCHAR (' ');
sprintf (buf, "%d/%d", XFASTINT (h->count),
XVECTOR (h->next)->size);
--- 1744,1752 ----
{
PRINTCHAR (' ');
PRINTCHAR ('\'');
! strout (XSTRING (SYMBOL_NAME (h->test))->data, -1, -1,
printcharfun, 0);
PRINTCHAR (' ');
! strout (XSTRING (SYMBOL_NAME (h->weak))->data, -1, -1,
printcharfun, 0);
PRINTCHAR (' ');
sprintf (buf, "%d/%d", XFASTINT (h->count),
XVECTOR (h->next)->size);