]> git.eshelyaron.com Git - emacs.git/commitdiff
(Fcmpchar_cmp_rule): Escape newlines in docstring.
authorKenichi Handa <handa@m17n.org>
Thu, 27 Feb 1997 11:12:11 +0000 (11:12 +0000)
committerKenichi Handa <handa@m17n.org>
Thu, 27 Feb 1997 11:12:11 +0000 (11:12 +0000)
src/charset.c

index 72c1b41657f485dab09c6ca117a7c06da3a7d667..987adc3787e46cf911598ba96b7dabf0bca5fe56 100644 (file)
@@ -1184,23 +1184,23 @@ DEFUN ("composite-char-component", Fcmpchar_component, Scmpchar_component,
 
 DEFUN ("composite-char-composition-rule", Fcmpchar_cmp_rule, Scmpchar_cmp_rule,
        2, 2, 0,
-  "Return the IDXth composition rule embedded in composite character CHARACTER.
-The returned rule is for composing the IDXth component
-on the (IDX-1)th component.  If IDX is 0, the returned value is always 255.")
-  (character, idx)
-     Lisp_Object character, idx;
+  "Return the Nth composition rule embedded in composite character CHARACTER.\n\
+The returned rule is for composing the Nth component\n\
+on the (N-1)th component.  If N is 0, the returned value is always 255.")
+  (character, n)
+     Lisp_Object character, n;
 {
   int id, i;
 
   CHECK_NUMBER (character, 0);
-  CHECK_NUMBER (idx, 1);
+  CHECK_NUMBER (n, 1);
 
   id = COMPOSITE_CHAR_ID (XINT (character));
   if (id < 0 || id >= n_cmpchars)
     error ("Invalid composite character: %d", XINT (character));
-  i = XINT (idx);
+  i = XINT (n);
   if (i > cmpchar_table[id]->glyph_len)
-    args_out_of_range (character, idx);
+    args_out_of_range (character, n);
 
   return make_number (cmpchar_table[id]->cmp_rule[i]);
 }