(set_internal): Properly compare lisp objects.

[gnu-emacs] / src / puresize.h

diff --git a/src/puresize.h b/src/puresize.h
index f05639d2fa651a99438b553c4f094fa244168b78..edbf476f00d515d788367f2e8f38702913ba4770 100644 (file)
--- a/src/puresize.h
+++ b/src/puresize.h
@@ -42,7 +42,7 @@ Boston, MA 02111-1307, USA.  */
 #endif
 
 #ifndef BASE_PURESIZE
-#define BASE_PURESIZE (460000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA)
+#define BASE_PURESIZE (490000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA)
 #endif
 
 /* Increase BASE_PURESIZE by a ratio depending on the machine's word size.  */
@@ -63,6 +63,8 @@ Boston, MA 02111-1307, USA.  */
 #define CHECK_IMPURE(obj) \
   { if (PURE_P (obj))    \
       pure_write_error (); }
+
+extern void pure_write_error P_ ((void));
 \f
 /* Define PURE_P.  */