我有Windows 10 64位，我安裝了剛安裝的GNAT編程工作室（沒有設置就像java jdk）。我想在GPS GNAT編程工作室製作我的第一個Ada程序。 在此基礎上example，以下是Arrayproject.adb： with Ada.Text_IO;
with Ada.Integer_Text_IO;
use Ada.Integer_Text_IO;
use Ada.Text_
我正在Ada中做Z80仿真器。 我實現JR（相對跳轉）的家庭，但我不滿意我的代碼： with Ada.Text_IO;
procedure main is
type UInt16 is mod 2 ** 16;
type UInt8 is mod 2 ** 8;
type Int8 is range -128 .. 127;
package UInt1
我是Ada的絕對初學者，有一件事我找不到具體的定義 - 這就是語句entry。 我理解一個帶有障礙的條目 - 如果障礙爲真，語句可以執行，如果爲假，任務會排隊直到評估爲真。 例如： entry Get(Item : out Data_Item) when Number_In_Buffer /= 0 is
begin
...
end Get;
但是這是什麼意思的聲明entry出現沒有隨後w
此代碼有什麼問題？編譯器說有兩件事情，即沒有運行條目，並且運行接受不匹配條目（兩者似乎都是錯誤的），並且單獨指出在聲明之前不能使用Train（但它已被聲明）。請向我解釋發生了什麼事。 我很猶豫要顯示整個代碼，但可以這樣做。 type ItineraryType is array (0..255) of Integer;
type Train is record
Label : Inte
我嘗試在Windows上通過命令行編譯一個非常簡單的GtkAda應用程序。下面是應用程序的代碼： `WITH Gtk.Main ; USE Gtk.Main ;
WITH Gtk.Window ; USE Gtk.Window ;
PROCEDURE Test01 IS
win : Gtk_window ;
BEGIN
Init ;
Gtk_New(Win)
，所以我散列和定義這些類型/功能： subtype string2 is String(1..2);
function cString2 is new Ada.Unchecked_Conversion(string2, long_integer);
function cChar is new Ada.Unchecked_Conversion(character, long_integer);