(scm_print_state, SCM_PRINT_STATE_LAYOUT):

Removed ref_stack field.
(PSTATE_STACK_REF, PSTATE_STACK_SET): New, for accessing the stack
of a print state.  Use them everywhere instead of ref_stack.

1 files changed, 4 insertions, 4 deletions

diff --git a/libguile/print.h b/libguile/print.h
index 21d1055bf..038e75f43 100644
--- a/libguile/print.h
+++ b/libguile/print.h
@@ -57,7 +57,7 @@ do { \
 #define SCM_COERCE_OUTPORT(p) \
   (SCM_PORT_WITH_PS_P (p) ? SCM_PORT_WITH_PS_PORT (p) : p)
 
-#define SCM_PRINT_STATE_LAYOUT "sruwuwuwuwuwpwuwuwuruoprpw"
+#define SCM_PRINT_STATE_LAYOUT "sruwuwuwuwuwpwuwuwurprpw"
 typedef struct scm_print_state {
   SCM handle;			/* Struct handle */
   int revealed;                 /* Has the state escaped to Scheme? */
@@ -69,9 +69,9 @@ typedef struct scm_print_state {
   unsigned long list_offset;
   unsigned long top;		/* Top of reference stack */
   unsigned long ceiling;	/* Max size of reference stack */
-  SCM *ref_stack;		/* Stack of references used during
-				   circular reference detection */
-  SCM ref_vect;
+  SCM ref_vect;	 	        /* Stack of references used during
+				   circular reference detection;
+				   a simple vector. */
   SCM highlight_objects;        /* List of objects to be highlighted */
 } scm_print_state;