summaryrefslogtreecommitdiff
path: root/libguile/eval.i.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/eval.i.c')
-rw-r--r--libguile/eval.i.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/eval.i.c b/libguile/eval.i.c
index afbe9219c..a28a25a1b 100644
--- a/libguile/eval.i.c
+++ b/libguile/eval.i.c
@@ -221,8 +221,7 @@ CEVAL (SCM x, SCM env)
*
* Even frames are eval frames, odd frames are apply frames.
*/
- debug.vect = (scm_t_debug_info *) alloca (scm_debug_eframe_size
- * sizeof (scm_t_debug_info));
+ debug.vect = alloca (scm_debug_eframe_size * sizeof (scm_t_debug_info));
debug.info = debug.vect;
debug_info_end = debug.vect + scm_debug_eframe_size;
scm_i_set_last_debug_frame (&debug);