Build original Ada port core, V client, and x86-64 boot milestone
This commit is contained in:
1 parent
9af96aa1e1
commit
fc2bee6f32
28 files changed
+865
-7
No files matched your search
@@ -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;
|
||||
Reference in new issue
Block a user