mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

Turn all deprecated features that once were macros but are now

Browse source 
functions back into macros.
This commit is contained in:
Marius Vollmer 2005-01-12 11:10:02 +00:00
parent 8f3054016a
commit fe78c51aa2
4 changed files with 76 additions and 48 deletions
Download patch file Download diff file Expand all files Collapse all files

12
libguile/strings.h
View file

@ -149,10 +149,14 @@ SCM_API void scm_i_get_substring_spec (size_t len,
#if SCM_ENABLE_DEPRECATED
SCM_API int SCM_STRINGP (SCM obj);
SCM_API char *SCM_STRING_CHARS (SCM str);
SCM_API size_t SCM_STRING_LENGTH (SCM str);
#define SCM_STRING_UCHARS ((unsigned char *)SCM_STRING_CHARS (str))
SCM_API int scm_i_deprecated_stringp (SCM obj);
SCM_API char *scm_i_deprecated_string_chars (SCM str);
SCM_API size_t scm_i_deprecated_string_length (SCM str);
#define SCM_STRINGP(x) scm_i_deprecated_stringp(x)
#define SCM_STRING_CHARS(x) scm_i_deprecated_string_chars(x)
#define SCM_STRING_LENGTH(x) scm_i_deprecated_string_length(x)
#define SCM_STRING_UCHARS ((unsigned char *)SCM_STRING_CHARS (str))
#endif