aboutsummaryrefslogtreecommitdiffstats
path: root/src/composite.c
diff options
context:
space:
mode:
authorPavel Janík2001-11-02 20:46:55 +0000
committerPavel Janík2001-11-02 20:46:55 +0000
commitb78265036088d5d0eac2a03b929adb50aa59b45c (patch)
treede99fe733144deb926fd31ee7bdff95cb1bc5073 /src/composite.c
parent00a2cef7d11a1b193891eb3d28274ef7fc7c3fe4 (diff)
downloademacs-b78265036088d5d0eac2a03b929adb50aa59b45c.tar.gz
emacs-b78265036088d5d0eac2a03b929adb50aa59b45c.zip
Update usage of CHECK_ macros (remove unused second argument).
Diffstat (limited to 'src/composite.c')
-rw-r--r--src/composite.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/composite.c b/src/composite.c
index ff6d1a5ba34..1c67a2ca107 100644
--- a/src/composite.c
+++ b/src/composite.c
@@ -730,7 +730,7 @@ for the composition. See `compose-region' for more detial.")
730 && !INTEGERP (components) 730 && !INTEGERP (components)
731 && !CONSP (components) 731 && !CONSP (components)
732 && !STRINGP (components)) 732 && !STRINGP (components))
733 CHECK_VECTOR (components, 2); 733 CHECK_VECTOR (components);
734 734
735 compose_text (XINT (start), XINT (end), components, mod_func, Qnil); 735 compose_text (XINT (start), XINT (end), components, mod_func, Qnil);
736 return Qnil; 736 return Qnil;
@@ -746,9 +746,9 @@ for the composition. See `compose-string' for more detial.")
746 (string, start, end, components, mod_func) 746 (string, start, end, components, mod_func)
747 Lisp_Object string, start, end, components, mod_func; 747 Lisp_Object string, start, end, components, mod_func;
748{ 748{
749 CHECK_STRING (string, 0); 749 CHECK_STRING (string);
750 CHECK_NUMBER (start, 1); 750 CHECK_NUMBER (start);
751 CHECK_NUMBER (end, 2); 751 CHECK_NUMBER (end);
752 752
753 if (XINT (start) < 0 || 753 if (XINT (start) < 0 ||
754 XINT (start) > XINT (end) 754 XINT (start) > XINT (end)
@@ -772,11 +772,11 @@ See `find-composition' for more detail.")
772 int start, end; 772 int start, end;
773 int id; 773 int id;
774 774
775 CHECK_NUMBER_COERCE_MARKER (pos, 0); 775 CHECK_NUMBER_COERCE_MARKER (pos);
776 start = XINT (pos); 776 start = XINT (pos);
777 if (!NILP (limit)) 777 if (!NILP (limit))
778 { 778 {
779 CHECK_NUMBER_COERCE_MARKER (limit, 1); 779 CHECK_NUMBER_COERCE_MARKER (limit);
780 end = XINT (limit); 780 end = XINT (limit);
781 } 781 }
782 else 782 else
@@ -784,7 +784,7 @@ See `find-composition' for more detail.")
784 784
785 if (!NILP (string)) 785 if (!NILP (string))
786 { 786 {
787 CHECK_STRING (string, 2); 787 CHECK_STRING (string);
788 if (XINT (pos) < 0 || XINT (pos) > XSTRING (string)->size) 788 if (XINT (pos) < 0 || XINT (pos) > XSTRING (string)->size)
789 args_out_of_range (string, pos); 789 args_out_of_range (string, pos);
790 } 790 }