and XSTRING instead of XSYMBOL and name field.
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;
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);
}
unsigned char *name;
CHECK_SYMBOL (sigcode);
- name = XSYMBOL (sigcode)->name->data;
+ name = XSTRING (SYMBOL_NAME (sigcode))->data;
if (0)
;