xolatile/raylib-ada
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Minor changes yet again...

Browse Source
This commit is contained in:
Ognjen Milan Robovic 2024-04-23 06:36:51 -04:00
parent ed04c22a0e
commit 2987e6fb0d
1 changed files with 9 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
raylib.ads
View File

@ -9,15 +9,18 @@
-- --
-- This file was made by altering original Raylib 5.1 C header file. I -- This file was made by altering original Raylib 5.1 C header file. I
-- used few formatting programs of mine, tho sadly most of the editing -- used few formatting programs of mine, tho sadly most of the editing
-- was done manually. Contact me if there are license issues. -- was done manually. Contact me if there are license issues, read this
-- file, since this is the documentation.
-- --
-- Raylib is great game programming library written by 'raysan5', you -- Raylib is great game programming library written by 'raysan5' and
-- can check out original C source code here below, it's under zlib -- many contributors, you can check out original C source code in the
-- license. I wrote this because of the lack of good Ada bindings. -- link below, it's under zlib license. I wrote this because of the
-- lack of good Ada bindings.
-- --
-- There are minor name changes, and this binding was adapted to Ada -- There are minor name changes, and this binding was adapted to Ada
-- programming language. That means that you can't replace few keywords -- programming language. That means that you can't replace few keywords
-- in your C example, and everything works. Aim are new Ada projects. -- in your C program, and expect that everything works. Aim are new Ada
-- projects. Variadic functions and function pointers were removed.
-- --
-- https://github.com/raysan5/raylib -- https://github.com/raysan5/raylib
-- --
@ -763,7 +766,7 @@ package Raylib is
Mesh_Materials : access Integer := null; Mesh_Materials : access Integer := null;
Bone_Count : Integer := 0; Bone_Count : Integer := 0;
Bones : access Bone_Info := null; Bones : access Bone_Info := null;
--ERRORBind_Post : access Transform := null; -- ERROR Bind_Post : access Transform := null;
end record with Convention => C_Pass_By_Copy; end record with Convention => C_Pass_By_Copy;
No_Model : Model; No_Model : Model;
@ -4078,14 +4081,6 @@ package Raylib is
Convention => C, Convention => C,
External_Name => "TextLength"; External_Name => "TextLength";
--~function Text_Format (
--~Text : String := "";
--~...
--~) return Strings with
--~Import => True,
--~Convention => C,
--~External_Name => "TextFormat";
function Text_Subtext ( function Text_Subtext (
Text : String := ""; Text : String := "";
Position : Integer := 0; Position : Integer := 0;