1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 14:00:21 +02:00

*** empty log message ***

This commit is contained in:
Tim Pierce 1997-11-20 04:40:02 +00:00
parent 28d8ab3c69
commit e41530ba09

View file

@ -133,7 +133,19 @@ scm_string_rindex (str, chr, frm, to)
? SCM_BOOL_F
: SCM_MAKINUM (pos));
}
/* What is the purpose of these strange assertions in the following
`substring' functions?
SCM_ASSERT (3==scm_ilength (args), scm_makfrom0str (s_substring_move_left_x),
SCM_WNA, NULL);
Why bother to make args a `rest argument' if we are merely going to
force it to include exactly three arguments? Why not merely make
them all required arguments instead? This makes me suspicious that
the functions haven't been fully implemented. If anyone can
clarify what's going on here, please do so. -twp */
SCM_PROC(s_substring_move_left_x, "substring-move-left!", 2, 0, 1, scm_substring_move_left_x);
SCM