Ada - 错误使用“随机”

Question

我正试图在我的程序中在ada中生成一个随机的正面。为此，我有以下代码：

  procedure Inicialize(K: Positive) is
     package rand is new ada.numerics.discrete_random(Positive);
     use rand;
     G: Generator;
     t: Positive;
  begin         
     isInitialized:= True;
     reset(G); 
     t := random(G); --error for this line
  end Inicialize;

我收到错误

incorrect use of "random"

我不知道，这是不正确的用法，或者甚至是什么意思。有人可以详细说明吗？ 谢谢！

Answer 1

假设isInitialized是一个全局变量，那么该代码看起来是合法的。它使用当前的Gnat Ada编译并正确运行。完整的程序比这更复杂吗？可以G或random重新申报吗？

我看到你之前的question提到了一个包random。因此，包名称和过程名称之间可能存在名称冲突。删除'使用rand'或重命名包可以解决这个问题。