diff options
-rw-r--r-- | libguile/ChangeLog | 4 | ||||
-rw-r--r-- | libguile/strings.c | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/libguile/ChangeLog b/libguile/ChangeLog index 0ec078395..a78276fbb 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,7 @@ +2001-07-12 Michael Livshin <mlivshin@bigfoot.com> + + * strings.c (s_scm_string): fix arg position in assert. + 2001-07-11 Gary Houston <ghouston@arglist.com> * strports.c (st_write): use memcpy, not strncpy. thanks to diff --git a/libguile/strings.c b/libguile/strings.c index acb53be8d..7c9d548e9 100644 --- a/libguile/strings.c +++ b/libguile/strings.c @@ -98,7 +98,7 @@ SCM_DEFINE (scm_string, "string", 0, 0, 1, { long i = scm_ilength (chrs); - SCM_ASSERT (i >= 0, chrs, SCM_ARGn, FUNC_NAME); + SCM_ASSERT (i >= 0, chrs, SCM_ARG1, FUNC_NAME); result = scm_allocate_string (i); } |