Mercurial > emacs
diff src/undo.c @ 46370:40db0673e6f0
Most uses of XSTRING combined with STRING_BYTES or indirection changed to
SCHARS, SBYTES, STRING_INTERVALS, SREF, SDATA; explicit size_byte references
left unchanged for now.
| author | Ken Raeburn <raeburn@raeburn.org> |
|---|---|
| date | Mon, 15 Jul 2002 00:00:41 +0000 |
| parents | 3f111801efb4 |
| children | eb8f8ac018c9 |
line wrap: on
line diff
--- a/src/undo.c Sun Jul 14 23:54:05 2002 +0000 +++ b/src/undo.c Mon Jul 15 00:00:41 2002 +0000 @@ -142,7 +142,7 @@ if (EQ (current_buffer->undo_list, Qt)) return; - if (PT == beg + XSTRING (string)->size) + if (PT == beg + SCHARS (string)) { XSETINT (sbeg, -beg); record_point (PT); @@ -334,7 +334,7 @@ size_so_far += sizeof (struct Lisp_Cons); if (STRINGP (XCAR (elt))) size_so_far += (sizeof (struct Lisp_String) - 1 - + XSTRING (XCAR (elt))->size); + + SCHARS (XCAR (elt))); } /* Advance to next element. */ @@ -369,7 +369,7 @@ size_so_far += sizeof (struct Lisp_Cons); if (STRINGP (XCAR (elt))) size_so_far += (sizeof (struct Lisp_String) - 1 - + XSTRING (XCAR (elt))->size); + + SCHARS (XCAR (elt))); } /* Advance to next element. */