mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 22:40:34 +02:00
Code Activity

* strports.c (scm_strprint_obj): scm_iprin1 --> scm_prin1

Browse source
This commit is contained in:
Mikael Djurfeldt 1996-09-12 23:43:18 +00:00
parent ee34012038
commit 8781806909
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/strports.c
View file

@ -223,7 +223,7 @@ scm_strprint_obj (obj)
str = scm_makstr (64, 0);
port = scm_mkstrport (SCM_MAKINUM (0), str, SCM_OPN | SCM_WRTNG, "scm_strprint_obj");
scm_iprin1 (obj, port, 1);
scm_prin1 (obj, port, 1);
{
SCM answer;
SCM_DEFER_INTS;