mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 01:00:20 +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

2
libguile/read.c
View file

@ -1100,7 +1100,7 @@ scm_read_character (scm_t_wchar chr, SCM port, scm_t_read_opts *opts)
/* Ignore dotted circles, which may be used to keep combining characters from
combining with the backslash in #\charname. */
if (cp == SCM_CODEPOINT_DOTTED_CIRCLE && charname_len == 2)
return scm_c_make_char (scm_i_string_ref (charname, 1));
return scm_i_make_char (scm_i_string_ref (charname, 1));
if (cp >= '0' && cp < '8')
{