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

Added texture wrap and target functions...

Browse Source
This commit is contained in:
Ognjen Milan Robovic 2024-03-24 07:22:01 -04:00
parent 32f44113f8
commit 49ccc8d2ee
1 changed files with 74 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

114
raylib.ads
View File

@ -2847,40 +2847,59 @@ package Raylib is
Convention => C,
External_Name => "UnloadTexture";
--~function bool IsRenderTextureReady (RenderTexture2D target) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
function Is_Render_Texture_Ready (
Target : Render_Texture := No_Render_Texture
) return Logical with
Import => True,
Convention => C,
External_Name => "IsRenderTextureReady";
--~procedure UnloadRenderTexture (RenderTexture2D target) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Unload_Render_Texture (
Target : Render_Texture := No_Render_Texture
) with
Import => True,
Convention => C,
External_Name => "UnloadRenderTexture";
--~procedure UpdateTexture (Texture2D texture, const void *pixels) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Update_Texture (
Data : Texture := No_Texture;
Pixels : Pointer := null
) with
Import => True,
Convention => C,
External_Name => "UpdateTexture";
--~procedure UpdateTextureRec (Texture2D texture, Rectangle rec, const void *pixels) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Update_Texture_Rec (
Data : Texture := No_Texture;
Source : Rectangle := No_Rectangle;
Pixels : Pointer := null
) with
Import => True,
Convention => C,
External_Name => "UpdateTextureRec";
--~procedure GenTextureMipmaps (Texture2D *texture) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Gen_Texture_Mipmaps (
Data : Texture := No_Texture
) with
Import => True,
Convention => C,
External_Name => "GenTextureMipmaps";
--~procedure SetTextureFilter (Texture2D texture, int filter) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Set_Texture_Filter (
Data : Texture := No_Texture;
Filter : Texture_Filter := Texture_Filter_Point
) with
Import => True,
Convention => C,
External_Name => "SetTextureFilter";
--~procedure SetTextureWrap (Texture2D texture, int wrap) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Set_Texture_Wrap (
Data : Texture := No_Texture;
Wrap : Texture_Wrap := Texture_Wrap_Repeat
) with
Import => True,
Convention => C,
External_Name => "SetTextureWrap";
procedure Draw_Texture (
Data : Texture := No_Texture;
@ -2892,20 +2911,35 @@ package Raylib is
Convention => C,
External_Name => "DrawTexture";
--~procedure DrawTextureV (Texture2D texture, Vector2 position, Color tint) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Draw_Texture_V (
Data : Texture := No_Texture;
Position : Vector_2D := (0.0, 0.0);
Tint : Color := White
) with
Import => True,
Convention => C,
External_Name => "DrawTextureV";
--~procedure DrawTextureEx (Texture2D texture, Vector2 position, float rotation, float scale, Color tint) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Draw_Texture_Ex (
Data : Texture := No_Texture;
Position : Vector_2D := (0.0, 0.0);
Rotation : Float := 0.0;
Scale : Float := 0.0;
Tint : Color := White
) with
Import => True,
Convention => C,
External_Name => "DrawTextureEx";
--~procedure DrawTextureRec (Texture2D texture, Rectangle source, Vector2 position, Color tint) with
--~Import => True,
--~Convention => C,
--~External_Name => "";
procedure Draw_Texture_Rec (
Data : Texture := No_Texture;
Source : Rectangle := No_Rectangle;
Position : Vector_2D := (0.0, 0.0);
Tint : Color := White
) with
Import => True,
Convention => C,
External_Name => "DrawTextureRec";
procedure Draw_Texture_Pro (
Data : Texture := No_Texture;