From 49f2a539cdc77b504ddef00162625531b659c767 Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Mon, 6 Jan 2025 23:46:40 +1300 Subject: Revised Browser subhierarchy, mostly protected method bindings --- src/fltk-widgets.ads | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/fltk-widgets.ads') diff --git a/src/fltk-widgets.ads b/src/fltk-widgets.ads index d7cbca8..9a8537b 100644 --- a/src/fltk-widgets.ads +++ b/src/fltk-widgets.ads @@ -356,6 +356,8 @@ private Callback : Widget_Callback; Current_Image : access FLTK.Images.Image'Class; Inactive_Image : access FLTK.Images.Image'Class; + Draw_Ptr : System.Address; + Handle_Ptr : System.Address; end record; overriding procedure Finalize -- cgit