我試圖編譯一個簡單的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