martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(Fregister_ccl_program): Convert Fmake_vector argument to Lisp_Integer.

Browse Source 
(syms_of_ccl): Likewise.
This commit is contained in:
Richard M. Stallman
1997-07-12 06:46:21 +00:00
parent cac557491c
commit 6703ac4f59
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/ccl.c
View File

@@ -1105,7 +1105,7 @@ Return index number of the registered CCL program.")
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 @@ Return index number of the registered CCL program.")
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\