From 2f32ec6ba104f3e8689b2a9d0f32c8102730e907 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Mon, 27 May 2024 09:25:39 +0900 Subject: [PATCH] vector->array fix for optional args Closes #968 Thanks Bradley Lucier! --- lib/srfi/231/transforms.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)