summaryrefslogtreecommitdiff
path: root/libguile/unif.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/unif.c')
-rw-r--r--libguile/unif.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/unif.c b/libguile/unif.c
index 10f9f651a..17b5fbd7a 100644
--- a/libguile/unif.c
+++ b/libguile/unif.c
@@ -46,7 +46,6 @@
#include "eval.h"
#include "genio.h"
#include "smob.h"
-#include "sequences.h"
#include "strop.h"
#include "feature.h"
@@ -725,7 +724,7 @@ scm_make_shared_array (oldra, mapfunc, dims)
return ra;
}
}
- imap = scm_apply (mapfunc, scm_list_reverse (inds), SCM_EOL);
+ imap = scm_apply (mapfunc, scm_reverse (inds), SCM_EOL);
if (SCM_ARRAYP (oldra))
i = (scm_sizet) scm_aind (oldra, imap, s_make_shared_array);
else