From 495639f8b34dbd083c540861d98fabe3536244ce Mon Sep 17 00:00:00 2001 From: xolatile Date: Thu, 28 Mar 2024 19:59:46 -0400 Subject: [PATCH] Small changes... --- raylib.ads | 30 ++++++++++++++++++++++-------- 1 file changed, 22 insertions(+), 8 deletions(-) diff --git a/raylib.ads b/raylib.ads index 32a5bbd..c586679 100644 --- a/raylib.ads +++ b/raylib.ads @@ -3495,20 +3495,34 @@ package Raylib is Convention => C, External_Name => "DrawModel"; - --~procedure DrawModelEx (Model model, Vector3 position, Vector3 rotationAxis, float rotationAngle, Vector3 scale, Color tint) with - --~Import => True, - --~Convention => C, - --~External_Name => ""; + procedure Draw_Model_Ex ( + Data : Model := No_Model; + Position : Vector_3D := (0.0, 0.0, 0.0); + Axis : Vector_3D := (0.0, 0.0, 0.0); + Angle : Float := 0.0; + Scale : Vector_3D := (1.0, 1.0, 1.0); + Tint : Color := White + ) with + Import => True, + Convention => C, + External_Name => "DrawModelEx"; --~procedure DrawModelWires (Model model, Vector3 position, float scale, Color tint) with --~Import => True, --~Convention => C, --~External_Name => ""; - --~procedure DrawModelWiresEx (Model model, Vector3 position, Vector3 rotationAxis, float rotationAngle, Vector3 scale, Color tint) with - --~Import => True, - --~Convention => C, - --~External_Name => ""; + procedure Draw_Model_Wires_Ex ( + Data : Model := No_Model; + Position : Vector_3D := (0.0, 0.0, 0.0); + Axis : Vector_3D := (0.0, 0.0, 0.0); + Angle : Float := 0.0; + Scale : Vector_3D := (1.0, 1.0, 1.0); + Tint : Color := White + ) with + Import => True, + Convention => C, + External_Name => "DrawModelWiresEx"; --~procedure DrawBoundingBox (BoundingBox box, Color color) with --~Import => True,