mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 12:20:20 +02:00
Code Activity

Remove all deprecated code

Browse source 
* module/ice-9/debug.scm:
* module/ice-9/mapping.scm:
* module/ice-9/syncase.scm: Delete these deprecated files.
* module/Makefile.am: Remove deleted files.
* libguile/deprecated.c:
* libguile/deprecated.h:
* libguile/backtrace.c:
* libguile/goops.c:
* libguile/numbers.c:
* libguile/socket.c:
* libguile/srfi-13.c:
* module/ice-9/deprecated.scm:
* module/ice-9/format.scm:
* module/oop/goops.scm:
* module/statprof.scm:
* module/texinfo/reflection.scm:
* module/web/client.scm:
* module/web/uri.scm: Remove deprecated code.
This commit is contained in:
Andy Wingo 2017-05-22 13:36:42 +02:00
parent 8f4597d1da
commit c248ea10be
18 changed files with 10 additions and 1649 deletions
Download patch file Download diff file Expand all files Collapse all files

32
libguile/srfi-13.c
View file

@ -3112,22 +3112,6 @@ SCM_DEFINE (scm_string_filter, "string-filter", 2, 2, 0,
SCM result;
size_t idx;
#if SCM_ENABLE_DEPRECATED == 1
if (scm_is_string (char_pred))
{
SCM tmp;
scm_c_issue_deprecation_warning
("Guile used to use the wrong argument order for string-filter.\n"
"This call to string-filter had the arguments in the wrong order.\n"
"See SRFI-13 for more details. At some point we will remove this hack.");
tmp = char_pred;
char_pred = s;
s = tmp;
}
#endif
MY_VALIDATE_SUBSTRING_SPEC (2, s,
3, start, cstart,
4, end, cend);
@ -3245,22 +3229,6 @@ SCM_DEFINE (scm_string_delete, "string-delete", 2, 2, 0,
SCM result;
size_t idx;
#if SCM_ENABLE_DEPRECATED == 1
if (scm_is_string (char_pred))
{
SCM tmp;
scm_c_issue_deprecation_warning
("Guile used to use the wrong argument order for string-delete.\n"
"This call to string-filter had the arguments in the wrong order.\n"
"See SRFI-13 for more details. At some point we will remove this hack.");
tmp = char_pred;
char_pred = s;
s = tmp;
}
#endif
MY_VALIDATE_SUBSTRING_SPEC (2, s,
3, start, cstart,
4, end, cend);