Mercurial > hg > xemacs-beta
diff src/undo.c @ 16:0293115a14e9 r19-15b91
Import from CVS: tag r19-15b91
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:49:20 +0200 |
parents | 376386a54a3c |
children | 859a2309aef8 |
line wrap: on
line diff
--- a/src/undo.c Mon Aug 13 08:48:43 2007 +0200 +++ b/src/undo.c Mon Aug 13 08:49:20 2007 +0200 @@ -303,7 +303,7 @@ size_so_far += sizeof (struct Lisp_Cons); if (STRINGP (XCAR (elt))) size_so_far += (sizeof (struct Lisp_String) - 1 - + string_length (XSTRING (XCAR (elt)))); + + XSTRING_LENGTH (XCAR (elt))); } /* Advance to next element. */ @@ -338,7 +338,7 @@ size_so_far += sizeof (struct Lisp_Cons); if (STRINGP (XCAR (elt))) size_so_far += (sizeof (struct Lisp_String) - 1 - + string_length (XSTRING (XCAR (elt)))); + + XSTRING_LENGTH (XCAR (elt))); } /* Advance to next element. */