search

ashinn / chibi-scheme

Official chibi-scheme repository
Other
1.2k stars 142 forks source link

SRFI 231: vector->array fix #968

Closed gambiteer closed 2 months ago

gambiteer commented 2 months ago 
git diff
diff --git a/lib/srfi/231/transforms.scm b/lib/srfi/231/transforms.scm
index d577bf4b..e5be17f5 100644
--- a/lib/srfi/231/transforms.scm
+++ b/lib/srfi/231/transforms.scm
@@ -449,7 +449,7 @@
   (list->vector (array->list array)))

 (define (vector->array domain vec . o)
-  (apply list->array domain (vector->list vec o)))
+  (apply list->array domain (vector->list vec) o))

 (define (array-assign! destination source)
   (assert (and (mutable-array? destination) (array? source)