From 87671a2f2423efacd0b0c4ad0c34c244680ef565 Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Sun, 13 Oct 2024 02:00:32 +1300
Subject: Changed System.Address to Integer_Address

---
 src/fltk-widgets-groups.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/fltk-widgets-groups.ads')

diff --git a/src/fltk-widgets-groups.ads b/src/fltk-widgets-groups.ads
index 1c2c30a..0d55238 100644
--- a/src/fltk-widgets-groups.ads
+++ b/src/fltk-widgets-groups.ads
@@ -169,7 +169,7 @@ private
 
 
     procedure fl_group_end
-           (G : in System.Address);
+           (G : in Storage.Integer_Address);
     pragma Import (C, fl_group_end, "fl_group_end");
 
 
-- 
cgit