aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorDave Love2003-09-17 13:50:54 +0000
committerDave Love2003-09-17 13:50:54 +0000
commitaaefca9731ec68722f8de661b6acffb27e591d17 (patch)
treee161018bfbaabdde9426ba7c89879ebb6553deeb /src
parent2f08449e640bd91d4a7519c8bcc60eb459d46ede (diff)
downloademacs-aaefca9731ec68722f8de661b6acffb27e591d17.tar.gz
emacs-aaefca9731ec68722f8de661b6acffb27e591d17.zip
(find_composition, run_composition_function)
(update_compositions, Ffind_composition_internal): Make buffer positions EMACS_INT.
Diffstat (limited to 'src')
-rw-r--r--src/composite.c14
1 files changed, 8 insertions, 6 deletions
diff --git a/src/composite.c b/src/composite.c
index 43da8887176..17747d9e7c8 100644
--- a/src/composite.c
+++ b/src/composite.c
@@ -402,7 +402,8 @@ get_composition_id (charpos, bytepos, nchars, prop, string)
402 402
403int 403int
404find_composition (pos, limit, start, end, prop, object) 404find_composition (pos, limit, start, end, prop, object)
405 int pos, limit, *start, *end; 405 int pos, limit;
406 EMACS_INT *start, *end;
406 Lisp_Object *prop, object; 407 Lisp_Object *prop, object;
407{ 408{
408 Lisp_Object val; 409 Lisp_Object val;
@@ -446,7 +447,7 @@ run_composition_function (from, to, prop)
446 Lisp_Object prop; 447 Lisp_Object prop;
447{ 448{
448 Lisp_Object func; 449 Lisp_Object func;
449 int start, end; 450 EMACS_INT start, end;
450 451
451 func = COMPOSITION_MODIFICATION_FUNC (prop); 452 func = COMPOSITION_MODIFICATION_FUNC (prop);
452 /* If an invalid composition precedes or follows, try to make them 453 /* If an invalid composition precedes or follows, try to make them
@@ -476,13 +477,14 @@ run_composition_function (from, to, prop)
476 477
477void 478void
478update_compositions (from, to, check_mask) 479update_compositions (from, to, check_mask)
479 int from, to, check_mask; 480 EMACS_INT from, to;
481 int check_mask;
480{ 482{
481 Lisp_Object prop; 483 Lisp_Object prop;
482 int start, end; 484 EMACS_INT start, end;
483 /* The beginning and end of the region to set the property 485 /* The beginning and end of the region to set the property
484 `auto-composed' to nil. */ 486 `auto-composed' to nil. */
485 int min_pos = from, max_pos = to; 487 EMACS_INT min_pos = from, max_pos = to;
486 488
487 if (inhibit_modification_hooks) 489 if (inhibit_modification_hooks)
488 return; 490 return;
@@ -663,7 +665,7 @@ See `find-composition' for more detail. */)
663 Lisp_Object pos, limit, string, detail_p; 665 Lisp_Object pos, limit, string, detail_p;
664{ 666{
665 Lisp_Object prop, tail; 667 Lisp_Object prop, tail;
666 int start, end; 668 EMACS_INT start, end;
667 int id; 669 int id;
668 670
669 CHECK_NUMBER_COERCE_MARKER (pos); 671 CHECK_NUMBER_COERCE_MARKER (pos);