1 files changed, 2 insertions, 0 deletions
diff --git a/debug.c b/debug.c
index fa7c439e..ec754874 100644
--- a/debug.c
+++ b/debug.c
@@ -92,6 +92,8 @@ val debug(val form, val bindings, val data, val line, val pos, val base)
   val loc = source_loc(form);
   cons_bind (lineno, file, loc);
 
+  data = if2(consp(data), car(data));
+
   if (!step_mode && !memqual(loc, breakpoints) 
       && (debug_depth > next_depth))
   {