Fix type of random to accept any Integer.
original commit: 297cecebcc130551cb6bb1c134834e6ed719f965
This commit is contained in:
parent
53553c53aa
commit
2448292eaa
|
@ -1925,7 +1925,7 @@
|
|||
;3.2.2.7 (Random Numbers)
|
||||
|
||||
[random
|
||||
(cl->* (->opt -PosInt [-Pseudo-Random-Generator] -Nat)
|
||||
(cl->* (->opt -Int [-Pseudo-Random-Generator] -Nat)
|
||||
(->opt [-Pseudo-Random-Generator] -Flonum))]
|
||||
|
||||
[random-seed (-> -PosInt -Void)]
|
||||
|
|
Loading…
Reference in New Issue
Block a user