diff options
Diffstat (limited to 'libguile/fluids.c')
-rw-r--r-- | libguile/fluids.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/fluids.c b/libguile/fluids.c index d50fc54a4..5ff92a884 100644 --- a/libguile/fluids.c +++ b/libguile/fluids.c @@ -79,7 +79,7 @@ grow_dynamic_state (SCM state) void scm_i_fluid_print (SCM exp, SCM port, scm_print_state *pstate SCM_UNUSED) { - scm_puts_unlocked ("#<fluid ", port); + scm_puts ("#<fluid ", port); scm_intprint ((int) FLUID_NUM (exp), 10, port); scm_putc ('>', port); } @@ -87,7 +87,7 @@ scm_i_fluid_print (SCM exp, SCM port, scm_print_state *pstate SCM_UNUSED) void scm_i_dynamic_state_print (SCM exp, SCM port, scm_print_state *pstate SCM_UNUSED) { - scm_puts_unlocked ("#<dynamic-state ", port); + scm_puts ("#<dynamic-state ", port); scm_intprint (SCM_UNPACK (exp), 16, port); scm_putc ('>', port); } |