(init_eval_once): Call xmalloc, not malloc.

diff --git a/src/eval.c b/src/eval.c
index ddea482515fe8b02bc2d5ea4612ca5f5a3ade9be..6e2cbaa651bcca19d73abdabf8059e0a94d84f9d 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -149,7 +149,7 @@ extern Lisp_Object ml_apply (); /* Apply a mocklisp function to unevaluated argu
 init_eval_once ()
 {
   specpdl_size = 50;
-  specpdl = (struct specbinding *) malloc (specpdl_size * sizeof (struct specbinding));
+  specpdl = (struct specbinding *) xmalloc (specpdl_size * sizeof (struct specbinding));
   max_specpdl_size = 600;
   max_lisp_eval_depth = 200;
 }