OCaml不同版本Random生成结果不一致，如何实现跨版本随机数一致？

OCaml 5.0.0及以上版本的Random模块默认采用了新的随机数生成算法，而5.0.0之前的版本使用的是旧的线性同余算法，这就是相同种子生成不同随机数的原因。要实现跨版本生成一致的随机数，可通过以下方法解决：

统一使用旧版兼容的随机状态 #

OCaml 5.x保留了旧版的随机实现，通过Random.State模块可以显式调用旧算法，且该写法在OCaml 4.x中同样适用，能确保所有版本生成的随机数一致。

代码示例 #

(* 初始化兼容旧版本的随机状态，种子设为2 *)
let compatible_state = Random.State.make [|2|]
(* 生成0-99的随机数 *)
Random.State.int compatible_state 100

这段代码在OCaml 4.14.1和5.0.0及以上版本运行时，都会返回69。

官方文档说明 #

OCaml官方文档中明确提到：

5.0.0版本之前使用的是不同的算法（会影响后续所有函数）

内容的提问来源于stack exchange，提问作者Timmmm