diff options
author | Keisuke Nishida <kxn30@po.cwru.edu> | 2001-03-13 02:09:57 +0000 |
---|---|---|
committer | Keisuke Nishida <kxn30@po.cwru.edu> | 2001-03-13 02:09:57 +0000 |
commit | 1f3908c46ad172c7bf024942f728726f59b6c2ef (patch) | |
tree | 0dafdcc5efac46cbf02fff5c6432b08fb9f97257 /libguile/strports.h | |
parent | 468bd77ef5266ca744a27d83750cb8836f9a2652 (diff) | |
download | guile-1f3908c46ad172c7bf024942f728726f59b6c2ef.tar.gz |
* strports.c (scm_object_to_string): New procedure.
(scm_strprint_obj): Deprecated.
Diffstat (limited to 'libguile/strports.h')
-rw-r--r-- | libguile/strports.h | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/libguile/strports.h b/libguile/strports.h index 28bae69b4..917b73f60 100644 --- a/libguile/strports.h +++ b/libguile/strports.h @@ -50,14 +50,20 @@ extern SCM scm_mkstrport (SCM pos, SCM str, long modes, const char * caller); extern SCM scm_strport_to_string (SCM port); +extern SCM scm_object_to_string (SCM obj); extern SCM scm_call_with_output_string (SCM proc); -extern SCM scm_strprint_obj (SCM obj); extern SCM scm_call_with_input_string (SCM str, SCM proc); extern SCM scm_read_0str (char *expr); extern SCM scm_eval_0str (const char *expr); extern SCM scm_eval_string (SCM string); extern void scm_init_strports (void); +#if (SCM_DEBUG_DEPRECATED == 0) + +extern SCM scm_strprint_obj (SCM obj); + +#endif /* SCM_DEBUG_DEPRECATED == 0 */ + #endif /* STRPORTSH */ /* |