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

* strings.c: Fixed mistaken default value in

Browse source 
scm_make_shared_substring; thanks Eric Moore!
This commit is contained in:
Greg J. Badros 1999-12-14 01:23:45 +00:00
parent d0d595806a
commit ce3769fb6f
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/strings.c
View file

@ -369,7 +369,7 @@ defaults to the end of @var{str}. The shared substring returned by
SCM_VALIDATE_ROSTRING(1,str); SCM_VALIDATE_ROSTRING(1,str);
SCM_VALIDATE_INT_DEF_COPY(2,frm,0,f); SCM_VALIDATE_INT_DEF_COPY(2,frm,0,f);
SCM_VALIDATE_INT_DEF_COPY(3,to,0,t); SCM_VALIDATE_INT_DEF_COPY(3,to,SCM_ROLENGTH(str),t);
SCM_ASSERT_RANGE (2,frm,(f >= 0)); SCM_ASSERT_RANGE (2,frm,(f >= 0));
SCM_ASSERT_RANGE (3,to, (f <= t) && (t <= SCM_ROLENGTH (str))); SCM_ASSERT_RANGE (3,to, (f <= t) && (t <= SCM_ROLENGTH (str)));