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

(gh_uniform_vector_length): Use scm_uniform_vector_length instead of

Browse source 
SCM_UVECTOR_LENGTH.
This commit is contained in:
Marius Vollmer 2004-11-04 13:53:31 +00:00
parent d4ea47c8da
commit 6697f945b9
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/gh_data.c
View file

@ -580,7 +580,7 @@ gh_vector_length (SCM v)
unsigned long unsigned long
gh_uniform_vector_length (SCM v) 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 /* gets the given element from a uniform vector; ilist is a list (or