diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-08-13 14:55:34 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-08-13 14:55:34 +0000 |
commit | 4ed948d4f18b3ef34b3f0089ed2631889bd0ebe0 (patch) | |
tree | 0d1d0d83e412a11e87de10e9049c939ea8a4ca6c /libguile/gh_io.c | |
parent | 9538471795cf02ec8de3a6e861e626761d852909 (diff) | |
download | guile-4ed948d4f18b3ef34b3f0089ed2631889bd0ebe0.tar.gz |
* * gh_io.c (gh_write): New function.
Diffstat (limited to 'libguile/gh_io.c')
-rw-r--r-- | libguile/gh_io.c | 6 |
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 ()); |