summaryrefslogtreecommitdiff
path: root/libguile/gh_io.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1997-08-13 14:55:34 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1997-08-13 14:55:34 +0000
commit4ed948d4f18b3ef34b3f0089ed2631889bd0ebe0 (patch)
tree0d1d0d83e412a11e87de10e9049c939ea8a4ca6c /libguile/gh_io.c
parent9538471795cf02ec8de3a6e861e626761d852909 (diff)
downloadguile-4ed948d4f18b3ef34b3f0089ed2631889bd0ebe0.tar.gz
* * gh_io.c (gh_write): New function.
Diffstat (limited to 'libguile/gh_io.c')
-rw-r--r--libguile/gh_io.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/libguile/gh_io.c b/libguile/gh_io.c
index 567294991..9e19f4d47 100644
--- a/libguile/gh_io.c
+++ b/libguile/gh_io.c
@@ -51,6 +51,12 @@ gh_display (SCM x)
}
void
+gh_write (SCM x)
+{
+ scm_write (x, scm_current_output_port ());
+}
+
+void
gh_newline ()
{
scm_newline (scm_current_output_port ());