DrRacket Scheme当前伪随机生成器合同违规

Question

对于以下行：

(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>
> 

怎么了？

Answer 1

current-pseudo-random-generator是parameter，因此您必须像

一样使用它

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

默认情况下，random会自动使用它，因此您可以将示例简化为(random 9)。