1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-11 22:31:12 +02:00

* stime.c (bdtime2c): Use SCM_LENGTH, not scm_vector_length; the

former returns a nice normal integer.  (Thanks to Daniel
Risacher.)
This commit is contained in:
Jim Blandy 1997-09-28 04:07:04 +00:00
parent b8b1f32221
commit 3cef7514cb

View file

@ -391,7 +391,7 @@ static void
bdtime2c (SCM sbd_time, struct tm *lt, int pos, char *subr)
{
SCM_ASSERT (SCM_NIMP (sbd_time) && SCM_VECTORP (sbd_time)
&& scm_vector_length (sbd_time) == 11
&& SCM_LENGTH (sbd_time) == 11
&& SCM_INUMP (SCM_VELTS (sbd_time)[0])
&& SCM_INUMP (SCM_VELTS (sbd_time)[1])
&& SCM_INUMP (SCM_VELTS (sbd_time)[2])