comparison src/.gdbinit @ 20582:3b630b1cb848

(xstring): Use size_byte.
author Richard M. Stallman <rms@gnu.org>
date Sun, 04 Jan 1998 20:41:17 +0000
parents 8b32c6fe8728
children 0ef14112e9b3
comparison
equal deleted inserted replaced
20581:9b78b337e8bf 20582:3b630b1cb848
156 This command assumes that $ is an Emacs Lisp symbol value. 156 This command assumes that $ is an Emacs Lisp symbol value.
157 end 157 end
158 158
159 define xstring 159 define xstring
160 print (struct Lisp_String *) (($ & $valmask) | gdb_data_seg_bits) 160 print (struct Lisp_String *) (($ & $valmask) | gdb_data_seg_bits)
161 output ($->size > 1000) ? 0 : ($->data[0])@($->size) 161 output ($->size > 1000) ? 0 : ($->data[0])@($->size_byte)
162 echo \n 162 echo \n
163 end 163 end
164 document xstring 164 document xstring
165 Print the contents and address of the string $. 165 Print the contents and address of the string $.
166 This command assumes that $ is an Emacs Lisp string value. 166 This command assumes that $ is an Emacs Lisp string value.