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-images.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/fltk-images.ads')

diff --git a/src/fltk-images.ads b/src/fltk-images.ads
index 0ee31d5..7cb28ab 100644
--- a/src/fltk-images.ads
+++ b/src/fltk-images.ads
@@ -224,7 +224,7 @@ private
 
 
     function fl_image_fail
-           (I : in System.Address)
+           (I : in Storage.Integer_Address)
         return Interfaces.C.int;
     pragma Import (C, fl_image_fail, "fl_image_fail");
 
-- 
cgit