# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1016837603 0
# Node ID 57e965380c3935cd1bdb6bab4e30059010186141
# Parent  0400b67840bafbadf762af31ba1183dbc0f44714
(check_pure_size): Only output a warning.

diff -r 0400b67840ba -r 57e965380c39 src/alloc.c
--- a/src/alloc.c	Fri Mar 22 22:53:13 2002 +0000
+++ b/src/alloc.c	Fri Mar 22 22:53:23 2002 +0000
@@ -3843,8 +3843,8 @@
 check_pure_size ()
 {
   if (pure_bytes_used_before_overflow)
-    error ("Pure Lisp storage overflow (approx. %d bytes needed)",
-	   (int) (pure_bytes_used + pure_bytes_used_before_overflow));
+    message ("Pure Lisp storage overflow (approx. %d bytes needed)",
+	     (int) (pure_bytes_used + pure_bytes_used_before_overflow));
 }