cgit.sxemacs.org Git - sxemacs/blob - src/general.c

   1 /* Commonly-used symbols
   2    Copyright (C) 1995 Sun Microsystems.
   3    Copyright (C) 1995, 1996, 2000 Ben Wing.
   4
   5 This file is part of SXEmacs
   6
   7 SXEmacs is free software: you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation, either version 3 of the License, or
  10 (at your option) any later version.
  11
  12 SXEmacs is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this program.  If not, see <http://www.gnu.org/licenses/>. */
  19
  20
  21 /* Synched up with: Not in FSF. */
  22
  23 /* See general-slots.h.
  24 */
  25
  26 #include <config.h>
  27 #include "lisp.h"
  28
  29 #define SYMBOL(fou) Lisp_Object fou
  30 #define SYMBOL_KEYWORD(la_cle_est_fou) Lisp_Object la_cle_est_fou
  31 #define SYMBOL_GENERAL(tout_le_monde, est_fou) Lisp_Object tout_le_monde
  32
  33 #include "general-slots.h"
  34
  35 #undef SYMBOL
  36 #undef SYMBOL_KEYWORD
  37 #undef SYMBOL_GENERAL
  38
  39 void syms_of_general(void)
  40 {
  41 #define SYMBOL(loco) DEFSYMBOL (loco)
  42 #define SYMBOL_KEYWORD(meshugeneh) DEFKEYWORD (meshugeneh)
  43 #define SYMBOL_GENERAL(vachement, fou) defsymbol (&vachement, fou)
  44
  45 #include "general-slots.h"
  46
  47 #undef SYMBOL
  48 #undef SYMBOL_KEYWORD
  49 #undef SYMBOL_GENERAL
  50 }