1 files changed, 26 insertions, 0 deletions
diff --git a/body/fltk-widget_callback_conversions.ads b/body/fltk-widget_callback_conversions.ads
new file mode 100644
index 0000000..09932b4
--- /dev/null
+++ b/body/fltk-widget_callback_conversions.ads
@@ -0,0 +1,26 @@
+
+
+--  Programmed by Jedidiah Barber
+--  Released into the public domain
+
+
+limited with
+
+    FLTK.Widgets;
+
+
+private package FLTK.Widget_Callback_Conversions is
+
+
+    function To_Access
+           (Addy : in Storage.Integer_Address)
+        return FLTK.Widgets.Widget_Callback;
+
+    function To_Address
+           (Call : in FLTK.Widgets.Widget_Callback)
+        return Storage.Integer_Address;
+
+
+end FLTK.Widget_Callback_Conversions;
+
+