~ chicken-core (chicken-5) bd9e8a15bc0625e89a6532ff7d9824804c37292b

commit bd9e8a15bc0625e89a6532ff7d9824804c37292b
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Thu Apr 16 18:52:50 2015 +1200
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Thu Apr 16 18:52:50 2015 +1200

    Make initializer argument to mini-srfi-1's make-list optional

diff --git a/mini-srfi-1.scm b/mini-srfi-1.scm
index e7ae2040..3bf2edb3 100644
--- a/mini-srfi-1.scm
+++ b/mini-srfi-1.scm
@@ -219,7 +219,7 @@
 
 (define (iota n) (list-tabulate n (lambda (i) i)))
 
-(define (make-list n x)
+(define (make-list n #!optional x)
   (list-tabulate n (lambda _ x)))
 
 (define (posq x lst)