# $ptr is NULL in temacs
if ($ptr != 0)
set $tem = (struct Lisp_Symbol *) $ptr
- xgetptr $tem->xname
+ xgetptr $tem->xname_
set $tem = (struct Lisp_String *) $ptr
set $tem = (char *) $tem->data
silent
xgetptr globals.f_Vinitial_window_system
set $tem = (struct Lisp_Symbol *) $ptr
- xgetptr $tem->xname
+ xgetptr $tem->xname_
set $tem = (struct Lisp_String *) $ptr
set $tem = (char *) $tem->data
# If we are running in synchronous mode, we want a chance to look