* unif.c (scm_list_to_uniform_array): call

	scm_dimensions_to_uniform_array with a third argument of
	SCM_UNDEFINED instead of SCM_EOL.

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 3177ea4..9bc2915 100644 (file)
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,9 @@
+1999-11-20  Gary Houston  <ghouston@freewire.co.uk>
+
+       * unif.c (scm_list_to_uniform_array): call 
+       scm_dimensions_to_uniform_array with a third argument of 
+       SCM_UNDEFINED instead of SCM_EOL.
+
 1999-11-19  Gary Houston  <ghouston@freewire.co.uk>
 
        * the following changes allow guile to be built with the array

diff --git a/libguile/unif.c b/libguile/unif.c
index d311c54..98818e5 100644 (file)
--- a/libguile/unif.c
+++ b/libguile/unif.c
@@ -2103,7 +2103,8 @@ scm_list_to_uniform_array (ndim, prot, lst)
       if (SCM_NIMP (row))
        row = SCM_CAR (row);
     }
-  ra = scm_dimensions_to_uniform_array (scm_reverse (shp), prot, SCM_EOL);
+  ra = scm_dimensions_to_uniform_array (scm_reverse (shp), prot,
+                                       SCM_UNDEFINED);
   if (SCM_NULLP (shp))
 
     {