comparison src/syntax.c @ 18738:bcc43754d3bc

(init_syntax_once): Convert Fmake_vector argument to Lisp_Integer.
author Richard M. Stallman <rms@gnu.org>
date Sat, 12 Jul 1997 06:38:27 +0000
parents 614b916ff5bf
children 444939f3c18f
comparison
equal deleted inserted replaced
18737:7f8578d75d45 18738:bcc43754d3bc
2713 Setting this variable twice is harmless. 2713 Setting this variable twice is harmless.
2714 But don't staticpro it here--that is done in alloc.c. */ 2714 But don't staticpro it here--that is done in alloc.c. */
2715 Qchar_table_extra_slots = intern ("char-table-extra-slots"); 2715 Qchar_table_extra_slots = intern ("char-table-extra-slots");
2716 2716
2717 /* Create objects which can be shared among syntax tables. */ 2717 /* Create objects which can be shared among syntax tables. */
2718 Vsyntax_code_object = Fmake_vector (13, Qnil); 2718 Vsyntax_code_object = Fmake_vector (make_number (13), Qnil);
2719 for (i = 0; i < XVECTOR (Vsyntax_code_object)->size; i++) 2719 for (i = 0; i < XVECTOR (Vsyntax_code_object)->size; i++)
2720 XVECTOR (Vsyntax_code_object)->contents[i] 2720 XVECTOR (Vsyntax_code_object)->contents[i]
2721 = Fcons (make_number (i), Qnil); 2721 = Fcons (make_number (i), Qnil);
2722 2722
2723 /* Now we are ready to set up this property, so we can 2723 /* Now we are ready to set up this property, so we can