summaryrefslogtreecommitdiff
path: root/libguile/error.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1996-09-12 23:44:21 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1996-09-12 23:44:21 +0000
commita25840f95de434efbe90ce807f4bba9caed6c8cb (patch)
tree1ad60831379be04044437abdfb0e0cf8e423c57d /libguile/error.c
parentc88edfaf17c79e317b07149bd26e65809745ff75 (diff)
downloadguile-a25840f95de434efbe90ce807f4bba9caed6c8cb.tar.gz
* error.c (err_head): scm_iprin1 --> scm_prin1
Diffstat (limited to 'libguile/error.c')
-rw-r--r--libguile/error.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/error.c b/libguile/error.c
index fd654d80b..440b91a87 100644
--- a/libguile/error.c
+++ b/libguile/error.c
@@ -82,7 +82,7 @@ err_head (str)
#if 0
if (SCM_BOOL_F != *scm_loc_loadpath)
{
- scm_iprin1 (*scm_loc_loadpath, scm_cur_errp, 1);
+ scm_prin1 (*scm_loc_loadpath, scm_cur_errp, 1);
scm_gen_puts (scm_regular_string, ", line ", scm_cur_errp);
scm_intprint ((long) scm_linum, 10, scm_cur_errp);
scm_gen_puts (scm_regular_string, ": ", scm_cur_errp);