Mercurial > emacs
changeset 21497:837148a1541f
(buf_charpos_to_bytepos, buf_bytepos_to_charpos):
When calling set_marker_both, pass the right buffer.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Mon, 13 Apr 1998 18:56:44 +0000 |
| parents | 6ec5e85328a9 |
| children | e69604162c2b |
| files | src/marker.c |
| diffstat | 1 files changed, 12 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/src/marker.c Mon Apr 13 18:56:00 1998 +0000 +++ b/src/marker.c Mon Apr 13 18:56:44 1998 +0000 @@ -199,9 +199,10 @@ It will last until the next GC. */ if (record) { - Lisp_Object marker; + Lisp_Object marker, buffer; marker = Fmake_marker (); - set_marker_both (marker, Qnil, best_below, best_below_byte); + XSETBUFFER (buffer, b); + set_marker_both (marker, buffer, best_below, best_below_byte); } if (byte_debug_flag) @@ -229,9 +230,10 @@ It will last until the next GC. */ if (record) { - Lisp_Object marker; + Lisp_Object marker, buffer; marker = Fmake_marker (); - set_marker_both (marker, Qnil, best_above, best_above_byte); + XSETBUFFER (buffer, b); + set_marker_both (marker, buffer, best_above, best_above_byte); } if (byte_debug_flag) @@ -365,9 +367,10 @@ It will last until the next GC. */ if (record) { - Lisp_Object marker; + Lisp_Object marker, buffer; marker = Fmake_marker (); - set_marker_both (marker, Qnil, best_below, best_below_byte); + XSETBUFFER (buffer, b); + set_marker_both (marker, buffer, best_below, best_below_byte); } if (byte_debug_flag) @@ -395,9 +398,10 @@ It will last until the next GC. */ if (record) { - Lisp_Object marker; + Lisp_Object marker, buffer; marker = Fmake_marker (); - set_marker_both (marker, Qnil, best_above, best_above_byte); + XSETBUFFER (buffer, b); + set_marker_both (marker, buffer, best_above, best_above_byte); } if (byte_debug_flag)