From d12fdd75d1c131bbe4bd49413c3da51131cd1e73 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Mon, 19 Sep 2016 18:48:47 +1000
Subject: All File/Edit functions working, just need to add Search/About menu
 stuff

---
 fltk-text_buffers.ads | 34 +++++++++++++++++++++++++++++++++-
 1 file changed, 33 insertions(+), 1 deletion(-)

(limited to 'fltk-text_buffers.ads')

diff --git a/fltk-text_buffers.ads b/fltk-text_buffers.ads
index aa6a49f..eea9b73 100644
--- a/fltk-text_buffers.ads
+++ b/fltk-text_buffers.ads
@@ -15,7 +15,7 @@ package FLTK.Text_Buffers is
     type Position is new Natural;
 
 
-    type Modification is (Insert, Restyle, Delete);
+    type Modification is (Insert, Restyle, Delete, None);
     type Modify_Callback is interface;
     procedure Call
            (This         : in Modify_Callback;
@@ -48,6 +48,38 @@ package FLTK.Text_Buffers is
             Func : not null access Predelete_Callback'Class);
 
 
+    procedure Call_Modify_Callbacks
+           (This : in out Text_Buffer);
+
+
+    procedure Call_Predelete_Callbacks
+           (This : in out Text_Buffer);
+
+
+    function Length
+           (This : in Text_Buffer)
+        return Natural;
+
+
+    procedure Load_File
+           (This : in Text_Buffer;
+            Name : in String);
+
+
+    procedure Remove_Selected_Text
+           (This : in out Text_Buffer);
+
+
+    procedure Save_File
+           (This : in Text_Buffer;
+            Name : in String);
+
+
+    procedure Set_Selection
+           (This          : in out Text_Buffer;
+            Start, Finish : in     Natural);
+
+
 private
 
 
-- 
cgit