diff options
Diffstat (limited to 'libguile/root.c')
-rw-r--r-- | libguile/root.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/root.c b/libguile/root.c index 0fa904688..291de56d8 100644 --- a/libguile/root.c +++ b/libguile/root.c @@ -1,4 +1,4 @@ -/* Copyright (C) 1995,1996 Free Software Foundation, Inc. +/* Copyright (C) 1995,1996, 1997 Free Software Foundation, Inc. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -115,9 +115,9 @@ print_root (exp, port, pstate) SCM port; scm_print_state *pstate; { - scm_gen_puts (scm_regular_string, "#<root ", port); + scm_puts ("#<root ", port); scm_intprint(SCM_SEQ (SCM_ROOT_STATE (exp) -> rootcont), 16, port); - scm_gen_putc('>', port); + scm_putc('>', port); return 1; } |