HCoop
/
bpt
/
guile.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge remote-tracking branch 'origin/stable-2.0'
[bpt/guile.git]
/
libguile
/
values.c
diff --git
a/libguile/values.c
b/libguile/values.c
index
98a9df1
..
d135da0
100644
(file)
--- a/
libguile/values.c
+++ b/
libguile/values.c
@@
-60,9
+60,9
@@
print_values (SCM obj, SCM pwps)
SCM port = SCM_PORT_WITH_PS_PORT (pwps);
scm_print_state *ps = SCM_PRINT_STATE (SCM_PORT_WITH_PS_PS (pwps));
SCM port = SCM_PORT_WITH_PS_PORT (pwps);
scm_print_state *ps = SCM_PRINT_STATE (SCM_PORT_WITH_PS_PS (pwps));
- scm_puts ("#<values ", port);
+ scm_puts
_unlocked
("#<values ", port);
scm_iprin1 (values, port, ps);
scm_iprin1 (values, port, ps);
- scm_puts (">", port);
+ scm_puts
_unlocked
(">", port);
return SCM_UNSPECIFIED;
}
return SCM_UNSPECIFIED;
}