Mercurial > emacs

diff src/ccl.c @ 18749:d961aeafceba

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fregister_ccl_program): Convert Fmake_vector argument to Lisp_Integer. (syms_of_ccl): Likewise.
author Richard M. Stallman <rms@gnu.org>
date Sat, 12 Jul 1997 06:46:21 +0000
parents 614b916ff5bf
children a5d72b4a642f
line wrap: on
line diff
--- a/src/ccl.c	Sat Jul 12 06:45:55 1997 +0000
+++ b/src/ccl.c	Sat Jul 12 06:46:21 1997 +0000
@@ -1105,7 +1105,7 @@
 
   if (i == len)
     {
-      Lisp_Object new_table = Fmake_vector (len * 2, Qnil);
+      Lisp_Object new_table = Fmake_vector (make_number (len * 2), Qnil);
       int j;
 
       for (j = 0; j < len; j++)
@@ -1121,7 +1121,7 @@
 syms_of_ccl ()
 {
   staticpro (&Vccl_program_table);
-  Vccl_program_table = Fmake_vector (32, Qnil);
+  Vccl_program_table = Fmake_vector (make_number (32), Qnil);
 
   DEFVAR_LISP ("font-ccl-encoder-alist", &Vfont_ccl_encoder_alist,
     "Alist of fontname patterns vs corresponding CCL program.\n\