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

4
libguile/print.c
View file

@ -1184,14 +1184,14 @@ SCM_DEFINE (scm_simple_format, "simple-format", 2, 0, 1,
continue;
default:
SCM_MISC_ERROR ("FORMAT: Unsupported format option ~~~A - use (ice-9 format) instead",
scm_list_1 (scm_c_make_char (scm_i_string_ref (message, p))));
scm_list_1 (scm_i_make_char (scm_i_string_ref (message, p))));
}
if (!scm_is_pair (args))
SCM_MISC_ERROR ("FORMAT: Missing argument for ~~~A",
scm_list_1 (scm_c_make_char (scm_i_string_ref (message, p))));
scm_list_1 (scm_i_make_char (scm_i_string_ref (message, p))));
scm_lfwrite_substr (message, start, p - 1, port);
/* we pass destination here */