aboutsummaryrefslogtreecommitdiff
path: root/src/fltk-event.ads
diff options
context:
space:
mode:
authorJedidiah Barber <contact@jedbarber.id.au>2024-10-13 02:00:32 +1300
committerJedidiah Barber <contact@jedbarber.id.au>2024-10-13 02:00:32 +1300
commit87671a2f2423efacd0b0c4ad0c34c244680ef565 (patch)
treeb581ee812415bd27bed09f0e0c77c4d24619afcf /src/fltk-event.ads
parentca99321b1f7aa54b435c73f1ec14321dbd989f16 (diff)
Changed System.Address to Integer_Address
Diffstat (limited to 'src/fltk-event.ads')
-rw-r--r--src/fltk-event.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fltk-event.ads b/src/fltk-event.ads
index f103091..bcd05bb 100644
--- a/src/fltk-event.ads
+++ b/src/fltk-event.ads
@@ -196,8 +196,8 @@ private
function fl_widget_get_user_data
- (W : in System.Address)
- return System.Address;
+ (W : in Storage.Integer_Address)
+ return Storage.Integer_Address;
pragma Import (C, fl_widget_get_user_data, "fl_widget_get_user_data");
pragma Inline (fl_widget_get_user_data);