mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-21 14:49:18 +02:00
7 lines
158 B
Scheme
7 lines
158 B
Scheme
|
|
(define (random-source-make-integers rs)
|
|
(lambda (n) (%random-integer rs n)))
|
|
|
|
(define (random-source-make-reals rs . o)
|
|
(lambda () (%random-real rs)))
|
|
|