Mercurial > hg > xemacs-beta

comparison src/.gdbinit @ 1579:aebc80e1f056

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-07-18 20:07:04 by james] Ilya Golubev's fix to make pobj work properly with symbol names.
author james
date Fri, 18 Jul 2003 20:07:05 +0000
parents c33ae14dd6d0
children ec5cb254c826
comparison
equal deleted inserted replaced
1578:e2ddc2a2b794 1579:aebc80e1f056
255 if $lrecord_type == lrecord_type_cons 255 if $lrecord_type == lrecord_type_cons
256 ptype Lisp_Cons 256 ptype Lisp_Cons
257 else 257 else
258 if $lrecord_type == lrecord_type_symbol 258 if $lrecord_type == lrecord_type_symbol
259 ptype Lisp_Symbol 259 ptype Lisp_Symbol
260 printf "Symbol name: %s\n", $type_ptr->name->data 260 printf "Symbol name: %s\n", ((Lisp_String *)$type_ptr->name)->data_
261 else 261 else
262 if $lrecord_type == lrecord_type_vector 262 if $lrecord_type == lrecord_type_vector
263 ptype Lisp_Vector 263 ptype Lisp_Vector
264 printf "Vector of length %d\n", $type_ptr->size 264 printf "Vector of length %d\n", $type_ptr->size
265 #print *($type_ptr->data) @ $type_ptr->size 265 #print *($type_ptr->data) @ $type_ptr->size