diff options
| author | Ken Raeburn <raeburn@raeburn.org> | 2002-05-20 08:06:27 +0000 |
|---|---|---|
| committer | Ken Raeburn <raeburn@raeburn.org> | 2002-05-20 08:06:27 +0000 |
| commit | 76d0b3ae65dc9ab0657a81023789fae9bb37d36a (patch) | |
| tree | d02ca6e7b6d967e7cbd3e67278542ae4fd95c6cc /src/print.c | |
| parent | caa4733e19c3adbd25e864050862806c37719cfd (diff) | |
| download | emacs-76d0b3ae65dc9ab0657a81023789fae9bb37d36a.tar.gz | |
* print.c (print_error_message, print_object): Use SYMBOL_NAME and
XSTRING instead of XSYMBOL and name field.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/print.c b/src/print.c index 17f01522d52..c033f7574b0 100644 --- a/src/print.c +++ b/src/print.c @@ -970,7 +970,7 @@ print_error_message (data, stream) *Messages*. */ if (!NILP (Vsignaling_function) && SYMBOLP (Vsignaling_function)) { - char *name = XSYMBOL (Vsignaling_function)->name->data; + char *name = XSTRING (SYMBOL_NAME (Vsignaling_function))->data; message_dolog (name, strlen (name), 0, 0); message_dolog (": ", 2, 0, 0); Vsignaling_function = Qnil; @@ -1490,13 +1490,13 @@ print_object (obj, printcharfun, escapeflag) 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 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; - XSETSTRING (name, XSYMBOL (obj)->name); + name = SYMBOL_NAME (obj); if (p != end && (*p == '-' || *p == '+')) p++; if (p == end) @@ -1744,9 +1744,9 @@ print_object (obj, printcharfun, escapeflag) { PRINTCHAR (' '); PRINTCHAR ('\''); - strout (XSYMBOL (h->test)->name->data, -1, -1, printcharfun, 0); + strout (XSTRING (SYMBOL_NAME (h->test))->data, -1, -1, printcharfun, 0); PRINTCHAR (' '); - strout (XSYMBOL (h->weak)->name->data, -1, -1, printcharfun, 0); + strout (XSTRING (SYMBOL_NAME (h->weak))->data, -1, -1, printcharfun, 0); PRINTCHAR (' '); sprintf (buf, "%d/%d", XFASTINT (h->count), XVECTOR (h->next)->size); |