1 files changed, 1 insertions, 0 deletions

diff --git a/src/eval.c b/src/eval.c
index cecf18cbfeb..ed4a1465c86 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -157,6 +157,7 @@ init_eval_once ()
 {
   specpdl_size = 50;
   specpdl = (struct specbinding *) xmalloc (specpdl_size * sizeof (struct specbinding));
+  specpdl_ptr = specpdl;
   max_specpdl_size = 600;
   max_lisp_eval_depth = 200;