diff --git a/src/h/external.h b/src/h/external.h
index 41992cc96..ba6ac463d 100755
--- a/src/h/external.h
+++ b/src/h/external.h
@@ -45,9 +45,9 @@ struct cl_env_struct {
 	cl_object bindings_array;
 #endif
 	cl_index bds_size;
-	struct ecl_bds_bd *bds_org;
-	struct ecl_bds_bd *bds_top;
-	struct ecl_bds_bd *bds_limit;
+	struct ecl_bds_frame *bds_org;
+	struct ecl_bds_frame *bds_top;
+	struct ecl_bds_frame *bds_limit;
 
 	/*
 	 * The Invocation History Stack (IHS) keeps a list of the names of the
diff --git a/src/h/legacy.h b/src/h/legacy.h
index 68780d5d6..a69381a57 100644
--- a/src/h/legacy.h
+++ b/src/h/legacy.h
@@ -154,7 +154,8 @@
 #define CL_CATCH_ALL_BEGIN ECL_CATCH_ALL_BEGIN
 #define CL_CATCH_ALL_END ECL_CATCH_ALL_END
 
-typedef struct ecl_bds_bd *bds_ptr;
+#define bds_bd ecl_bds_frame
+typedef struct ecl_bds_frame *bds_ptr;
 typedef struct ecl_ihs_frame *ihs_ptr;
 
 #define LISTP(x)	ECL_LISTP(x)
diff --git a/src/h/stacks.h b/src/h/stacks.h
index 3ce1ed05c..eb0d11997 100755
--- a/src/h/stacks.h
+++ b/src/h/stacks.h
@@ -35,7 +35,7 @@ extern "C" {
  * BIND STACK
  **************/
 
-typedef struct ecl_bds_bd {
+typedef struct ecl_bds_frame {
 	cl_object symbol;	/*  symbol  */
 	cl_object value;	/*  previous value of the symbol  */
 } *ecl_bds_ptr;