]> git.xolatile.top Git - xolatile-raylib-ada.git/commitdiff
Minor changes yet again...
authorxolatile <xolatile@proton.me>
Tue, 23 Apr 2024 10:36:51 +0000 (06:36 -0400)
committerxolatile <xolatile@proton.me>
Tue, 23 Apr 2024 10:36:51 +0000 (06:36 -0400)
raylib.ads

index f07b6da4e8754573719d35f27f2ae5db7379d5da..f034a284e02af87f5e0e20e15203b152c38e2503 100644 (file)
@@ -9,15 +9,18 @@
 --
 -- 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
--- 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
--- can check out original C source code here below, it's under zlib
--- license. I wrote this because of the lack of good Ada bindings.
+-- Raylib is great game programming library written by 'raysan5' and
+-- many contributors, you can check out original C source code in the
+-- 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
 -- 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
 --
@@ -763,7 +766,7 @@ package Raylib is
       Mesh_Materials : access Integer        := null;
       Bone_Count     :        Integer        := 0;
       Bones          : access Bone_Info      := null;
-      --ERRORBind_Post      : access Transform      := null;
+      -- ERROR Bind_Post      : access Transform      := null;
    end record with Convention => C_Pass_By_Copy;
 
    No_Model : Model;
@@ -4078,14 +4081,6 @@ package Raylib is
       Convention    => C,
       External_Name => "TextLength";
 
-   --~function Text_Format (
-      --~Text : String := "";
-       --~...
-   --~) return Strings with
-      --~Import        => True,
-      --~Convention    => C,
-      --~External_Name => "TextFormat";
-
    function Text_Subtext (
       Text     : String  := "";
       Position : Integer := 0;