Scheme DrRacket方案当前伪随机发生器违反合同

对于以下行：

(random 9 current-pseudo-random-generator)

我得到以下错误：

. . random: contract violation
  expected: (or/c (integer-in 1 4294967087) pseudo-random-generator?)
  given: #<procedure:current-pseudo-random-generator>
> 

。随机：违反合同
应为：（或/c（14294967087中的整数）伪随机生成器？）
鉴于：#
> 

怎么了

是一个，所以您必须像

(random 9 (current-pseudo-random-generator))

默认情况下，

random

将自动使用该选项，以便您可以将示例简化为

（random 9）

是一个，因此您必须像

(random 9 (current-pseudo-random-generator))

默认情况下，

random

将自动使用该选项，以便您可以将示例简化为

（random 9）