ada

    0热度

    1回答

    我收到一个错误,我找不到任何文档来解释需要在我的代码中修复哪些内容。代码是: type BinarySearchTreePoint is limited private; type Node; type BinarySearchTreePoint is access Node; type Node is record Llink, Rlink

    1热度

    1回答

    我必须从C++客户端接收UDP数据报。客户端工作正常,并发送数据报到我编译此代码的IP地址。数据报的大小是800Bytes。当我发送数据报时,读取过程被阻塞。我在这个例子之后创建了这个代码:https://en.wikibooks.org/wiki/Ada_Programming/Libraries/GNAT.Sockets_examples,这在我的主机上完美工作。任何想法? procedure

    1热度

    1回答

    执行的DLL构建的初始化代码蚊蚋导​​入时不自动运行。我这样做,包括在MCVE: division.ads with System; with Interfaces.C; package Division is --Neither of these work procedure DllMainCRTStartup ; pragma Export (StdCall

    1热度

    2回答

    我想知道你们中的任何人能否为我回答一个简短的问题。我目前正在处理记录,并且在我的程序中我需要它来了解我要导入的文件的行包含哪些内容。我的问题在于我不知道如何将这条线“拆分”为实际变量。例如,该线路是 22134.09 Kia Bernice 如何让程序知道,第一部分,22134.09是可变的价格,起亚是可变的公司和伯尼斯是变量模型,然后将它们都整理到一个记录? 如 type PriceComp

    1热度

    1回答

    我试图创建一个无约束的可变类型元素的数组;但是,因为元素没有受到训练,所以我有这个错误:“数组声明中的无约束元素类型”。 这里是我的方型声明: type C_square(size : bRange) is tagged record private type C_square(size : bRange) is tagged record bConstaint : uint8

    -2热度

    2回答

    我该如何去执行使用selection sort作为整数数组,按升序排序?我相信这个语法会包含一个for循环,但我不确定这个语法是如何工作的。 for I in 1..20 loop TempLowest : Integer := 99999; if Value(I) < TempLowest then Value(I) := TempLowest; end

    4热度

    2回答

    我需要构建一个静态库,其中包含一些用Ada编写的代码,这些代码可以用C/C++编写的代码调用。 我已经通过互联网搜索,并得到了一些关于gnatmake,gnatbind和gnatlink的知识,但仍然无法正确完成工作。 另外,我读过有些工具依赖某种项目文件。 我对这些不感兴趣,我只需要一堆命令来编写Makefile。

    1热度

    2回答

    在Ada中初始化动态分配数组的正确语法是什么?我试过这个: type Short_Array is array (Natural range <>) of Short; Items : access Short_Array; Items := new Short_Array(1..UpperBound)'(others => 0); 这会导致编译器错误 - “二元运算符预期”。而这: ty

    0热度

    1回答

    我想要做的是创建一个类型,其中包含控制代码其他部分传递给它的值。这是菜单系统的一部分,并且会扩展抽象类型,并且本身是抽象的。我想要做的是存储访问权限。够简单。 type Adjuster is abstract new Menu_Item with record --other fields Value : access Integer; end record; 问题是,

    3热度

    1回答

    我有这个简单的任务(线程)程序,我想运行但构建它需要永远(30秒或更多)。在每次运行该程序之前,都必须等待构建版本,尤其是当我想要做的只是改变一些微不足道的东西,比如在这里或那里添加Put语句时,这让人费尽筋疲力尽。 这是我一直在参考的程序。我正在使用GPS 2016.我是Ada的初学者。 with Ada.Text_IO, Ada.Integer_Text_IO; use Ada.Text_I