diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2011-06-24 23:25:22 +0200 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2011-06-24 23:25:22 +0200 |
| commit | cd3520a41df21d80a9d894c58af2daba23c8dd24 (patch) | |
| tree | 945eaef322c65471833954ddce161a7a913ee3c8 /src/syntax.c | |
| parent | 7d0da90e7b98f5c09df82be9985cc27d30adea07 (diff) | |
| download | emacs-cd3520a41df21d80a9d894c58af2daba23c8dd24.tar.gz | |
Move DEFSYM to lisp.h and use everywhere.
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/src/syntax.c b/src/syntax.c index 82103cfa3d4..8c2d5ded21f 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -3362,8 +3362,7 @@ init_syntax_once (void) Lisp_Object temp; /* This has to be done here, before we call Fmake_char_table. */ - Qsyntax_table = intern_c_string ("syntax-table"); - staticpro (&Qsyntax_table); + DEFSYM (Qsyntax_table, "syntax-table"); /* Intern_C_String this now in case it isn't already done. Setting this variable twice is harmless. @@ -3448,8 +3447,7 @@ init_syntax_once (void) void syms_of_syntax (void) { - Qsyntax_table_p = intern_c_string ("syntax-table-p"); - staticpro (&Qsyntax_table_p); + DEFSYM (Qsyntax_table_p, "syntax-table-p"); staticpro (&Vsyntax_code_object); @@ -3461,8 +3459,7 @@ syms_of_syntax (void) /* Defined in regex.c */ staticpro (&re_match_object); - Qscan_error = intern_c_string ("scan-error"); - staticpro (&Qscan_error); + DEFSYM (Qscan_error, "scan-error"); Fput (Qscan_error, Qerror_conditions, pure_cons (Qscan_error, pure_cons (Qerror, Qnil))); Fput (Qscan_error, Qerror_message, |