fix SCM_CELL macro usage in continuations.[ch]

* libguile/continuations.h (SCM_CONTREGS):
* libguile/continuations.c (continuation_print): Fix SCM_CELL macro
  usage.

diff --git a/libguile/continuations.c b/libguile/continuations.c
index 7013e3d..aeff62e 100644 (file)
--- a/libguile/continuations.c
+++ b/libguile/continuations.c
@@ -57,7 +57,7 @@ continuation_print (SCM obj, SCM port, scm_print_state *state SCM_UNUSED)
   scm_puts ("#<continuation ", port);
   scm_intprint (continuation->num_stack_items, 10, port);
   scm_puts (" @ ", port);
-  scm_uintprint (SCM_CELL_WORD_1 (obj), 16, port);
+  scm_uintprint (SCM_SMOB_DATA_1 (obj), 16, port);
   scm_putc ('>', port);
   return 1;
 }

diff --git a/libguile/continuations.h b/libguile/continuations.h
index 8f7e38e..a04c53f 100644 (file)
--- a/libguile/continuations.h
+++ b/libguile/continuations.h
@@ -69,7 +69,7 @@ typedef struct
 
 #define SCM_CONTINUATIONP(x)   SCM_TYP16_PREDICATE (scm_tc16_continuation, x)
 
-#define SCM_CONTREGS(x)                ((scm_t_contregs *) SCM_CELL_WORD_1 (x))
+#define SCM_CONTREGS(x)                ((scm_t_contregs *) SCM_SMOB_DATA_1 (x))
 
 #define SCM_CONTINUATION_LENGTH(x) (SCM_CONTREGS (x)->num_stack_items)
 #define SCM_SET_CONTINUATION_LENGTH(x, n)\