summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-inputs.ads
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2017-05-09 14:19:01 +1000
committerJed Barber <jjbarber@y7mail.com>2017-05-09 14:19:01 +1000
commitca10c01bea1e7a64b347ef058796a45f3b155e8e (patch)
tree8671cddd5df561309501d4660febd96d38b74a28 /src/fltk-widgets-inputs.ads
parent2354ea851677fbd66fb2a9fb2074a6122fc04e03 (diff)
Removed superfluous Get_Value calls on the CPP side
Diffstat (limited to 'src/fltk-widgets-inputs.ads')
-rw-r--r--src/fltk-widgets-inputs.ads10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/fltk-widgets-inputs.ads b/src/fltk-widgets-inputs.ads
index 350ac55..a461a89 100644
--- a/src/fltk-widgets-inputs.ads
+++ b/src/fltk-widgets-inputs.ads
@@ -1,5 +1,9 @@
+private with Interfaces.C.Strings;
+private with System;
+
+
package FLTK.Widgets.Inputs is
@@ -31,5 +35,11 @@ private
(This : in out Input);
+ function fl_input_get_value
+ (F : in System.Address)
+ return Interfaces.C.Strings.chars_ptr;
+ pragma Import (C, fl_input_get_value, "fl_input_get_value");
+
+
end FLTK.Widgets.Inputs;