Mercurial > emacs
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 |