mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

(SCM_SYMBOL_CHARS): Cast away const in return.

Browse source 
(SCM_SYMBOL_LENGTH): It's scm_i_symbol_length, not
scm_c_symbol_length.
This commit is contained in:
Marius Vollmer 2004-08-19 20:36:29 +00:00
parent ece721f031
commit ba16a103a4
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/deprecated.c
View file

@ -1181,7 +1181,7 @@ SCM_SYMBOL_CHARS (SCM sym)
scm_c_issue_deprecation_warning
("SCM_SYMBOL_CHARS is deprecated. Use scm_symbol_to_string.");
return scm_i_symbol_chars (sym);
return (char *)scm_i_symbol_chars (sym);
}
size_t
@ -1189,7 +1189,7 @@ SCM_SYMBOL_LENGTH (SCM sym)
{
scm_c_issue_deprecation_warning
("SCM_SYMBOL_LENGTH is deprecated. Use scm_symbol_to_string.");
return scm_c_symbol_length (sym);
return scm_i_symbol_length (sym);
}
void