view src/pure.c @ 161:28f395d8dc7a r20-3b7

Import from CVS: tag r20-3b7
author cvs
date Mon, 13 Aug 2007 09:42:26 +0200
parents 376386a54a3c
children 929b76928fce
line wrap: on
line source

/* This file is part of XEmacs.

XEmacs is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 2, or (at your option) any
later version.

XEmacs is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.

You should have received a copy of the GNU General Public License
along with XEmacs; see the file COPYING.  If not, write to
the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.  */

/* Synched up with: FSF 19.30.  Split out of alloc.c. */

#include <config.h>
#include "puresize.h"
#include "lisp.h"

Lisp_Object pure[PURESIZE / sizeof (Lisp_Object)]
     /* Force linker to put it into data space! */
#ifdef NO_UNION_TYPE
     = {0};
#else
     /* Need this many braces to convince GCC not to complain */
     = {{{0}}};
#endif