summaryrefslogtreecommitdiff
path: root/libguile/gsubr.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/gsubr.c')
-rw-r--r--libguile/gsubr.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/libguile/gsubr.c b/libguile/gsubr.c
index c42661e15..266efc3b6 100644
--- a/libguile/gsubr.c
+++ b/libguile/gsubr.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
@@ -172,13 +172,13 @@ SCM
gsubr_21l(req1, req2, opt, rst)
SCM req1, req2, opt, rst;
{
- scm_gen_puts (scm_regular_string, "gsubr-2-1-l:\n req1: ", scm_cur_outp);
+ scm_puts ("gsubr-2-1-l:\n req1: ", scm_cur_outp);
scm_display(req1, scm_cur_outp);
- scm_gen_puts (scm_regular_string, "\n req2: ", scm_cur_outp);
+ scm_puts ("\n req2: ", scm_cur_outp);
scm_display(req2, scm_cur_outp);
- scm_gen_puts (scm_regular_string, "\n opt: ", scm_cur_outp);
+ scm_puts ("\n opt: ", scm_cur_outp);
scm_display(opt, scm_cur_outp);
- scm_gen_puts (scm_regular_string, "\n rest: ", scm_cur_outp);
+ scm_puts ("\n rest: ", scm_cur_outp);
scm_display(rst, scm_cur_outp);
scm_newline(scm_cur_outp);
return SCM_UNSPECIFIED;