BBC MicroBit 上的 Ada 随机数生成器

Question

正在为 BBC Microbit 开发一款小游戏。

Ada.Numerics.Discrete_Random 报告 “Ada.Numerics”不是预定义的库单元。

Ada 是否提供了另一种在 BBC MicroBit 上生成随机数的方法？ arch/ARM/Nordic/svd/nrf51/nrf51_svd-rng 定义了一个随机数生成器记录 RNG_Peripheral。这是我要搜索的还是仅与蓝牙一起使用？

GPS 2018 (20180528) hosted on x86_64-pc-linux-gnu
GNAT Community 2018 (20180524-73)

Active toolchain: arm-eabi

the GNAT Programming Studio

(c) 2001-2018 AdaCore

我的代码:

with Ada.Numerics.Discrete_Random;

package body Flip_A_Coin is

   package Random_Coin is new Ada.Numerics.Discrete_Random(Coin);

   G: Random_Coin.Generator;

   ------------------
   --  Reset       --
   ------------------

   procedure Reset is

   begin

      Random_Coin.Reset(G);

   end Reset;

   ------------------
   --  Flip        --
   ------------------

   function Flip
     return Coin is

   begin

      return Random_Coin.Random(G);

   end Flip;

begin

   Reset;

end Flip_A_Coin;

Answer 1

如果你构建使用

for Runtime ("ada") use "ravenscar-full-microbit";

在您的项目中或

--RTS=ravenscar-full-microbit

在命令行上，您会找到标准的 Ada RNG。

您也可以按照您的建议尝试使用 Ada Drivers Library 中的 NRF51_SVD.RNG ，这应该可以解决问题。