diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-08-31 12:13:50 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-08-31 12:13:50 +0000 |
commit | dee01b012cd5179b70a2e361ee08c364ed9f3314 (patch) | |
tree | 342478de9cb5237437a734aa88b7c9fe26533845 /libguile/strports.c | |
parent | b29058ffee392969b448f8157afaf370c17a736c (diff) | |
download | guile-dee01b012cd5179b70a2e361ee08c364ed9f3314.tar.gz |
* Removed deprecated stuff.
* Some more renamings to SCM_<filename>_H.
Diffstat (limited to 'libguile/strports.c')
-rw-r--r-- | libguile/strports.c | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/libguile/strports.c b/libguile/strports.c index 969d2b79b..612d98b27 100644 --- a/libguile/strports.c +++ b/libguile/strports.c @@ -338,16 +338,6 @@ SCM_DEFINE (scm_object_to_string, "object->string", 1, 1, 0, } #undef FUNC_NAME -#if (SCM_DEBUG_DEPRECATED == 0) - -SCM -scm_strprint_obj (SCM obj) -{ - return scm_object_to_string (obj, SCM_UNDEFINED); -} - -#endif /* (SCM_DEBUG_DEPRECATED == 0) */ - SCM_DEFINE (scm_call_with_output_string, "call-with-output-string", 1, 0, 0, (SCM proc), "Calls the one-argument procedure @var{proc} with a newly created output\n" @@ -450,28 +440,6 @@ scm_c_eval_string (const char *expr) return scm_eval_string (scm_makfrom0str (expr)); } -#if SCM_DEBUG_DEPRECATED == 0 - -SCM -scm_read_0str (char *expr) -{ - scm_c_issue_deprecation_warning - ("scm_read_0str is deprecated. Use scm_c_read_string instead."); - - return scm_c_read_string (expr); -} - -SCM -scm_eval_0str (const char *expr) -{ - scm_c_issue_deprecation_warning - ("scm_eval_0str is deprecated. Use scm_c_eval_string instead."); - - return scm_c_eval_string (expr); -} - -#endif - static SCM inner_eval_string (void *data) { |