diff options
author | Jedidiah Barber <contact@jedbarber.id.au> | 2024-10-13 02:00:32 +1300 |
---|---|---|
committer | Jedidiah Barber <contact@jedbarber.id.au> | 2024-10-13 02:00:32 +1300 |
commit | 87671a2f2423efacd0b0c4ad0c34c244680ef565 (patch) | |
tree | b581ee812415bd27bed09f0e0c77c4d24619afcf /src/fltk-event.ads | |
parent | ca99321b1f7aa54b435c73f1ec14321dbd989f16 (diff) |
Changed System.Address to Integer_Address
Diffstat (limited to 'src/fltk-event.ads')
-rw-r--r-- | src/fltk-event.ads | 4 |
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); |