我试图编译一个简单的GTK应用程序，但是当我编译，生成不能归因于GTK源警报... 编译日志： Compile
[Ada] main.adb
gdk-display.ads:361:80: (style) this line is too long
gdk-event.ads:290:80: (style) this line is too long
…
gprbuild:
在Ada中嵌套“然后中止”结构合法吗？如果是，我可以如何正确使用它们？我有这样的代码： with Ada.Text_IO; use Ada.Text_IO;
procedure Main is
task TestTask is
end TestTask;
task body TestTask is
begin
select
de
我使用的是Windows 10（64位），我从http://libre.adacore.com/download/configurations#下载了GNAT GPL 2017，ARM ELF格式（托管在Windows上）。 我创建了一个示例代码： with Ada.Text_IO; use Ada.Text_IO;
procedure Hello is
begin
Put_Line
我想创建和初始化以下方式控制的类型（有点像一个厂）创建一个函数： function Create return Controlled_Type
is
Foo : Controlled_Type;
begin
Put_Line ("Check 1")
return Foo;
end Create;
procedure Main
is
Bar : C
我正在使用GTKADA，为一个小应用程序，并希望右对齐菜单栏上的帮助菜单。 旧的方法是在新菜单上调用Set_Right_justified，但现在已过时。 可以看到，我应该可以使用Set_Hexpand和Set_Halign来做到这一点。 我目前使用的代码是： - with GTK.WIDGET;
procedure Add_Menu_To_Menu_Bar
(Menu_Bar : in G
我是for ***'Address use ***的新用法。我想知道这种用法有什么限制。所以，我创建了以下程序： procedure letshack (A : System.Address) is
My_String : String(1..100000);
for My_String'Address use A;
begin
Put(My_Stri