diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-05-15 11:47:48 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-05-15 11:47:48 +0000 |
commit | f5f2dcffbea9a33f0e1d2adbe07b20fcf7ac3322 (patch) | |
tree | e71c3be5e7b8d307a9a608fd71ff9fe9fc7e5d23 /libguile/smob.c | |
parent | ae09e7ac288fd8fd467d3278bff2e9ccbefb862d (diff) | |
download | guile-f5f2dcffbea9a33f0e1d2adbe07b20fcf7ac3322.tar.gz |
* Wrapped deprecated code between #if (SCM_DEBUG_DEPRECATED == 0) #endif.
* Replace use of deprecated macros SCM_INPORTP, SCM_OUTPORTP, SCM_ICHRP.
Diffstat (limited to 'libguile/smob.c')
-rw-r--r-- | libguile/smob.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/libguile/smob.c b/libguile/smob.c index 2f65e8eb8..e07b24c50 100644 --- a/libguile/smob.c +++ b/libguile/smob.c @@ -203,8 +203,10 @@ scm_set_smob_mfpe (long tc, if (equalp) scm_set_smob_equalp (tc, equalp); } -/* Deprecated function - use scm_make_smob_type, or scm_make_smob_type_mfpe - instead. */ + +#if (SCM_DEBUG_DEPRECATED == 0) + +/* Use scm_make_smob_type or scm_make_smob_type_mfpe instead. */ long scm_newsmob (const scm_smobfuns *smob) { @@ -216,6 +218,8 @@ scm_newsmob (const scm_smobfuns *smob) return tc; } +#endif /* SCM_DEBUG_DEPRECATED == 0 */ + SCM scm_make_smob (long tc) |