Ada-不正确使用“；“随机”；

在我的程序中，我试图在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"

我不知道，这怎么会是一个不正确的用法，或者它到底是什么意思。有人能详细说明一下吗？

---

谢谢大家!

假设

isInitialized

是一个全局变量，该代码看起来是合法的。它使用当前Gnat Ada正确编译和运行。整个程序是否比这更复杂？

G

或

random

是否可以重新申报

---

我看到你先前提到的一个包

random

。因此，包名和过程名之间可能存在名称冲突。删除“use rand”或重命名包可以解决此问题。

我看到前面的问题提到包“random”。因此，包名和过程名之间可能存在名称冲突。删除“use rand”或重命名包可以解决此问题。