From e923592f1819ddfbd12b2dc02fab77c5db4115a8 Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Mon, 20 May 2002 08:06:32 +0000 Subject: [PATCH] * process.c (set_socket_options, Fsignal_process): Use SYMBOL_NAME and XSTRING instead of XSYMBOL and name field. --- src/process.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/process.c b/src/process.c index 226e818fe7c..c5cbf3b68eb 100644 --- a/src/process.c +++ b/src/process.c @@ -2234,7 +2234,7 @@ set_socket_options (s, opts, no_error) if (STRINGP (opt)) name = (char *) XSTRING (opt)->data; else if (SYMBOLP (opt)) - name = (char *) XSYMBOL (opt)->name->data; + name = (char *) XSTRING (SYMBOL_NAME (opt))->data; else { error ("Mal-formed option list"); return 0; @@ -2302,7 +2302,7 @@ set_socket_options (s, opts, no_error) else if (STRINGP (val)) arg = (char *) XSTRING (val)->data; else if (XSYMBOL (val)) - arg = (char *) XSYMBOL (val)->name->data; + arg = (char *) XSTRING (SYMBOL_NAME (val))->data; else error ("Invalid argument to %s option", name); } @@ -5335,7 +5335,7 @@ SIGCODE may be an integer, or a symbol whose name is a signal name. */) unsigned char *name; CHECK_SYMBOL (sigcode); - name = XSYMBOL (sigcode)->name->data; + name = XSTRING (SYMBOL_NAME (sigcode))->data; if (0) ; -- 2.39.5