2234 |
if (STRINGP (opt)) |
if (STRINGP (opt)) |
2235 |
name = (char *) XSTRING (opt)->data; |
name = (char *) XSTRING (opt)->data; |
2236 |
else if (SYMBOLP (opt)) |
else if (SYMBOLP (opt)) |
2237 |
name = (char *) XSYMBOL (opt)->name->data; |
name = (char *) XSTRING (SYMBOL_NAME (opt))->data; |
2238 |
else { |
else { |
2239 |
error ("Mal-formed option list"); |
error ("Mal-formed option list"); |
2240 |
return 0; |
return 0; |
2302 |
else if (STRINGP (val)) |
else if (STRINGP (val)) |
2303 |
arg = (char *) XSTRING (val)->data; |
arg = (char *) XSTRING (val)->data; |
2304 |
else if (XSYMBOL (val)) |
else if (XSYMBOL (val)) |
2305 |
arg = (char *) XSYMBOL (val)->name->data; |
arg = (char *) XSTRING (SYMBOL_NAME (val))->data; |
2306 |
else |
else |
2307 |
error ("Invalid argument to %s option", name); |
error ("Invalid argument to %s option", name); |
2308 |
} |
} |
5335 |
unsigned char *name; |
unsigned char *name; |
5336 |
|
|
5337 |
CHECK_SYMBOL (sigcode); |
CHECK_SYMBOL (sigcode); |
5338 |
name = XSYMBOL (sigcode)->name->data; |
name = XSTRING (SYMBOL_NAME (sigcode))->data; |
5339 |
|
|
5340 |
if (0) |
if (0) |
5341 |
; |
; |