Change to generate vector instead of list

2 files changed, 25 insertions, 25 deletions

diff --git a/README.md b/README.md
index c01ed66..9d133a4 100644
--- a/README.md
+++ b/README.md
@@ -13,7 +13,7 @@ For more details, please refer to [Jerome Keller's website](https://jeromekelleh
 
 #### `(accel-asc n) → <generator>`
 
-Returns a generator that produces a list of integers representing integer partitions for the given value of integer `n`.
+Returns a generator that produces a vector of integers representing integer partitions for the given value of integer `n`.
 
 ## Examples
 
@@ -22,35 +22,35 @@ Returns a generator that produces a list of integers representing integer partit
         (srfi 158)
         (integer-partition accel-asc))
 
-(generator-for-each (lambda (lst) (display lst) (newline))
+(generator-for-each (lambda (v) (display v) (newline))
                     (accel-asc 8))
 ```
 
 Output:
 
 ```
-(1 1 1 1 1 1 1 1)
-(1 1 1 1 1 1 2)
-(1 1 1 1 1 3)
-(1 1 1 1 2 2)
-(1 1 1 1 4)
-(1 1 1 2 3)
-(1 1 1 5)
-(1 1 2 2 2)
-(1 1 2 4)
-(1 1 3 3)
-(1 1 6)
-(1 2 2 3)
-(1 2 5)
-(1 3 4)
-(1 7)
-(2 2 2 2)
-(2 2 4)
-(2 3 3)
-(2 6)
-(3 5)
-(4 4)
-(8)
+#(1 1 1 1 1 1 1 1)
+#(1 1 1 1 1 1 2)
+#(1 1 1 1 1 3)
+#(1 1 1 1 2 2)
+#(1 1 1 1 4)
+#(1 1 1 2 3)
+#(1 1 1 5)
+#(1 1 2 2 2)
+#(1 1 2 4)
+#(1 1 3 3)
+#(1 1 6)
+#(1 2 2 3)
+#(1 2 5)
+#(1 3 4)
+#(1 7)
+#(2 2 2 2)
+#(2 2 4)
+#(2 3 3)
+#(2 6)
+#(3 5)
+#(4 4)
+#(8)
 ```
 
 ## License
diff --git a/integer-partition/accel-asc.scm b/integer-partition/accel-asc.scm
index 6b44e4d..870cb0b 100644
--- a/integer-partition/accel-asc.scm
+++ b/integer-partition/accel-asc.scm
@@ -33,7 +33,7 @@
                (if #f #f)))))))
   (begin
     (define (accel-asc n)
-      (accel-asc* n vector->list))
+      (accel-asc* n vector-copy))
 
     (define (accel-asc* n convert)
       (make-coroutine-generator