mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-13 01:20:28 -08:00
Add trailing underscores to appropriate member names, per change 2011-02-14T15:39:19Z!tromey@redhat.com of src/lisp.h.
This commit is contained in:
parent
c2fb1b6051
commit
c243bc792c
2 changed files with 17 additions and 12 deletions
|
|
@ -1,3 +1,9 @@
|
|||
2011-04-22 Noah Friedman <friedman@splode.com>
|
||||
|
||||
* emacs-buffer.gdb: Add trailing underscores to appropriate member
|
||||
names, per change tromey@redhat.com-20110214153919-bxkckrdmmg4qhyyj
|
||||
of src/lisp.h.
|
||||
|
||||
2011-04-08 Christoph Scholtes <cschol2112@googlemail.com>
|
||||
|
||||
* NEWS: Document new function `vc-ediff'.
|
||||
|
|
|
|||
|
|
@ -1,12 +1,8 @@
|
|||
# emacs-buffer.gdb --- gdb macros for recovering buffers from emacs coredumps
|
||||
|
||||
# Copyright (C) 2005-2011 Free Software Foundation, Inc.
|
||||
# Copyright (C) 2005, 06, 2011 Free Software Foundation, Inc.
|
||||
|
||||
# Maintainer: Noah Friedman <friedman@splode.com>
|
||||
# Status: Works with Emacs 22.0.51.1 (prerelease) as of 2006-01-12.
|
||||
# Older cvs snapshots, and released versions, will not work due to
|
||||
# changes in lisp data structures. But there are older versions of
|
||||
# this gdb script which work with those versions.
|
||||
# Created: 2005-04-28
|
||||
|
||||
# This file is part of GNU Emacs.
|
||||
|
|
@ -37,6 +33,10 @@
|
|||
# `ysave-buffer', and `ybuffer-contents'. The `y' prefix avoids any
|
||||
# namespace collisions with emacs/src/.gdbinit.
|
||||
|
||||
# Since the internal data structures in Emacs occasionally from time to
|
||||
# time, you should use the version of this file that came with your
|
||||
# particular Emacs version; older versions might not work anymore.
|
||||
|
||||
# Example usage:
|
||||
#
|
||||
# $ gdb /export/src/emacs/2005-05-02--03-17/src/emacs core.emacs.6.9845
|
||||
|
|
@ -107,16 +107,16 @@ define ybuffer-list
|
|||
ygetptr $buf
|
||||
set $buf = (struct buffer *) $ptr
|
||||
|
||||
if ! ($files_only && $buf->filename == Qnil)
|
||||
ygetptr $buf->name
|
||||
if ! ($files_only && $buf->filename_ == Qnil)
|
||||
ygetptr $buf->name_
|
||||
set $name = ((struct Lisp_String *) $ptr)->data
|
||||
set $modp = ($buf->text->modiff > $buf->text->save_modiff) ? '*' : ' '
|
||||
|
||||
ygetptr $buf->mode_name
|
||||
ygetptr $buf->mode_name_
|
||||
set $mode = ((struct Lisp_String *) $ptr)->data
|
||||
|
||||
if $buf->filename != Qnil
|
||||
ygetptr $buf->filename
|
||||
if $buf->filename_ != Qnil
|
||||
ygetptr $buf->filename_
|
||||
printf "%2d %c %9d %-20s %-10s %s\n", \
|
||||
$i, $modp, ($buf->text->z_byte - 1), $name, $mode, \
|
||||
((struct Lisp_String *) $ptr)->data
|
||||
|
|
@ -193,7 +193,7 @@ document yget-buffer-pointers
|
|||
end
|
||||
|
||||
define yget-current-buffer-name
|
||||
set $this = $ycurrent_buffer->name
|
||||
set $this = $ycurrent_buffer->name_
|
||||
ygetptr $this
|
||||
set $ycurrent_buffer_name = ((struct Lisp_String *) $ptr)->data
|
||||
end
|
||||
|
|
@ -267,4 +267,3 @@ end
|
|||
# local variables:
|
||||
# mode: gdb-script
|
||||
# end:
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue