From 87671a2f2423efacd0b0c4ad0c34c244680ef565 Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Sun, 13 Oct 2024 02:00:32 +1300 Subject: Changed System.Address to Integer_Address --- src/fltk-widgets-inputs.ads | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/fltk-widgets-inputs.ads') diff --git a/src/fltk-widgets-inputs.ads b/src/fltk-widgets-inputs.ads index 46767cd..c9eacea 100644 --- a/src/fltk-widgets-inputs.ads +++ b/src/fltk-widgets-inputs.ads @@ -305,7 +305,7 @@ private function fl_input_get_value - (F : in System.Address) + (F : in Storage.Integer_Address) return Interfaces.C.Strings.chars_ptr; pragma Import (C, fl_input_get_value, "fl_input_get_value"); pragma Inline (fl_input_get_value); -- cgit