diff options
| author | Juanma Barranquero | 2011-06-24 23:25:22 +0200 |
|---|---|---|
| committer | Juanma Barranquero | 2011-06-24 23:25:22 +0200 |
| commit | cd3520a41df21d80a9d894c58af2daba23c8dd24 (patch) | |
| tree | 945eaef322c65471833954ddce161a7a913ee3c8 /src/callint.c | |
| parent | 7d0da90e7b98f5c09df82be9985cc27d30adea07 (diff) | |
| download | emacs-cd3520a41df21d80a9d894c58af2daba23c8dd24.tar.gz emacs-cd3520a41df21d80a9d894c58af2daba23c8dd24.zip | |
Move DEFSYM to lisp.h and use everywhere.
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 49 |
1 files changed, 14 insertions, 35 deletions
diff --git a/src/callint.c b/src/callint.c index dc5e6a4c37a..4d0a2a07921 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -896,41 +896,20 @@ syms_of_callint (void) | |||
| 896 | pure_cons (intern_c_string ("point"), | 896 | pure_cons (intern_c_string ("point"), |
| 897 | pure_cons (intern_c_string ("mark"), Qnil)))); | 897 | pure_cons (intern_c_string ("mark"), Qnil)))); |
| 898 | 898 | ||
| 899 | Qlist = intern_c_string ("list"); | 899 | DEFSYM (Qlist, "list"); |
| 900 | staticpro (&Qlist); | 900 | DEFSYM (Qlet, "let"); |
| 901 | Qlet = intern_c_string ("let"); | 901 | DEFSYM (Qif, "if"); |
| 902 | staticpro (&Qlet); | 902 | DEFSYM (Qwhen, "when"); |
| 903 | Qif = intern_c_string ("if"); | 903 | DEFSYM (Qletx, "let*"); |
| 904 | staticpro (&Qif); | 904 | DEFSYM (Qsave_excursion, "save-excursion"); |
| 905 | Qwhen = intern_c_string ("when"); | 905 | DEFSYM (Qprogn, "progn"); |
| 906 | staticpro (&Qwhen); | 906 | DEFSYM (Qminus, "-"); |
| 907 | Qletx = intern_c_string ("let*"); | 907 | DEFSYM (Qplus, "+"); |
| 908 | staticpro (&Qletx); | 908 | DEFSYM (Qhandle_shift_selection, "handle-shift-selection"); |
| 909 | Qsave_excursion = intern_c_string ("save-excursion"); | 909 | DEFSYM (Qcall_interactively, "call-interactively"); |
| 910 | staticpro (&Qsave_excursion); | 910 | DEFSYM (Qcommand_debug_status, "command-debug-status"); |
| 911 | Qprogn = intern_c_string ("progn"); | 911 | DEFSYM (Qenable_recursive_minibuffers, "enable-recursive-minibuffers"); |
| 912 | staticpro (&Qprogn); | 912 | DEFSYM (Qmouse_leave_buffer_hook, "mouse-leave-buffer-hook"); |
| 913 | |||
| 914 | Qminus = intern_c_string ("-"); | ||
| 915 | staticpro (&Qminus); | ||
| 916 | |||
| 917 | Qplus = intern_c_string ("+"); | ||
| 918 | staticpro (&Qplus); | ||
| 919 | |||
| 920 | Qhandle_shift_selection = intern_c_string ("handle-shift-selection"); | ||
| 921 | staticpro (&Qhandle_shift_selection); | ||
| 922 | |||
| 923 | Qcall_interactively = intern_c_string ("call-interactively"); | ||
| 924 | staticpro (&Qcall_interactively); | ||
| 925 | |||
| 926 | Qcommand_debug_status = intern_c_string ("command-debug-status"); | ||
| 927 | staticpro (&Qcommand_debug_status); | ||
| 928 | |||
| 929 | Qenable_recursive_minibuffers = intern_c_string ("enable-recursive-minibuffers"); | ||
| 930 | staticpro (&Qenable_recursive_minibuffers); | ||
| 931 | |||
| 932 | Qmouse_leave_buffer_hook = intern_c_string ("mouse-leave-buffer-hook"); | ||
| 933 | staticpro (&Qmouse_leave_buffer_hook); | ||
| 934 | 913 | ||
| 935 | DEFVAR_KBOARD ("prefix-arg", Vprefix_arg, | 914 | DEFVAR_KBOARD ("prefix-arg", Vprefix_arg, |
| 936 | doc: /* The value of the prefix argument for the next editing command. | 915 | doc: /* The value of the prefix argument for the next editing command. |