diff --git a/src/h/stacks.h b/src/h/stacks.h
index 50aa790d4..15851140b 100644
--- a/src/h/stacks.h
+++ b/src/h/stacks.h
@@ -72,6 +72,9 @@ extern bds_ptr bds_top;	/*  bind stack top  */
 #define	bds_unwind1  \
 	(SYM_VAL(bds_top->bds_sym) = bds_top->bds_val, --bds_top)
 
+#define bds_unwind_n(n) \
+	bds_unwind(bds_top - (n))
+
 /****************************
  * INVOCATION HISTORY STACK
  ****************************/