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

Revert scm_c_make_char rename

Browse source 
This was, I think, an unintentional ABI change.
Reverts 579dd2da44.
This commit is contained in:
Andy Wingo 2019-08-02 15:19:17 +02:00
parent ce10a30e23
commit 3925a64682
7 changed files with 33 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/chars.c
View file

@ -460,7 +460,7 @@ SCM_DEFINE (scm_char_upcase, "char-upcase", 1, 0, 0,
#define FUNC_NAME s_scm_char_upcase
{
SCM_VALIDATE_CHAR (1, chr);
return scm_c_make_char (scm_c_upcase (SCM_CHAR (chr)));
return scm_i_make_char (scm_c_upcase (SCM_CHAR (chr)));
}
#undef FUNC_NAME
@ -471,7 +471,7 @@ SCM_DEFINE (scm_char_downcase, "char-downcase", 1, 0, 0,
#define FUNC_NAME s_scm_char_downcase
{
SCM_VALIDATE_CHAR (1, chr);
return scm_c_make_char (scm_c_downcase (SCM_CHAR(chr)));
return scm_i_make_char (scm_c_downcase (SCM_CHAR(chr)));
}
#undef FUNC_NAME
@ -481,7 +481,7 @@ SCM_DEFINE (scm_char_titlecase, "char-titlecase", 1, 0, 0,
#define FUNC_NAME s_scm_char_titlecase
{
SCM_VALIDATE_CHAR (1, chr);
return scm_c_make_char (scm_c_titlecase (SCM_CHAR(chr)));
return scm_i_make_char (scm_c_titlecase (SCM_CHAR(chr)));
}
#undef FUNC_NAME