changeset 16102:76bd16bb5906

(prepare_to_modify_buffer): Take integer arguments. (signal_before_change): Take integer arguments.
author Richard M. Stallman <rms@gnu.org>
date Wed, 04 Sep 1996 03:34:04 +0000
parents 039e96495054
children 4962e89ec8ef
files src/insdel.c
diffstat 1 files changed, 8 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/insdel.c	Wed Sep 04 00:06:48 1996 +0000
+++ b/src/insdel.c	Wed Sep 04 03:34:04 1996 +0000
@@ -739,7 +739,7 @@
 
 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 @@
 }
 
 /* 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)