1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00

Remove always-true range checks in scm_i_ucs_range_to_char_set

* libguile/srfi-14.c (scm_i_ucs_range_to_char_set): limits are always
  non-negative due to the type of the variable
This commit is contained in:
Michael Gran 2009-09-02 06:45:05 -07:00
parent 4d07801b21
commit aa2cba9c88

View file

@ -1333,8 +1333,6 @@ scm_i_ucs_range_to_char_set (const char *FUNC_NAME, SCM lower, SCM upper,
clower = scm_to_size_t (lower); clower = scm_to_size_t (lower);
cupper = scm_to_size_t (upper) - 1; cupper = scm_to_size_t (upper) - 1;
SCM_ASSERT_RANGE (1, lower, clower >= 0);
SCM_ASSERT_RANGE (2, upper, cupper >= 0);
SCM_ASSERT_RANGE (2, upper, cupper >= clower); SCM_ASSERT_RANGE (2, upper, cupper >= clower);
if (!SCM_UNBNDP (error)) if (!SCM_UNBNDP (error))
{ {