Build original Ada port core, V client, and x86-64 boot milestone

This commit is contained in:
Admin committed 2026-11-01 16:07:00 +08:00
1 parent 9af96aa1e1
commit fc2bee6f32
28 files changed
+865 -7

No files matched your search

+18
View File
@@ -0,0 +1,18 @@
with Interfaces;
with Interfaces.C;
package Agila_ABI is
subtype Word is Interfaces.Unsigned_32;
subtype Code is Interfaces.C.int;
function Create (Owner : Word) return Word
with Export, Convention => C, External_Name => "agila_port_create";
function Allow_Sender (Handle, Owner, Sender : Word) return Code
with Export, Convention => C, External_Name => "agila_port_allow_sender";
function Revoke_Sender (Handle, Owner, Sender : Word) return Code
with Export, Convention => C, External_Name => "agila_port_revoke_sender";
function Send (Handle, Caller, Value : Word) return Code
with Export, Convention => C, External_Name => "agila_port_send";
function Receive (Handle, Caller : Word; Value : access Word) return Code
with Export, Convention => C, External_Name => "agila_port_receive";
function Close (Handle, Caller : Word) return Code
with Export, Convention => C, External_Name => "agila_port_close";
end Agila_ABI;