Testing DrawTextEx...

diff --git a/raylib.ads b/raylib.ads
index ddbe096621e68607f2a66c5910235d65e2756f89..7af44a320f7f2eac230fe366383ade7da4e14cfb 100644 (file)
--- a/raylib.ads
+++ b/raylib.ads
@@ -3020,10 +3020,17 @@ package Raylib is
                Convention    => C,
                External_Name => "DrawText";
 
-       --~procedure DrawTextEx (Font font, const char *text, Vector2 position, float fontSize, float spacing, Color tint) with
-               --~Import        => True,
-               --~Convention    => C,
-               --~External_Name => "";
+       procedure Draw_Text_Ex (
+               Data      : Font      := Get_Font_Default;
+               Text      : String    := "";
+               Position  : Vector_2D := (0.0, 0.0);
+               Font_Size : Float     := 0.0;
+               Spacing   : Float     := 0.0;
+               Tint      : Color     := White
+       ) with
+               Import        => True,
+               Convention    => C,
+               External_Name => "DrawTextEx";
 
        procedure Draw_Text_Pro (
                Data      : Font      := Get_Font_Default;