From 6fa5de9c6015c2d93aac1f3e379844fc36ff865f Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sun, 13 Nov 2016 18:44:21 +1100 Subject: Added jump to feature --- fltk-text_buffers.ads | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'fltk-text_buffers.ads') diff --git a/fltk-text_buffers.ads b/fltk-text_buffers.ads index a021dbf..5b260d6 100644 --- a/fltk-text_buffers.ads +++ b/fltk-text_buffers.ads @@ -91,6 +91,20 @@ package FLTK.Text_Buffers is Start, Finish : in Natural); + -- only takes into account newline characters, not word wrap + function Skip_Lines + (This : in out Text_Buffer; + Start, Lines : in Natural) + return Natural; + + + -- only takes into account newline characters, not word wrap + function Rewind_Lines + (This : in out Text_Buffer; + Start, Lines : in Natural) + return Natural; + + private -- cgit