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

(gh_uniform_vector_length): Use scm_uniform_vector_length instead of

SCM_UVECTOR_LENGTH.
This commit is contained in:
Marius Vollmer 2004-11-04 13:53:31 +00:00
parent d4ea47c8da
commit 6697f945b9

View file

@ -580,7 +580,7 @@ gh_vector_length (SCM v)
unsigned long
gh_uniform_vector_length (SCM v)
{
return (unsigned long) SCM_UVECTOR_LENGTH (v);
return (unsigned long) scm_uniform_vector_length (v);
}
/* gets the given element from a uniform vector; ilist is a list (or