From fb4ee5cdb135bc44c4a29e546e716c7c1639b029 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 4 Sep 1996 03:34:04 +0000 Subject: [PATCH] (prepare_to_modify_buffer): Take integer arguments. (signal_before_change): Take integer arguments. --- src/insdel.c | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/src/insdel.c b/src/insdel.c index 9f505361cc0..56ae6535c00 100644 --- a/src/insdel.c +++ b/src/insdel.c @@ -739,7 +739,7 @@ modify_region (buffer, start, end) void prepare_to_modify_buffer (start, end) - Lisp_Object start, end; + int start, end; { if (!NILP (current_buffer->read_only)) Fbarf_if_buffer_read_only (); @@ -779,13 +779,17 @@ prepare_to_modify_buffer (start, end) } /* Signal a change to the buffer immediately before it happens. - START and END are the bounds of the text to be changed, - as Lisp objects. */ + START_INT and END_INT are the bounds of the text to be changed. */ void signal_before_change (start, end) - Lisp_Object start, end; + int start_int, end_end; { + Lisp_Object start, end; + + start = make_number (start_int); + end = make_number (end_int); + /* If buffer is unmodified, run a special hook for that case. */ if (SAVE_MODIFF >= MODIFF && !NILP (Vfirst_change_hook) -- 2.39.2