-# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2000, 2001,
-# 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
-# Free Software Foundation, Inc.
+# Copyright (C) 1992-1998, 2000-2011 Free Software Foundation, Inc.
#
# This file is part of GNU Emacs.
#
printf "Window %d ", $int
xgetptr $w->buffer
set $tem = (struct buffer *) $ptr
- xgetptr $tem->name
+ xgetptr $tem->name_
printf "%s", ((struct Lisp_String *) $ptr)->data
printf "\n"
xgetptr $w->start
define xbuffer
xgetptr $
print (struct buffer *) $ptr
- xgetptr $->name
+ xgetptr $->name_
output ((struct Lisp_String *) $ptr)->data
echo \n
end
show environment TERM
# People get bothered when they see messages about non-existent functions...
-xgetptr Vsystem_type
+xgetptr globals.f_Vsystem_type
# $ptr is NULL in temacs
if ($ptr != 0)
set $tem = (struct Lisp_Symbol *) $ptr
tbreak init_sys_modes
commands
silent
- xgetptr Vinitial_window_system
+ xgetptr globals.f_Vinitial_window_system
set $tem = (struct Lisp_Symbol *) $ptr
xgetptr $tem->xname
set $tem = (struct Lisp_String *) $ptr
end
continue
end
-